home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Monster Media 1993 #2
/
Image.iso
/
personal
/
gmblmt93.zip
/
GM93.BAT
< prev
next >
Wrap
DOS Batch File
|
1993-08-17
|
3KB
|
132 lines
ECHO OFF
cls
break on
print/d:prn>nul
:start
cls
f1
if exist BACKUP\*.* goto start2
if not exist BACKUP\*.* md BACKUP
COPY WK*.93 BACKUP > NUL
COPY F*.93 BACKUP > NUL
COPY WL*.93 BACKUP > NUL
COPY GM*.93 BACKUP > NUL
COPY PO*.93 BACKUP > NUL
COPY PT*.93 BACKUP > NUL
COPY *.S? BACKUP > NUL
:start2
KEYPRESS $
if errorlevel 1 goto nflmenu
goto start2
:nflmenu
cls
if exist return del return
f2
:nflstart
KEYPRESS 0 1 2 3 4 5 6 7
if errorlevel 8 goto gmprint
if errorlevel 7 goto record
if errorlevel 6 goto whatif
if errorlevel 5 goto chknfl
if errorlevel 4 goto checks
if errorlevel 3 goto scores
if errorlevel 2 goto predict
if errorlevel 1 goto mainexit
goto nflstart
:mainexit
cls
gmbye
goto bye
:record
cls
record
goto nflmenu
:whatif
cls
whatif
goto nflmenu
:chknfl
cls
chknfl
goto nflmenu
:checks
cls
checks
goto nflmenu
:predict
cls
predict
if exist gen93.bat goto predall
goto nflmenu
:predall
cls
if exist sys1temp.93 del sys1temp.93
if exist sys2temp.93 del sys2temp.93
if exist sys3temp.93 del sys3temp.93
if exist SAVER.OUT del SAVER.OUT
if exist SAVERTMP.93 del SAVERTMP.93
echo.
echo WORKING on GAMBLER'S MATE SYSTEM 1 (TRENDS)...
trends
cls
echo.
echo WORKING on GAMBLER'S MATE SYSTEM 2...
system2
cls
echo.
echo WORKING on GAMBLER'S MATE SYSTEM 3...
system3
if exist SAVER.OUT del SAVER.OUT
cls
echo All GAMBLER'S MATE systems have been GENERATED.
if exist gen93.bat del gen93.bat
gmprint
goto nflmenu
:scores
cls
scores
if exist return goto nflmenu
if exist regen93.bat goto regen
wkupdate
if exist gmbu.bat call gmbu.bat
if exist gmbu.bat del gmbu.bat
if exist return goto nflmenu
gmprint
goto nflmenu
:regen
echo off
cls
if exist sys1temp.93 del sys1temp.93
if exist sys2temp.93 del sys2temp.93
if exist sys3temp.93 del sys3temp.93
if exist SAVER.OUT del SAVER.OUT
if exist SAVERTMP.93 del SAVERTMP.93
echo.
echo Now REGENERATING the GAMBLER'S MATE TRENDS (SYSTEM 1) output. Please WAIT...
trends
cls
echo.
echo Now REGENERATING the GAMBLER'S MATE SYSTEM 2 output. Please WAIT...
system2
cls
echo.
echo Now REGENERATING the GAMBLER'S MATE SYSTEM 3 output. Please WAIT...
system3
if exist SAVER.OUT del SAVER.OUT
cls
echo.
echo All GAMBLER'S MATE systems are REGENERATED. Now beginning UPDATE routines.
echo.
if exist regen93.bat del regen93.bat
wkupdate
if exist gmbu.bat call gmbu.bat
if exist gmbu.bat del gmbu.bat
if exist return goto nflmenu
gmprint
goto nflmenu
:gmprint
cls
gmprint
goto nflmenu
:bye