home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 1 / amigaformatcd01.iso / demos / blitz_basic / amigamode / arexx / roger3.rexx < prev   
Encoding:
OS/2 REXX Batch file  |  1996-04-30  |  284 b   |  14 lines
  1. /* Roger script */
  2.  
  3.     address 'BPAINT2' /*NOT really need as you are calling this from BPAINT so it is the Default address */
  4.     DO i = 150 to 0 by -10
  5.      MYLINE 0 150 400 i
  6.     END i
  7.  
  8.     DO x = 0 to 400 by 10
  9.      MYLINE 400 0 x 150
  10.     END x
  11.  
  12.     EXIT "Script Completed OK!"
  13.  
  14.