home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Unsorted BBS Collection
/
thegreatunsorted.tar
/
thegreatunsorted
/
programming
/
misc_programming
/
battutor.l!h
/
_FUNKY.BAT
< prev
next >
Wrap
DOS Batch File
|
1990-11-02
|
2KB
|
55 lines
echo off
Rem. _funky.bat revised 16-aug-83 21:00
more <_funky.rem
slash/l
pause
:example
slash/lll/
echo F1 Batch Files are useful and increase productivity
echo F2 Batch Files are unfathomable and a general pain.
echo F3 Batch Files are @#$%#$@% !!!
funky/llb/ Please select one of the above :
if not errorlevel 1 goto esc
if not errorlevel 59 goto below
if errorlevel 255 goto non_ext
if errorlevel 62 goto higher
if errorlevel 61 goto f3_typed
if errorlevel 60 goto f2_typed
echo You pressed F1. I find them useful, too!
goto continue
:esc
echo You pressed ESC. Are you trying to sneak out?
goto continue
:below
echo You pressed a key with an extended code below 59.
goto continue
:non_ext
echo You pressed a non-extended key.
goto continue
:higher
echo You pressed a key with an extended code above 61
goto continue
:f3_typed
echo Now, now. It's not THAT bad.
goto continue
:f2_typed
echo Well, I felt that way until I wrote these utilities ...
:continue
query /lll/ Would you like to execute this example again (y/n) ?
if errorlevel 2 goto exit
if errorlevel 1 goto example
slash/lll/ A list of extended keycodes is in file EXTCODES.REM
query/ l/ Would you like to see them now (y/n) ?
if errorlevel 2 goto exit
if not errorlevel 1 goto doslash
more <extcodes.rem
slash/ll
pause
:doslash
more <_slash.rem
slash/ll
pause
_what
:exit
slash/ll/ Bye bye