home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 9 / FreshFishVol9-CD2.bin / bbs / util / mayflower.lha / MayFlower / CapsLock / testit < prev   
Encoding:
Text File  |  1994-03-03  |  456 b   |  24 lines
  1. CapsLock
  2. IF WARN
  3.  echo "*e[33m CapsLock key is lit USING: ON WARN *e[0m"
  4. ELSE
  5.  echo "CapsLock key is off"
  6. ENDIF
  7. FAILAT 11
  8. CapsLock e
  9. IF ERROR
  10.  echo "*e[33m CapsLock key is lit USING: ON ERROR *e[0m"
  11. ELSE
  12.  echo "CapsLock key is off"
  13. ENDIF
  14. FAILAT 21
  15. CapsLock f
  16. IF FAIL
  17.  echo "*e[33m CapsLock key is lit USING: ON FAIL *e[0m"
  18. ELSE
  19.  echo "CapsLock key is off"
  20. ENDIF
  21. FAILAT 10
  22. CapsLock e
  23. echo "If CapsLock is lit then 'FAILAT 10' keeps this line from printing"
  24.