home *** CD-ROM | disk | FTP | other *** search
/ Win 3.11 Apps / win311aps.iso / HJPW / RESETPCL.BA_ / RESETPCL.BA
Text File  |  1995-05-15  |  4KB  |  155 lines
  1. echo off
  2. if "%1" == "" goto NoWindows
  3. if "%2" == "" goto NoHJPRO
  4. if "%2" == "NETWORK" goto Network
  5. if "%2" == "Network" goto Network
  6. if "%2" == "network" goto Network
  7. REM Windows and HJPRO given
  8. echo Clearing all downloaded PCL Soft Fonts from the HJPRO directory (%2)
  9. echo and the Windows directory (%1) ...
  10. REM 1) Save Factory fonts ...
  11. ren %2\DEFAULT.TPF *.tpb
  12. ren %2\SIMPLEX.TPF *.tpb
  13. ren %2\TRIPLEX.TPF *.tpb
  14. ren %2\OLDENG.TPF *.tpb
  15. ren %2\TRUMBULL.TPF *.tpb
  16. ren %2\CANAAN.TPF *.tpb
  17. ren %2\SHERMAN.TPF *.tpb
  18. ren %2\IBMPC.TPF *.tpb
  19. ren %2\IBMPCCRS.TPF *.tpb
  20. ren %2\IBMPCMED.TPF *.tpb
  21. ren %2\IBMPCBLD.TPF *.tpb
  22. ren %2\CAD.TPF *.tpb
  23. ren %2\PLOTTER.TPF *.tpb
  24. ren %2\COURIER0.TPF *.tpb
  25. ren %2\COURIER1.TPF *.tpb
  26. ren %2\COURIER2.TPF *.tpb
  27. ren %2\COURIER3.TPF *.tpb
  28. ren %2\COURIER4.TPF *.tpb
  29. ren %2\COURIER5.TPF *.tpb
  30. ren %2\COURIER6.TPF *.tpb
  31. ren %2\COURIER7.TPF *.tpb
  32. ren %2\LNPRINT0.TPF *.tpb
  33. ren %2\LNPRINT1.TPF *.tpb
  34. ren %2\LNPRINT2.TPF *.tpb
  35. ren %2\LNPRINT3.TPF *.tpb
  36. ren %2\COURIER8.TPF *.tpb
  37. ren %2\COURIER9.TPF *.tpb
  38. ren %2\COURIE10.TPF *.tpb
  39. ren %2\COURIE11.TPF *.tpb
  40. ren %2\COURIE12.TPF *.tpb
  41. ren %2\COURIE13.TPF *.tpb
  42. ren %2\COURIE14.TPF *.tpb
  43. ren %2\COURIE15.TPF *.tpb
  44. ren %2\LNPRINT4.TPF *.tpb
  45. ren %2\LNPRINT5.TPF *.tpb
  46. ren %2\LNPRINT6.TPF *.tpb
  47. ren %2\LNPRINT7.TPF *.tpb
  48. REM 2) Delete the remaining downloaded fonts ...
  49. del %1\*.tpf
  50. del %2\*.tpf
  51. REM 3) Restore Factory fonts ...
  52. ren %2\*.tpb *.tpf
  53. REM 4) Restore Factory Font Header
  54. del %1\softfnt.hdr
  55. del %2\softfnt.hdr
  56. copy %2\softfnt.org %2\*.hdr
  57. REM 5) Adjust the set file
  58. if not exist %2\hjpro.set goto WinSetOnly
  59. cleartag PCLLF* %2\hjpro.set
  60. cleartag PCLSF* %2\hjpro.set
  61. echo PCLSFDEFAULT=COURIER0>> %2\hjpro.set
  62. :WinSetOnly
  63. if not exist %1\hjpro.set goto End
  64. cleartag PCLLF* %1\hjpro.set
  65. cleartag PCLSF* %1\hjpro.set
  66. echo PCLSFDEFAULT=COURIER0>> %1\hjpro.set
  67. goto End
  68. :NoHJPRO
  69. REM Windows given, HJPRO assumed current
  70. echo Clearing all downloaded PCL Soft Fonts from the HJPRO directory
  71. echo and the Windows directory (%1) ...
  72. REM 1) Save Factory fonts ...
  73. ren DEFAULT.TPF *.tpb
  74. ren SIMPLEX.TPF *.tpb
  75. ren TRIPLEX.TPF *.tpb
  76. ren OLDENG.TPF *.tpb
  77. ren TRUMBULL.TPF *.tpb
  78. ren CANAAN.TPF *.tpb
  79. ren SHERMAN.TPF *.tpb
  80. ren IBMPC.TPF *.tpb
  81. ren IBMPCCRS.TPF *.tpb
  82. ren IBMPCMED.TPF *.tpb
  83. ren IBMPCBLD.TPF *.tpb
  84. ren CAD.TPF *.tpb
  85. ren PLOTTER.TPF *.tpb
  86. ren COURIER0.TPF *.tpb
  87. ren COURIER1.TPF *.tpb
  88. ren COURIER2.TPF *.tpb
  89. ren COURIER3.TPF *.tpb
  90. ren COURIER4.TPF *.tpb
  91. ren COURIER5.TPF *.tpb
  92. ren COURIER6.TPF *.tpb
  93. ren COURIER7.TPF *.tpb
  94. ren LNPRINT0.TPF *.tpb
  95. ren LNPRINT1.TPF *.tpb
  96. ren LNPRINT2.TPF *.tpb
  97. ren LNPRINT3.TPF *.tpb
  98. ren COURIER8.TPF *.tpb
  99. ren COURIER9.TPF *.tpb
  100. ren COURIE10.TPF *.tpb
  101. ren COURIE11.TPF *.tpb
  102. ren COURIE12.TPF *.tpb
  103. ren COURIE13.TPF *.tpb
  104. ren COURIE14.TPF *.tpb
  105. ren COURIE15.TPF *.tpb
  106. ren LNPRINT4.TPF *.tpb
  107. ren LNPRINT5.TPF *.tpb
  108. ren LNPRINT6.TPF *.tpb
  109. ren LNPRINT7.TPF *.tpb
  110. REM 2) Delete the remaining downloaded fonts ...
  111. del %1\*.tpf
  112. del *.tpf
  113. REM 3) Restore Factory fonts ...
  114. ren *.tpb *.tpf
  115. REM 4) Restore Factory Font Header
  116. del %1\softfnt.hdr
  117. del softfnt.hdr
  118. copy softfnt.org *.hdr
  119. REM 5) Adjust the set file
  120. if not exist hjpro.set goto WinSet2Only
  121. cleartag PCLLF* hjpro.set
  122. cleartag PCLSF* hjpro.set
  123. echo PCLSFDEFAULT=COURIER0>> hjpro.set
  124. :WinSet2Only
  125. if not exist %2\hjpro.set goto End
  126. cleartag PCLLF* %1\hjpro.set
  127. cleartag PCLSF* %1\hjpro.set
  128. echo PCLSFDEFAULT=COURIER0>> %1\hjpro.set
  129. goto End
  130. :Network
  131. REM Windows given, HJPRO is on network
  132. echo Clearing all downloaded PCL Soft Fonts from the Windows directory (%1) ...
  133. REM 1) Delete the downloaded fonts ...
  134. del %1\*.tpf
  135. REM 4) Restore Factory Font Header
  136. del %1\softfnt.hdr
  137. REM 5) Adjust the set file
  138. if not exist %1\hjpro.set goto End
  139. cleartag PCLLF* %1\hjpro.set
  140. cleartag PCLSF* %1\hjpro.set
  141. echo PCLSFDEFAULT=COURIER0>> %1\hjpro.set
  142. goto End
  143. :NoWindows
  144. REM Windows and HJPRO not given
  145. echo USAGE:
  146. echo       CLEARPCL [WindowsDirectory] {HJPRODirectory}
  147. echo Where:
  148. echo       WindowsDirectory  is the path where your WIN.INI file is
  149. echo       HJPRODirectory    is the path where HJPRO is installed
  150. echo NOTE:
  151. echo You must specify a WindowsDirectory, HJPRODirectory is optional.
  152. echo For network installations, use NETWORK as the HJPRODirectory.
  153. goto End
  154. :End
  155.