home *** CD-ROM | disk | FTP | other *** search
/ The Fred Fish Collection 1.5 / ffcollection-1-5-1992-11.iso / ff_disks / 300-399 / ff308.lzh / Vlt / rexx / Blink.rexx < prev    next >
OS/2 REXX Batch file  |  1990-01-18  |  573b  |  20 lines
  1. /** Blink.rexx
  2. *
  3. *    Blink VLT's cursor. Just a hack, not really recommended ;^)
  4. *    When VLT is busy with something, the "height" command may fail, 
  5. *    and the macro will exit without telling you. You'll notice that in
  6. *    half the case you have no cursor left, in the other half it will
  7. *    no longer blink...
  8. *
  9. **/
  10. /*
  11. *   Wait till other script is done
  12. */
  13. call delay 50
  14. address VLT
  15. /*
  16. *   Delays less than 25 ticks may not work because VLT may still be working
  17. *   on the previous request
  18. */
  19. do forever; "height 1"; call delay(25); "height 0"; call delay(25); end
  20.