home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 11 Util / 11-Util.zip / CHOOSE.ZIP / EXAMPLE.CMD < prev   
OS/2 REXX Batch file  |  1989-10-13  |  610b  |  35 lines
  1.   @echo off
  2.   echo.
  3.   echo Press
  4.   echo.
  5.   ECHO     M  to select option M
  6.   ECHO     P  to select option P
  7.   ECHO     O  to select option O
  8.   ECHO     R  to select option R
  9.   ECHO     Q  to Quit
  10.   echo.
  11.   ECHO         Your choice ?
  12.   echo.
  13.  
  14.   CHOOSE MPORQ
  15.     IF ERRORLEVEL 4 GOTO M
  16.     IF ERRORLEVEL 3 GOTO P
  17.     IF ERRORLEVEL 2 GOTO O
  18.     IF ERRORLEVEL 1 GOTO R
  19.     IF ERRORLEVEL 0 GOTO QUIT
  20.  
  21. :M
  22.  echo You have selected option M
  23.  goto q
  24. :P
  25.  echo You have selected option P
  26.  goto q
  27. :O
  28.  echo You have selected option O
  29.  goto q
  30. :O
  31.  echo You have selected option O
  32.  goto q
  33. :Q
  34.  
  35.