home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 8 Other / 08-Other.zip / pmcmd.zip / backsp.cmd < prev    next >
OS/2 REXX Batch file  |  1994-09-06  |  499b  |  30 lines
  1. /* 
  2.     This is an example file which shows that backspace is
  3.     handled correctly.
  4.  
  5.     Copyright Lignum Oy/Ltd
  6.  
  7. */
  8.  
  9. CALL RxFuncAdd "SysLoadFuncs", "RexxUtil", "SysLoadFuncs"
  10. CALL SysLoadFuncs
  11.  
  12. SAY BEGIN
  13. char = d2c(8)
  14. i = 1
  15. DO while i < 11
  16.     call charout ,i'000'i
  17.     call syssleep 1
  18.     call charout ,char
  19.     call charout ,char
  20.     call charout ,char 
  21.     call charout ,char
  22.     call charout ,char 
  23.     i = i + 1
  24. END
  25.     call charout ,char
  26.     call charout ,char 
  27. call charout ,i'000'i
  28. SAY ' '
  29. SAY END!
  30.