home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS 1992 June / SIMTEL_0692.cdr / msdos / trojanpr / dirtyd9c.arc / PRINTDD.BAT < prev    next >
Encoding:
DOS Batch File  |  1989-12-17  |  6.6 KB  |  239 lines
  1. echo off
  2. echo                                                 >nul
  3. echo Program -- PRINTDD.BAT                          >nul
  4. echo Version -- 1.01                                 >nul
  5. echo Purpose -- Print Dirty Dozen to Printer         >nul
  6. echo Author  -- Eric Newhouse                        >nul
  7. echo Date    -- June 9, 1989                         >nul
  8. echo (C)     -- Copyright, 1989, 1990                >nul
  9. echo                                                 >nul
  10. echo    I hereby place this BATch file into the      >nul
  11. echo public domain.                                  >nul
  12. echo                                                 >nul
  13. cls
  14.  
  15. if not exist ECHOB.COM goto NoEchoB
  16. if not exist GET.EXE goto NoGet
  17. if not exist LIST.COM goto NoList
  18. goto Begin
  19.  
  20. :NoEchob
  21. echo 
  22. echo   ECHOB.COM must be in the Path.  Aborting.
  23. echo 
  24. Goto Absolute_End
  25.  
  26. :NoGet
  27. echob
  28. echo   GET.EXE must be in the Path.  Aborting.
  29. echob
  30. Goto Absolute_End
  31.  
  32. :NoList
  33. echob
  34. echo   LIST.COM must be in the Path.  Aborting.
  35. echob
  36. Goto Absolute_End
  37.  
  38. :Begin
  39. echob
  40. echo        This Batch File prints the Dirty Dozen to your
  41. echo   printer.  Set your printer fonts prior to running this.
  42. echob
  43. echo        Feel free to modify this batch file to include a
  44. echo   print spooler, such as DOS's PRINT.COM, if it suits you.
  45. echo   As it is, PRINTDD uses 'Type }prn' to print.  This is
  46. echo   undoubtably the most crude method of printing a document,
  47. echo   but in the interests of compatibility, I have adopted it.
  48. echob
  49. echo        Hit ^C at any time during printing to abort.
  50. echob
  51. echo        At each prompt you have four options:
  52. echob
  53. echo         Y  -  Yes
  54. echo         N  -  No
  55. echo     [ESC]  -  Quit to DOS, Abort Batch
  56. echo   [ENTER]  -  Yes (Default)
  57. echob
  58. echo        Please confirm that your printer is ONLINE.
  59. echob
  60. echob
  61. get n "  Do you want to print the whole Dirty Dozen List [Y,n]? "
  62. if %get%==N goto Introduction
  63. if %get%==~ goto Absolute_End
  64.  
  65. :PrintAll
  66. echo   UNUSED LABEL >nul
  67. echob
  68. get ce "Hit a key to begin printing everything . . . "
  69. cls
  70. echob
  71. echo Printing Introduction               (1/16)  . . .
  72. type Intro.dd    >prn
  73. echo Printing Definitions                (2/16)  . . .
  74. type Define.dd   >prn
  75. echo Printing What's New                 (3/16)  . . .
  76. type Whatsnew.dd >prn
  77. echo Printing Prevention Measures        (4/16)  . . .
  78. type Prevent.dd  >prn
  79. echo Printing Virus Recovery Steps       (5/16)  . . .
  80. type VRecover.dd >prn
  81. echo Printing Trojan Recovery Steps      (6/16)  . . .
  82. type TRecover.dd >prn
  83. echo Printing Protection Program Info    (7/16)  . . .
  84. type Protect.dd  >prn
  85. echo Printing Virus List                 (8/16)  . . .
  86. type Virus.dd    >prn
  87. echo Printing Trojan Horse List          (9/16)  . . .
  88. type Trojan.dd   >prn
  89. echo Printing Commercial List            (10/16) . . .
  90. type Pirate.dd   >prn
  91. echo Printing Miscellaneous/Hacked List  (11/16) . . .
  92. type HackMisc.dd >prn
  93. echo Printing Acknowledgements           (12/16) . . .
  94. type Acknowl.dd  >prn
  95. echo Printing Glossary                   (13/16) . . .
  96. type Glossary.dd >prn
  97. echo Printing Update History             (14/16) . . .
  98. type History.dd  >prn
  99. echo Mailing List Information            (15/16) . . .
  100. type Mail-Lst.dd >prn
  101. echo Printing Update Information         (16/16) . . .
  102. type Update.dd   >prn
  103. echob
  104. goto Absolute_End
  105.  
  106. :Introduction
  107. echob
  108. get n "  Do you want to print the Introduction                    (1/16)   [Y,n]? "
  109. if %get%==N goto Definitions
  110. if %get%==~ goto Absolute_End
  111. type Intro.dd >prn
  112. echob
  113.  
  114. :Definitions
  115. echob
  116. get n "  Do you want to print important Definitions (ie. Virus)   (2/16)   [Y,n]? "
  117. if %get%==N goto WhatsNew
  118. if %get%==~ goto Absolute_End
  119. type Define.dd >prn
  120. echob
  121.  
  122. :WhatsNew
  123. echob
  124. get n "  Do you want to print What's New since last version       (3/16)   [Y,n]? "
  125. if %get%==N goto Prevent_Virus_Trojan
  126. if %get%==~ goto Absolute_End
  127. type WhatsNew.dd >prn
  128. echob
  129.  
  130. :Prevent_Virus_Trojan
  131. echob
  132. get n "  Do you want to print how to prevent Viruses and Trojans  (4/16)   [Y,n]? "
  133. if %get%==N goto Virus_Recovery
  134. if %get%==~ goto Absolute_End
  135. type Prevent.dd >prn
  136. echob
  137.  
  138. :Virus_Recovery
  139. echob
  140. get n "  Do you want to print Virus Recovery Steps                (5/16)   [Y,n]? "
  141. if %get%==N goto Trojan_Recovery
  142. if %get%==~ goto Absolute_End
  143. type VRecover.dd >prn
  144. echob
  145.  
  146. :Trojan_Recovery
  147. echob
  148. get n "  Do you want to print Trojan Horse Recovery Steps         (6/16)   [Y,n]? "
  149. if %get%==N goto Protection_Programs
  150. if %get%==~ goto Absolute_End
  151. type TRecover.dd >prn
  152. echob
  153.  
  154. :Protection_Programs
  155. echob
  156. get n "  Do you want to print Protection Program Information      (7/16)   [Y,n]? "
  157. if %get%==N goto Virus_List
  158. if %get%==~ goto Absolute_End
  159. type Protect.dd >prn
  160. echob
  161.  
  162. :Virus_List
  163. echob
  164. get n "  Do you want to print the Virus List                      (8/16)   [Y,n]? "
  165. if %get%==N goto Trojan_List
  166. if %get%==~ goto Absolute_End
  167. type Virus.dd >prn
  168. echob
  169.  
  170. :Trojan_List
  171. echob
  172. get n "  Do you want to print the Trojan Horse List               (9/16)   [Y,n]? "
  173. if %get%==N goto Commercial_List
  174. if %get%==~ goto Absolute_End
  175. type Trojan.dd >prn
  176. echob
  177.  
  178. :Commercial_List
  179. echob
  180. get n "  Do you want to print the Commercial Software List        (10/16)  [Y,n]? "
  181. if %get%==N goto Hacked_Misc_List
  182. if %get%==~ goto Absolute_End
  183. type Pirate.dd >prn
  184. echob
  185.  
  186. :Hacked_Misc_List
  187. echob
  188. get n "  Do you want to print the Miscellaneous/Hacked List       (11/16)  [Y,n]? "
  189. if %get%==N goto Acknowledgements
  190. if %get%==~ goto Absolute_End
  191. type HackMisc.dd >prn
  192. echob
  193.  
  194. :Acknowledgements
  195. echob
  196. get n "  Do you want to print Acknowledgements                    (12/16)  [Y,n]? "
  197. if %get%==N goto Glossary
  198. if %get%==~ goto Absolute_End
  199. type Acknowl.dd >prn
  200. echob            
  201.                  
  202. :Glossary
  203. echob
  204. get n "  Do you want to print the Glossary                        (13/16)  [Y,n]? "
  205. if %get%==N goto Update_History
  206. if %get%==~ goto Absolute_End
  207. type Glossary.dd >prn
  208. echob  
  209.                              
  210. :Update_History
  211. echob
  212. get n "  Do you want to print the Update History                  (14/16)  [Y,n]? "
  213. if %get%==N goto Mailing_List
  214. if %get%==~ goto Absolute_End
  215. type History.dd >prn
  216. echob
  217.  
  218. :Mailing_List
  219. echob
  220. get n "  Do you want to read how to join the Mailing List         (15/16)  [Y,n]? "
  221. if %get%==N goto Updates
  222. if %get%==~ goto Absolute_End
  223. List Mail-Lst.dd
  224. echob
  225.  
  226. :Updates
  227. echob
  228. get n "  Do you want to print how to send in Dirty Dozen Updates  (16/16)  [Y,n]? "
  229. if %get%==N goto Absolute_End
  230. if %get%==~ goto Absolute_End
  231. type Update.dd >prn
  232.  
  233. :Absolute_End
  234. echo 
  235. echo 
  236. echo   Thank You for printing the Dirty Dozen!
  237. echo 
  238. echo 
  239.