home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS - Coast to Coast / simteldosarchivecoasttocoast.iso / pcmag / vol9n02.zip / EGAHELP.BAT < prev    next >
DOS Batch File  |  1989-08-31  |  1KB  |  47 lines
  1. @ECHO OFF
  2. BATCHMAN ansi
  3. IF NOT ERRORLEVEL 1 GOTO gotansi
  4. BATCHMAN CECHO C 0Dh,ExcuuuUUUuuuse me
  5. BATCHMAN BEEP 40,1;40,1;40,1;40,1;40,1;40,1;40,1
  6. BATCHMAN CECHO 0Fh,, but this batch file needs to have ANSI loaded.
  7. REM -------- Create QUIT.BAT with the command "REM>QUIT.BAT"
  8. QUIT
  9. :gotansi
  10. BATCHMAN display
  11. IF ERRORLEVEL 9 GOTO notEGA
  12. IF ERRORLEVEL 4 GOTO EGA
  13. :notEGA
  14. BATCHMAN CECHO C 206,ExcuuuUUUuuuse me
  15. BATCHMAN BEEP 40,1;40,1;40,1;40,1;40,1;40,1;40,1
  16. BATCHMAN CECHO 15,, but this batch file needs an EGA or VGA!
  17. QUIT
  18. :EGA
  19. BATCHMAN E43V50
  20. BATCHMAN CLS 3Ch
  21. CLS
  22. BATCHMAN WINDOW 32,14,52,7,4Eh,-
  23. BATCHMAN SETCURSOR 33,17
  24. BATCHMAN CECHO 4Fh,Key                               Command
  25. BATCHMAN SETCURSOR 34,17
  26. BATCHMAN CECHO 4Eh,D for an ordinary directory       DIR
  27. BATCHMAN SETCURSOR 35,17
  28. BATCHMAN CECHO 4Eh,W for a Wide directory            DIR /W
  29. BATCHMAN SETCURSOR 36,17
  30. BATCHMAN CECHO 4Eh,Q to Quit this help
  31. BATCHMAN SETCURSOR 37,17
  32. BATCHMAN CECHO 4Eh,Press Alt AFTER Q to keep this help onscreen
  33. BATCHMAN SETCURSOR 1,1
  34. :loop
  35.   BATCHMAN GETKEY 'DWQ'
  36.   FOR %%v IN (1 2 3) DO IF ERRORLEVEL %%v GOTO choice%%v
  37.   :choice1
  38.   DIR
  39.   GOTO loop
  40.   :choice2
  41.   DIR /W
  42.   GOTO loop
  43. :choice3
  44. BATCHMAN BEEP 2000,1
  45. BATCHMAN SHIFT ALT
  46. IF NOT ERRORLEVEL 1 MODE CO80
  47.