home *** CD-ROM | disk | FTP | other *** search
/ The Best of Mecomp Multimedia 1 / Mecomp-CD.iso / amiga / tools / utillities / diskmaster / rexx / windowtest.rexx < prev   
OS/2 REXX Batch file  |  1997-04-19  |  246b  |  20 lines
  1. /* $VER: WindowTest.rexx 2.0 (97-04-18) Rudolph Riedel */
  2.  
  3. OPTIONS RESULTS
  4.  
  5. parse arg Port
  6.  
  7. /*say Port*/
  8. Address VALUE Port
  9.  
  10. do i=0 to 10
  11.     OpenW i i 10 10 "ram:"
  12.     Status W
  13.     String.i=Result
  14.     /*say String.i*/
  15. end
  16.  
  17. do i=0 to 10
  18.     closew string.i
  19. end
  20.