ECHO OFF
cls
break on
print/d:prn>nul
:start
cls
f1
: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 gen91.bat goto predall
goto nflmenu
:predall
cls
if exist sys1temp.91 del sys1temp.91
if exist sys2temp.91 del sys2temp.91
if exist sys3temp.91 del sys3temp.91
echo.
echo WORKING on GAMBLER'S MATE SYSTEM 1 (TRENDS)...
trends > trends.out < nul
cls
echo.
echo WORKING on GAMBLER'S MATE SYSTEM 2...
system2 
cls
echo.
echo WORKING on GAMBLER'S MATE SYSTEM 3...
system3
cls
echo All GAMBLER'S MATE systems have been GENERATED.
if exist gen91.bat del gen91.bat
gmprint
goto nflmenu
:scores
cls
scores
if exist return goto nflmenu
if exist regen91.bat goto regen
wkupdate
gmprint
goto nflmenu
:regen
echo off
cls
echo.
echo Now REGENERATING the GAMBLER'S MATE TRENDS (SYSTEM 1) output.  Please WAIT...
trends > trends.out < nul
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
cls
echo.
echo All GAMBLER'S MATE systems are REGENERATED.  Now beginning UPDATE routines.
echo.
if exist regen91.bat del regen91.bat
wkupdate
gmprint
goto nflmenu
:gmprint
cls
gmprint
goto nflmenu
:bye