Metropoli BBS
VIEWER: proc.bat MODE: TEXT (LATIN1)
®MDNM¯®MDNM¯@ECHO OFF
IF [%1]==[] GOTO ERROR
:: ---- Capitalization
  SET !P=%PATH%
  PATH %1
  SET !S=%PATH%
  PATH %!P%
  SET !P=
:: ----
SET LABEL=ERROR
FOR %%I IN (PROC1 PROC2 PROC3) DO IF '%%I'=='%!S%' SET LABEL=%!S%
GOTO %LABEL%
:ERROR
ECHO ERROR - enter %0 followed by PROC1, PROC2, or PROC3
GOTO End
:PROC1
ECHO Executing Procedure 1...
GOTO End
:PROC2
ECHO Executing Procedure 2...
GOTO End
:PROC3
ECHO Executing Procedure 3...
:End

[ RETURN TO DIRECTORY ]