home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 8 Other / 08-Other.zip / thelp021.lzh / HELP001.CMD < prev    next >
OS/2 REXX Batch file  |  1994-04-18  |  891b  |  50 lines
  1. @echo off
  2. rem SCCSID = @(#)help.cmd    6.4 91/08/05
  3. rem *
  4. rem * Process HELP requests:  verify specification of "ON" or "OFF"
  5. rem *
  6. rem *  Modified by Colin Thomson for use with Thelp and Tshell.
  7. rem *
  8. rem *  April 1994
  9. rem *
  10. if "%1" == ""    goto msg
  11. if "%1" == "on"  goto yes
  12. if "%1" == "off" goto no
  13. if "%1" == "ON"  goto yes
  14. if "%1" == "OFF" goto no
  15. if "%1" == "On"  goto yes
  16. if "%1" == "oN"  goto yes
  17. if "%1" == "OFf" goto no
  18. if "%1" == "OfF" goto no
  19. if "%1" == "Off" goto no
  20. if "%1" == "oFF" goto no
  21. if "%1" == "oFf" goto no
  22. if "%1" == "ofF" goto no
  23. helpsrt %1 %2
  24. if errorlevel 1 goto got1
  25. if errorlevel 0 goto got0
  26. goto exit
  27. :got1
  28. helpmsg %1 %2
  29. goto exit
  30. :got0
  31. if "%2" == "" goto args1
  32. goto args2
  33. goto exit
  34. :args1
  35. thelp 0 %1
  36. goto exit
  37. :args2
  38. thelp %1 %2
  39. goto exit
  40. :msg
  41. helpmsg
  42. goto exit
  43. :yes
  44. prompt $i[$p]
  45. goto exit
  46. :no
  47. cls
  48. prompt
  49. :exit
  50.