Category : Batch File Utilities - mostly for DOS
Archive   : IFF50.ZIP
Filename : IFF_T.BAT

REM IFF_T.BAT
ECHO OFF
CLS
REM simply test for the last available drive in your system.
REM clean up any 'residue', this deletes the ION and IFF
REM environment variable if they existed.
SET DRIVE=
SET IFF=
ECHO LOOKING FOR YOUR LAST AVAILABLE DRIVE...
IFF T
REM simply set a DOS environment variable DRIVE to the last
REM drive letter. Refer to the documents for the code key.
IF ERRORLEVEL 60 GOTO PROB
REM here we do something alittle different. we are checking
REM ERRORLEVEL for the drive code, and to make setting the
REM variable DRIVE simplier, we REVERSE the normal order
REM so that DRIVE is set each time, UNTIL ERRORLEVEL is less
REM than the code we are testing for. in this example, if your
REM last drive was Z then DRIVE would be set from A to Z. if your
REM last drive was D then DRIVE would be set from A to D.
IF ERRORLEVEL 10 SET DRIVE=A
IF ERRORLEVEL 11 SET DRIVE=B
IF ERRORLEVEL 12 SET DRIVE=C
IF ERRORLEVEL 13 SET DRIVE=D
IF ERRORLEVEL 14 SET DRIVE=E
IF ERRORLEVEL 15 SET DRIVE=F
IF ERRORLEVEL 16 SET DRIVE=G
IF ERRORLEVEL 17 SET DRIVE=H
IF ERRORLEVEL 18 SET DRIVE=I
IF ERRORLEVEL 19 SET DRIVE=J
IF ERRORLEVEL 20 SET DRIVE=K
IF ERRORLEVEL 21 SET DRIVE=L
IF ERRORLEVEL 22 SET DRIVE=M
IF ERRORLEVEL 23 SET DRIVE=N
IF ERRORLEVEL 24 SET DRIVE=O
IF ERRORLEVEL 25 SET DRIVE=P
IF ERRORLEVEL 26 SET DRIVE=Q
IF ERRORLEVEL 27 SET DRIVE=R
IF ERRORLEVEL 28 SET DRIVE=S
IF ERRORLEVEL 29 SET DRIVE=T
IF ERRORLEVEL 30 SET DRIVE=U
IF ERRORLEVEL 31 SET DRIVE=V
IF ERRORLEVEL 32 SET DRIVE=W
IF ERRORLEVEL 33 SET DRIVE=X
IF ERRORLEVEL 34 SET DRIVE=Y
IF ERRORLEVEL 35 SET DRIVE=Z
ECHO YOUR LAST DRIVE IS %DRIVE%:
ECHO .
ECHO NOW USING THE v SUB-OPTION...
IFF TV
IF ERRORLEVEL 60 GOTO PROB
ECHO YOUR DRIVE LIST IS...
ECHO %IFF%
ECHO IF THE ABOVE LINE IS BLANK, THEN YOUR USING A MULTI-TASKING
ECHO SYSTEM, OR HAVE 'DROPPED' TO DOS FROM WITHIN ANOTHER PROGRAM
GOTO END
REM There was some type of error.
:PROB
ECHO THERE HAS BEEN AN UNEXPECTED ERROR, SORRY.
REM END heading label.
:END