home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 18 REXX / 18-REXX.zip / I265.ZIP / while.cmd < prev   
OS/2 REXX Batch file  |  1992-08-05  |  134b  |  7 lines
  1. /* WHILE.CMD */
  2. junk = time(r)
  3. do while time(e) < 10
  4.      say 'Gonna do this for another' ,
  5.          10 - time(e) 'seconds'
  6. end
  7.