home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC Format 7
/
Disk7.iso
/
PCF.BAT
< prev
next >
Wrap
DOS Batch File
|
1992-02-26
|
2KB
|
162 lines
echo off
cls
disp menu\pcf0 1
disp menu\pcfiss7 1
:start
nocurs
disp menu\pcfiss7 2
getkey uboetx
if errorlevel 6 goto quit
if errorlevel 5 goto fox
if errorlevel 4 goto egatrek
if errorlevel 3 goto oct
if errorlevel 2 goto blast
if errorlevel 1 goto utils
:fox
disp menu\foxintro 2
getkey vechm
if errorlevel 5 goto start
if errorlevel 4 goto foxherc
if errorlevel 3 goto foxcga
if errorlevel 2 goto foxega
if errorlevel 1 goto foxvga
:foxherc
cd fox
demo /h
cd\
goto start
:foxcga
cd fox
demo /c
cd\
goto start
:foxega
cd fox
demo /e
cd\
goto start
:foxvga
cd fox
demo /v
cd\
goto start
:egatrek
cd egatrek
egatrek
cd\
goto start
:oct
cd oct
oct18
cd\
goto start
:blast
disp menu\blastin 2
getkey cbam
if errorlevel 4 goto start
if errorlevel 3 goto insta
if errorlevel 2 goto instb
if errorlevel 1 goto instc
:insta
cls
copy \blast\*.* a:
echo For details on how to run Blast, please refer to the disk pages
pause
goto start
:instb
cls
copy \blast\*.* b:
echo For details on how to run Blast, please refer to the disk pages
pause
goto start
:instc
cls
md c:\blast
copy \blast\*.* c:\blast
echo For details on how to run Blast, please refer to the disk pages
pause
goto start
:utils
disp \menu\utils 2
getkey nsam
if errorlevel 4 goto start
if errorlevel 3 goto addmem
if errorlevel 2 goto spdmap
if errorlevel 1 goto newart
:addmem
disp menu\addmem 2
getkey abcm
if errorlevel 4 goto start
if errorlevel 3 goto addc
if errorlevel 2 goto addb
if errorlevel 1 goto adda
:addc
cls
Echo This will create a directory called UTILS on your C drive
Echo If you already have this directory the computer will show
Echo a message, but will still copy the files into this directory.
pause
md c:\utils
copy \addmem\*.* c:\utils
goto start
:addb
cls
Echo Please insert a blank disk in drive B:
pause
copy \addmem\*.* b:
goto start
:adda
cls
Echo Please insert a blank disk in drive A:
pause
copy \addmem\*.* a:
goto start
:spdmap
disp menu\spdmap 2
getkey cm
if errorlevel 2 goto start
if errorlevel 1 goto spdmap2
:spdmap2
cls
spdmap\sm
pause
goto start
:newart
cd newart
newart
cd\
goto start
:quit
cls
disp menu\pcfend 2
pause
cursor
cls