home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 3 Comm / 03-Comm.zip / scrmod.zip / BREAK < prev    next >
Text File  |  1991-08-15  |  288b  |  11 lines
  1. > watch(on)
  2. > BREAKTIME = 9
  3. > SHORTRESULT = BREAK()
  4. > LONGRESULT = BREAK(BREAKTIME)
  5. > SHORTRESULTTEXT = VALTOSTR(SHORTRESULT)
  6. > LONGRESULTTEXT = VALTOSTR(LONGRESULT)
  7. > MESSAGE('SHORTRESULT = ' + SHORTRESULTTEXT + ', LONGRESULT = ' + LONGRESULTTEXT)
  8. > timeout = 0
  9. > wait()
  10. > end
  11.