home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS 1992 September / Simtel20_Sept92.cdr / msdos / lotus123 / lotushlp.arc / RESPONSE.TIP < prev    next >
Text File  |  1985-05-31  |  2KB  |  47 lines
  1.           TITLE     RESPONSE - SET ERRORLEVEL FOR INTERCATIVE BATCH FILES
  2. ;
  3. ; THIS IS A FAIRLY SIMPLE PROGRAM IN CONCEPT: IT SETS THE ERRORLEVEL
  4. ; CODE FOR BATCH FILES BASED ON THE USER'S INPUT.  ALSO, IT WILL NOT
  5. ; ACCEPT ANYTHING BUT A CORRECT RESPONSE CHARACTER, HELPING FUMBLE-
  6. ; FINGERED PEOPLE LIKE THE AUTHOR (GLEN MARSHALL).  ENJOY!
  7. ;
  8. ; EXAMPLES:
  9. ;
  10. ;     1) SIMPLE Y/N INPUT:
  11. ;
  12. ;           ECHO DO YOU WANT A CROSS-REFERENCE LISTING?
  13. ;           RESPONSE YN
  14. ;           IF ERRORLEVEL 2 GOTO NOCREF
  15. ;
  16. ;        THE ERRORLEVEL IS SET TO 1 FOR "Y" (ITS POSITION IN THE
  17. ;        RESPONSE PARAMETER STRING), OR 2 FOR "N".
  18. ;
  19. ;     2) MENU CHOICE:
  20. ;
  21. ;           ECHO PLEASE CHOOSE ONE:
  22. ;           ECHO   A) FIRST OPTION        D) FOURTH OPTION
  23. ;           ECHO   B) SECOND OPTION       D) FIFTH OPTION
  24. ;           ECHO   C) THIRD OPTION        F) SIXTH OPTION
  25. ;           RESPONSE ABCDEF
  26. ;
  27. ;        NOTE THAT THE RESPONSE PARAMETER CAN CONTAIN ANY ALPHANUMERIC
  28. ;        CHARACTERS IN ANY ORDER.  THE ERRORLEVEL CODE IS SET BASED ON
  29. ;        THE RESPONSE INPUT'S POSITION IN THE PARAMETER STRING.
  30. ;
  31. ;TIP:
  32. ;
  33. ;"ERRORLEVEL n" is true whenever n is less than or equal to the
  34. ;errorlevel set by the previous program.  Hence, if RESPONSE sets
  35. ;errorlevel to anything but 0, then  IF ERRORLEVEL 1  will always
  36. ;be true!  Solution?  Check the errorlevel in descending order.
  37. ;For example:
  38. ;
  39. ;             RESPONSE YN
  40. ;             IF ERRORLEVEL 2 GOTO NO
  41. ;             IF ERRORLEVEL 1 GOTO YES
  42. ;
  43. ;      This may be backwards to what you might expect, but that's ;the way DOS works.  This tip provided by users of the Huntington
  44. Beach BBS, (714) 842-6348
  45.  
  46.  
  47.