home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload / ShartewareOverload.cdr / games / egafonts.zip / EGAFONTS.BAT < prev    next >
DOS Batch File  |  1987-05-09  |  3KB  |  149 lines
  1. ECHO OFF
  2. PUSHDIR
  3. REM C:
  4. REM CD\EGAFONTS
  5. TYPE EGAFONTS.ANS
  6. RESPONSE ABCDEFGHIJKLMNOPQRSTUVWXY90
  7. IF ERRORLEVEL=27 GOTO :END
  8. IF ERRORLEVEL=26 GOTO :OFF
  9. IF ERRORLEVEL=25 GOTO :Y
  10. IF ERRORLEVEL=24 GOTO :X
  11. IF ERRORLEVEL=23 GOTO :W
  12. IF ERRORLEVEL=22 GOTO :V
  13. IF ERRORLEVEL=21 GOTO :U 
  14. IF ERRORLEVEL=20 GOTO :T
  15. IF ERRORLEVEL=19 GOTO :S
  16. IF ERRORLEVEL=18 GOTO :R
  17. IF ERRORLEVEL=17 GOTO :Q
  18. IF ERRORLEVEL=16 GOTO :P
  19. IF ERRORLEVEL=15 GOTO :O
  20. IF ERRORLEVEL=14 GOTO :N
  21. IF ERRORLEVEL=13 GOTO :M
  22. IF ERRORLEVEL=12 GOTO :L
  23. IF ERRORLEVEL=11 GOTO :K
  24. IF ERRORLEVEL=10 GOTO :J
  25. IF ERRORLEVEL=9  GOTO :I
  26. IF ERRORLEVEL=8  GOTO :H
  27. IF ERRORLEVEL=7  GOTO :G
  28. IF ERRORLEVEL=6  GOTO :F
  29. IF ERRORLEVEL=5  GOTO :E
  30. IF ERRORLEVEL=4  GOTO :D
  31. IF ERRORLEVEL=3  GOTO :C
  32. IF ERRORLEVEL=2  GOTO :B
  33. IF ERRORLEVEL=1  GOTO :A
  34. GOTO :END
  35. :OFF
  36. EGAFONT OFF
  37. GOTO :END
  38. EGAFONT 3270PC.EGA
  39. GOTO :END
  40. :X
  41. EGAFONT 3270-8.EGA
  42. GOTO :END
  43. :W
  44. EGAFONT 3270.EGA
  45. GOTO :END
  46. :V
  47. EGAFONT SIDE10.EGA
  48. GOTO :END
  49. :U
  50. EGAFONT SENAPL.EGA
  51. GOTO :END
  52. :T
  53. EGAFONT SCRIPT.EGA
  54. GOTO :END
  55. :S
  56. EGAFONT PCB.EGA
  57. GOTO :END
  58. :R
  59. EGAFONT PC24.EGA
  60. GOTO :END
  61. :Q
  62. EGAFONT OLDENG.EGA
  63. GOTO :END
  64. :P
  65. EGAFONT OCR.EGA
  66. GOTO :END
  67. :O
  68. EGAFONT LPA.EGA
  69. GOTO :END
  70. :N
  71. EGAFONT ITALICS.EGA
  72. GOTO :END
  73. :M
  74. EGAFONT ITALIC.EGA
  75. GOTO :END
  76. :L
  77. EGAFONT GEORGIAN.EGA
  78. GOTO :END
  79. :K
  80. EGAFONT GAELIC.EGA
  81. GOTO :END
  82. :J
  83. EGAFONT FRAKTUR.EGA
  84. GOTO :END
  85. :I
  86. EGAFONT CNTDOWN.EGA
  87. GOTO :END
  88. :H
  89. EGAFONT APLS11.EGA
  90. GOTO :END
  91. :G
  92. EGAFONT APLS10.EGA
  93. GOTO :END
  94. :F
  95. EGAFONT APLS9.EGA
  96. GOTO :END
  97. :E
  98. EGAFONT APLS8.EGA
  99. GOTO :END
  100. :D
  101. EGAFONT APLS7.EGA
  102. GOTO :END
  103. :C
  104. EGAFONT APLS6.EGA
  105. GOTO :END
  106. :B
  107. EGAFONT APLS.EGA
  108. GOTO :END
  109. :A
  110. EGAFONT APL24.EGA
  111. GOTO :END
  112. :END
  113. POPDIR
  114. REM ═══════════════════════════════════════════════════════════════════════════
  115. REM I created this batch file to make it easier to change EGA screen fonts by
  116. REM listing all of the font options in a menu.  Select the letter of the font
  117. REM to which you wish to change the screen display.  
  118. REM 
  119. REM The menu also contains an option (9) to turn off a previously selected font
  120. REM and return to normal display.  Or you can select option 0 to exit without
  121. REM changing the screen font.
  122. REM 
  123. REM It appears that the screen font selected will be displayed in by all
  124. REM programs that use text display until EGAFONT is turned off or until the
  125. REM PC is re-booted.
  126. REM 
  127. REM The menu is normally displayed in ANSI color graphics.  If you do not wish
  128. REM to use ANSI, substitute EGAFONTS.ASC for EGAFONTS.ANS in the 5th line of 
  129. REM this file.  You can also edit/create your own custom fonts using EGAEDIT.
  130. REM 
  131. REM You might want to place EGAFONT and all the font files in a separate
  132. REM directory on your hard disk as I did and just leave EGAFONTS.BAT in a
  133. REM directory on your normal path.  If you do this, remove the "REM" from 
  134. REM lines 2 and 3 of this file and replace the drive and directory names
  135. REM with your own, if different.
  136. REM 
  137. REM The unrelated files RESPONSE.COM, PUSHDIR.COM, and POPDIR.COM are included
  138. REM for use in thsi batch file.
  139. REM 
  140. REM Have fun!
  141. REM 
  142. REM                              Marty Shannon
  143. REM                              Laser Printer Conference Sysop
  144. REM                              CooperWorks BBS (Madison, Wi)
  145. REM                              (608)251-7734
  146. REM
  147. REM                              May 9, 1987
  148. REM ═══════════════════════════════════════════════════════════════════════════
  149.