home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 3 Comm / 03-Comm.zip / scrmod.zip / VALTOCHR.SCR < prev    next >
Text File  |  1992-02-06  |  352b  |  25 lines
  1. > windowshow()
  2. > watch(off)
  3. > value = 0
  4. > count1 = 8
  5. > loop1:
  6. > count2 = 32
  7. > text = ''
  8. > loop2:
  9. > text = text + valtochr(value)
  10. > value = value + 1
  11. > count2 = count2 - 1
  12. > if  count2 != 0
  13. > goto loop2
  14. > endif
  15. > message(text)
  16. > count1 = count1 - 1
  17. > if count1 != 0
  18. > goto loop1
  19. > endif
  20. > watch(on)
  21. > timeout = 0
  22. > wait()
  23. > end
  24.  
  25.