home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 9 / CD_ASCQ_09_1193.iso / maj / sstuff / stuff.bat < prev    next >
DOS Batch File  |  1993-01-06  |  2KB  |  112 lines
  1. echo off
  2. set PALETTE=/p1
  3. kls %1
  4. if errorlevel 5 set PALETTE=/p4
  5. if errorlevel 1 goto begin
  6. set PALETTE=/p4
  7. :begin
  8.     kls %1
  9.     batbox demo.mnu /o %PALETTE%
  10.     if errorlevel 7 goto quit
  11.     if errorlevel 6 goto whenisit
  12.     if errorlevel 5 goto space
  13.     if errorlevel 4 goto kls
  14.     if errorlevel 3 goto dosver
  15.     if errorlevel 2 goto chkprn
  16. :chkdrv
  17.     kls %1
  18.     chkdrv >stuff.tmp
  19.     box stuff.tmp
  20.     waitfor 5
  21. goto begin
  22. :chkprn
  23.     kls %1
  24.     batbox chkprn.mnu /o %PALETTE%
  25.     if errorlevel 4 goto begin
  26.     if errorlevel 3 goto LPT3
  27.     if errorlevel 2 goto LPT2
  28.     :LPT1
  29.         chkprn >stuff.tmp
  30.     goto show
  31.     :LPT2
  32.         chkprn lpt2 >stuff.tmp
  33.     goto show
  34.     :LPT3
  35.         chkprn lpt3 >stuff.tmp
  36.     goto show
  37. :dosver
  38.     dosver > stuff.tmp
  39.     goto show
  40. goto begin
  41. :kls
  42.     kls %1
  43.     if errorlevel 5 goto herc
  44.     if errorlevel 4 goto mcga
  45.     if errorlevel 3 goto vga
  46.     if errorlevel 2 goto ega
  47.     if errorlevel 1 goto cga
  48.     :mda
  49.         echo You have a Monochrome Display Adapter (MDA)>stuff.tmp
  50.     goto show
  51.     :cga
  52.         echo You have a Color Graphics Adapter (CGA)>stuff.tmp
  53.     goto show
  54.     :ega
  55.         echo You have a Enhanced Graphics Adapter (EGA)>stuff.tmp
  56.     goto show
  57.     :vga
  58.         echo You have a Video Graphics Array (VGA)>stuff.tmp
  59.     goto show
  60.     :mcga
  61.         echo You have a Multi-Color Graphics Adapter (MCGA)>stuff.tmp
  62.     goto show
  63.     :herc
  64.         echo You have a Hercules Display Adapter>stuff.tmp
  65.     goto show
  66. :space
  67.     kls %1
  68.     batbox space.mnu /o %PALETTE%
  69.     if errorlevel 4 goto begin
  70.     if errorlevel 3 goto space3
  71.     if errorlevel 2 goto space2
  72.     :space1
  73.         kls %1
  74.         input "Enter a file specification: " /MSPACE /r10 /l20
  75.         space %SPACE% /sk >stuff.tmp
  76.     goto show
  77.     :space2
  78.         kls %1
  79.         input "Enter a disk letter: " /MSPACE /r10 /l20 /d
  80.         space %SPACE%: /sk >stuff.tmp
  81.     goto show
  82.     :space3
  83.         kls %1
  84.         input "Enter a file specification: " /MSPACE /r10 /l20
  85.         input "Enter a disk letter: " /MSPACEB /r12 /l20 /d
  86.         space %SPACE% %SPACEB%: /sk >stuff.tmp
  87.     goto show
  88. :whenisit
  89.     kls %1
  90.     input "Enter a date (dd/mm/yy) or a time (hh:mm): " /MWHEN /r10 /l10
  91.     kls %1
  92.     whenisit %WHEN%
  93.     if errorlevel 2 goto w2
  94.     if errorlevel 1 goto w1
  95.     :w0
  96.         echo It has not yet reached %WHEN%>stuff.tmp
  97.     goto show
  98.     :w1
  99.         echo It is now %WHEN%>stuff.tmp
  100.     goto show
  101.     :w2
  102.         echo It is now past %WHEN%>stuff.tmp
  103.     goto show
  104. goto begin
  105. :show
  106.     kls %1
  107.     box stuff.tmp
  108.     waitfor 6
  109.     goto begin
  110. :quit
  111.  
  112.