PCPLUS.BAT  ·  BAT  ·  7.9 KB  ·  1989-10-06  ·  from PCPlus_Issue-39_Dec-1989-FluxEngine-360kB
echo off
cd intro
SHOWCSF TITLE
SHOWCSF DEC1
:menu
cd ..\intro
SHOWCSF DEC2
if errorlevel 194 goto menu
if errorlevel 193 goto f7
if errorlevel 192 goto f6
if errorlevel 191 goto f5
if errorlevel 190 goto f4
if errorlevel 189 goto f3
if errorlevel 188 goto f2
if errorlevel 187 goto f1
if errorlevel  28 goto menu
:f1
CD ..\OPTIKS
cls
echo Please check you have a freshly formatted floppy in drive B:. Then,
pause
PKXARC *.ARC B:
echo.
echo Assuming no errors have been reported during the decompression process,
echo the necessary Optiks files have now been transferred to the disk in
echo drive B:.
echo.
echo To run the Optiks programs, return to the DOS prompt and put the disk
echo you've just created into drive A:. Type OK to run the OPTIKS program.
echo Select the QUIT option from the menu to leave it again. Check out the
echo DOC files supplied with the program.
echo.
pause
goto menu
:f2
CD ..\OPTIKS
cls
echo About to decompress files to C:\OPTIKS sub-directory.
pause
C:
CD \
MD OPTIKS
A:
PKXARC *.ARC C:\OPTIKS
echo.
echo Assuming no errors have been reported during the decompression process,
echo the necessary Optiks files have now been transferred to the C:\OPTIKS
echo sub-directory.
echo.
echo To run the Optiks programs, return to the DOS prompt and move to the
echo OPTIKS directory of drive C:. Type OK to run the OPTIKS program.
echo Select the QUIT option from the menu to leave it again. Check out the
echo DOC files supplied with the program.
echo.
pause
goto menu
:f3
CD ..\GAMES
cls
echo To leave Match and return to the SuperDisk menu, select QUIT from the
echo menu at the top of the Match screen and press the up arrow key.
echo.
echo Match WILL run on a Hercules monitored PC if you first run the CGA2
echo emulator provided on the June 1989 SuperDisk. Press [Ctrl][C] to leave
echo this batch file, and type CD \ [Return] to return to the root directory.
echo Run CGA2 and then start the PCPLUS program again.
echo.
pause
MATCH
goto menu
:f4
CD ..\GAMES
cls
echo To leave Amaze and return to the SuperDisk menu, finish the game and
echo press [F10].
echo.
echo Amaze WILL run on a Hercules monitored PC if you first run the CGA2
echo emulator provided on the June 1989 SuperDisk. Press [Ctrl][C] to leave
echo this batch file, and type CD \ [Return] to return to the root directory.
echo Run CGA2 and then start the PCPLUS program again.
echo.
pause
AMAZE
goto menu
:f5
CD ..\UTILS
cls
echo Once QUIKTEX has been installed, press [Alt][Tab] to call it up and [Esc]
echo to pop it back down again. Make sure your printer, which should be Epson
echo compatible, is switch on and on-line.
echo.
pause
QWIKTEX
goto menu
:f6
CD ..\SHORTIES
cls
echo You're in the SHORTIES sub-directory.
echo.
echo This contains a number of smaller utilities, further details of which are
echo in the SuperDisk section of PC PLUS. Some may have documentation in .DOC
echo files, which you can read using the MS-DOS TYPE command.
echo.
echo Here's the directory listing...
DIR
echo.
pause
cls
echo Here are brief details of what they do - see PCPLUS for more:
echo.
echo IS       - provides full details of the configuration and setup of a PC
echo            to any batch file which uses it. A demonstration of what IS
echo            can do follows after this screen.
echo.
echo CODER    - translates a COM or EXE file into a straight hexadecimal file,
echo            suitable for sending across the phone lines with just about 
echo            any communications software.
echo.
echo POPCORN  - to prove we can be as frivolous as the next mag, here's a 
echo            routine to play the old 70's hit, Popcorn. The only catch is,
echo            it plays a note each time you hit a key! 
echo.
echo To see IS and POPCORN in action,
pause
:ISstart
cls
echo This batch file demonstrates the use of IS.COM
echo.
pause
IS ANSI > nul
echo IS has the following things to say about your PC:
echo.
echo It has a
if errorlevel 3 goto colwith
if errorlevel 2 goto colwout
if errorlevel 1 goto monowith
echo MONO monitor but without ANSI.SYS installed
goto ANSIend
:monowith
echo MONO monitor with ANSI.SYS installed
goto ANSIend 
:colwout
echo COLOUR monitor but without ANSI.SYS installed
goto ANSIend
:colwith
echo COLOUR monitor, and ANSI.SYS installed
:ANSIend
IS EGA > nul
if errorlevel 1 echo and an EGA or VGA graphics adapter.
if not errorlevel 1 echo and an MDA, Hercules or CGA graphics adapter. 
IS AT > nul
if errorlevel 1 echo The machine is an AT,
if not errorlevel 1 echo The machine is NOT an AT,
IS maths > nul
if errorlevel 1 echo has a maths co-processor fitted
if not errorlevel 1 echo has NO maths co-processor fitted
IS turbo > nul
if errorlevel 1 echo and is currently switched to TURBO mode.
if not errorlevel 1 echo and is NOT currently switched to TURBO mode.
IS memsize > nul
if errorlevel 64 goto 640
if errorlevel 51 goto 512
if errorlevel 38 goto 384
if errorlevel 25 goto 256
if errorlevel 12 goto 128
:128
echo It has around 128K RAM
goto memend
:256
echo It has around 256K RAM
goto memend
:384
echo It has around 384K RAM
goto memend
:512
echo It has around 512K RAM
goto memend
:640
echo It has a full 640K RAM
:memend
IS EMS > nul
if errorlevel 1 echo and EMS expanded memory fitted.
if not errorlevel 1 echo but NO EMS expanded memory fitted.
echo.
echo IS can say other things, too:
echo.
IS printer > nul
if errorlevel 1 goto ypr
if errorlevel 0 goto npr
:ypr
echo Your printer is ON LINE - IS will print out its own commands,
IS > prn
goto prend
:npr
echo Your printer is OFF LINE,
:prend
IS A: > nul
if errorlevel 1 echo there is a floppy in drive A:,
if not errorlevel 1 echo there is NO floppy in drive A:,
IS drives > nul
if errorlevel 3 goto hard
if errorlevel 2 goto twin
echo of this single floppy machine
goto current
:twin
echo of this twin floppy machine
goto current
:hard
echo of this hard disk machine
:current
echo and the current drive is
IS current > nul
if errorlevel 3 goto :C
if errorlevel 2 goto :B
if errorlevel 1 goto :A
echo something other than A:, B: or C:, though it's
goto hardtest
:C
ECHO C:,
goto hardtest
:B
ECHO B:,
goto hardtest
:A
ECHO A:,
:hardtest
IS hard > nul
if errorlevel 1 echo a HARD drive
if not errorlevel 1 echo a floppy
IS version > nul
if errorlevel 4 goto vfour
if errorlevel 3 goto vthree
if errorlevel 2 goto vtwo
:vfour
echo running under DOS version 4.nn.
goto findos
:vthree
echo running under DOS version 3.nn.
goto findos
:vtwo
echo running under DOS version 2.nn.
:findos
cls
:keyloop
echo Please tap the space-bar to stop this loop...
IS key > nul
if not errorlevel 1 goto keyloop
echo Thank you.
is mouse > nul
if errorlevel 1 goto mouse
echo This PC doesn't have a mouse installed.
goto nomouse
:mouse
echo This PC has a mouse installed. Press a mouse button to continue...
IS button > nul
if errorlevel 4 goto centre
if errorlevel 3 goto both
if errorlevel 2 goto right
echo You pressed the LEFT button.
goto nomouse
:right
echo You pressed the RIGHT button.
goto nomouse
:both
echo You pressed BOTH buttons - sneaky!
goto nomouse
:centre
echo You pressed the centre button of a three button mouse.
:nomouse
IS network > nul
if errorlevel 1 echo This PC is networked with other machines.
if not errorlevel 1 echo This PC isn't networked with any others.
echo.
:menuloop
pause
cls
echo Here's a menu entirely operated by IS:
echo.
echo 1 to display syntax of IS 
echo 2 to display IS HELP screen
echo 3 to run the IS demo again
echo 4 to display a random number with IS RANDOM (errlev 0-3)
echo 5 to quit
echo.
IS reply
if errorlevel 5 goto quit
if errorlevel 4 goto guess
if errorlevel 3 goto ISstart
if errorlevel 2 goto help
cls
IS
goto menuloop
:help
cls
IS help
goto menuloop
:guess
IS RANDOM
echo.
goto menuloop
:QUIT
cls
echo Now installing POPCORN...
POPCORN
pause
goto menu
:F7
cd \
cls