home *** CD-ROM | disk | FTP | other *** search
/ Popular Software (Premium Edition) / mycd.iso / DICT / DFKC / ZWH / CHCS / CHCS.BAT < prev    next >
Encoding:
DOS Batch File  |  1998-01-12  |  1.0 KB  |  71 lines
  1. @echo off
  2.  
  3. if "%1" == "/q" goto Quit
  4. if "%1" == "/Q" goto Quit
  5. if "%1" == "/?" goto Help
  6.  
  7. set LOAD=
  8. set FONT=
  9. TestLH
  10. if ERRORLEVEL 1 goto toLOAD
  11. set LOAD=lh
  12.  
  13. :toLOAD
  14. chtest > nul
  15. if ERRORLEVEL 255 goto End
  16.  
  17. :Cont0
  18. if "%1" == "/f" goto setFFont
  19. if "%2" == "/f" goto setFFont
  20. if "%3" == "/f" goto setFFont
  21. goto Cont1
  22. :setFFont
  23. set FONT=/F
  24.  
  25. :Cont1
  26. if ERRORLEVEL 3 goto useRAM
  27. if ERRORLEVEL 2 goto useEXT
  28. if "%1" == "/t" goto useEXT
  29. if "%1" == "/T" goto useEXT
  30. if ERRORLEVEL 1 goto useEMS
  31. if "%1" == "/e" goto useEMS
  32. if "%1" == "/E" goto useEMS
  33. if ERRORLEVEL 0 goto useXMS
  34. if "%1" == "/x" goto useXMS
  35. if "%1" == "/X" goto useXMS
  36.  
  37. :Quit
  38. chquit
  39. goto end
  40.  
  41. :Help
  42. type chcsbat.hlp
  43. goto End
  44.  
  45. :useXMS
  46. %LOAD% fxms %FONT%
  47. goto common
  48.  
  49. :useEMS
  50. %LOAD% fems %FONT%
  51. goto common
  52.  
  53. :useEXT
  54. %LOAD% fext %FONT%
  55. goto common
  56.  
  57. :useRAM
  58. fram %FONT%
  59. goto common
  60.  
  61. :Common
  62. if ERRORLEVEL 1 goto End
  63. %LOAD% chvga /c:acios.chr
  64. if ERRORLEVEL 1 goto End
  65. %LOAD% wch
  66. %LOAD% chpy
  67. %LOAD% xis F4=WBX.DAT
  68. @echo  
  69.  
  70. :End
  71.