home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1994 #1 / monster.zip / monster / PCBOARD / PROPCK31.ZIP / PACKALL.BAT < prev    next >
DOS Batch File  |  1990-06-07  |  10KB  |  397 lines
  1. rem PackAll.BAT generated by ProSM
  2. echo off
  3. echo. >>PACKALL.LOG
  4. tm "Packall Started" >>PACKALL.LOG
  5. goto F%1
  6. :F
  7.  
  8. :F0
  9. td propack U:\PCB\MAIN\MSGS 800 /eltn360kw >>PACKALL.LOG
  10. if errorlevel 1 goto exit
  11. if L%2 == L0 goto exit
  12.  
  13. :F1
  14. td propack U:\PCB\TOOLS\TOOLS 200 /eltn360kw >>PACKALL.LOG
  15. if errorlevel 1 goto exit
  16. if L%2 == L1 goto exit
  17.  
  18. :F2
  19. td propack U:\PCB\SUPPORT\SUPPORT 800 /eltn360kw >>PACKALL.LOG
  20. if errorlevel 1 goto exit
  21. if L%2 == L2 goto exit
  22.  
  23. :F3
  24. td propack U:\PCB\AI\AI 200 /eltn360kw >>PACKALL.LOG
  25. if errorlevel 1 goto exit
  26. if L%2 == L3 goto exit
  27.  
  28. :F4
  29. td propack U:\PCB\ST\ST 200 /eltn360kw >>PACKALL.LOG
  30. if errorlevel 1 goto exit
  31. if L%2 == L4 goto exit
  32.  
  33. :F5
  34. td propack U:\PCB\IBM\IBM 200 /eltn360kw >>PACKALL.LOG
  35. if errorlevel 1 goto exit
  36. if L%2 == L5 goto exit
  37.  
  38. :F6
  39. td propack U:\PCB\PHOTO\PHOTO 200 /eltn360kw >>PACKALL.LOG
  40. if errorlevel 1 goto exit
  41. if L%2 == L6 goto exit
  42.  
  43. :F7
  44. td propack U:\PCB\SN-SYSOP\SN-SYSOP 200 /eltn360kw >>PACKALL.LOG
  45. if errorlevel 1 goto exit
  46. if L%2 == L7 goto exit
  47.  
  48. :F8
  49. td propack U:\PCB\SN-ADMIN\SN-ADMIN 200 /eltn360kw >>PACKALL.LOG
  50. if errorlevel 1 goto exit
  51. if L%2 == L8 goto exit
  52.  
  53. :F9
  54. td propack U:\PCB\IL-ADMIN\IL-ADMIN 200 /eltn360kw >>PACKALL.LOG
  55. if errorlevel 1 goto exit
  56. if L%2 == L9 goto exit
  57.  
  58. :F10
  59. td propack U:\PCB\TELIX\TELIX 200 /eltn360kw >>PACKALL.LOG
  60. if errorlevel 1 goto exit
  61. if L%2 == L10 goto exit
  62.  
  63. :F11
  64. td propack U:\PCB\QMODEM\QMODEM 200 /eltn360kw >>PACKALL.LOG
  65. if errorlevel 1 goto exit
  66. if L%2 == L11 goto exit
  67.  
  68. :F12
  69. td propack U:\PCB\ADA\ADA 200 /eltn360kw >>PACKALL.LOG
  70. if errorlevel 1 goto exit
  71. if L%2 == L12 goto exit
  72.  
  73. :F13
  74. td propack U:\PCB\PASCAL\PASCAL 200 /eltn360kw >>PACKALL.LOG
  75. if errorlevel 1 goto exit
  76. if L%2 == L13 goto exit
  77.  
  78. :F14
  79. td propack U:\PCB\C-LANG\C-LANG 200 /eltn360kw >>PACKALL.LOG
  80. if errorlevel 1 goto exit
  81. if L%2 == L14 goto exit
  82.  
  83. :F15
  84. td propack U:\PCB\BASIC\BASIC 200 /eltn360kw >>PACKALL.LOG
  85. if errorlevel 1 goto exit
  86. if L%2 == L15 goto exit
  87.  
  88. :F16
  89. td propack U:\PCB\CD-ROM\CD-ROM 200 /eltn360kw >>PACKALL.LOG
  90. if errorlevel 1 goto exit
  91. if L%2 == L16 goto exit
  92.  
  93. :F17
  94. td propack U:\PCB\ASM\ASM 200 /eltn360kw >>PACKALL.LOG
  95. if errorlevel 1 goto exit
  96. if L%2 == L17 goto exit
  97.  
  98. :F18
  99. td propack U:\PCB\HARDDISK\HARDDISK 200 /eltn360kw >>PACKALL.LOG
  100. if errorlevel 1 goto exit
  101. if L%2 == L18 goto exit
  102.  
  103. :F19
  104. td propack U:\PCB\PKWARE\PKWARE 200 /eltn360kw >>PACKALL.LOG
  105. if errorlevel 1 goto exit
  106. if L%2 == L19 goto exit
  107.  
  108. :F20
  109. td propack U:\PCB\OS2\OS2 200 /eltn360kw >>PACKALL.LOG
  110. if errorlevel 1 goto exit
  111. if L%2 == L20 goto exit
  112.  
  113. :F21
  114. td propack U:\PCB\HAYES\HAYES 200 /eltn360kw >>PACKALL.LOG
  115. if errorlevel 1 goto exit
  116. if L%2 == L21 goto exit
  117.  
  118. :F22
  119. td propack U:\PCB\MODEMING\MODEMING 200 /eltn360kw >>PACKALL.LOG
  120. if errorlevel 1 goto exit
  121. if L%2 == L22 goto exit
  122.  
  123. :F23
  124. td propack U:\PCB\HST\HST 200 /eltn360kw >>PACKALL.LOG
  125. if errorlevel 1 goto exit
  126. if L%2 == L23 goto exit
  127.  
  128. :F24
  129. td propack U:\PCB\UNIX\UNIX 200 /eltn360kw >>PACKALL.LOG
  130. if errorlevel 1 goto exit
  131. if L%2 == L24 goto exit
  132.  
  133. :F25
  134. td propack U:\PCB\DESKTOP\DESKTOP 200 /eltn360kw >>PACKALL.LOG
  135. if errorlevel 1 goto exit
  136. if L%2 == L25 goto exit
  137.  
  138. :F26
  139. td propack U:\PCB\CONSULT\CONSULT 200 /eltn360kw >>PACKALL.LOG
  140. if errorlevel 1 goto exit
  141. if L%2 == L26 goto exit
  142.  
  143. :F27
  144. td propack U:\PCB\DSZ-OMEN\DSZ-OMEN 200 /eltn360kw >>PACKALL.LOG
  145. if errorlevel 1 goto exit
  146. if L%2 == L27 goto exit
  147.  
  148. :F28
  149. td propack U:\PCB\WRITERS\WRITERS 200 /eltn360kw >>PACKALL.LOG
  150. if errorlevel 1 goto exit
  151. if L%2 == L28 goto exit
  152.  
  153. :F29
  154. td propack U:\PCB\WORDPROC\WORDPROC 200 /eltn360kw >>PACKALL.LOG
  155. if errorlevel 1 goto exit
  156. if L%2 == L29 goto exit
  157.  
  158. :F30
  159. td propack U:\PCB\INVESTOR\INVESTOR 200 /eltn360kw >>PACKALL.LOG
  160. if errorlevel 1 goto exit
  161. if L%2 == L30 goto exit
  162.  
  163. :F31
  164. td propack U:\PCB\SPACE\SPACE 200 /eltn360kw >>PACKALL.LOG
  165. if errorlevel 1 goto exit
  166. if L%2 == L31 goto exit
  167.  
  168. :F32
  169. td propack U:\PCB\PCBDOORS\PCBDOORS 200 /eltn360kw >>PACKALL.LOG
  170. if errorlevel 1 goto exit
  171. if L%2 == L32 goto exit
  172.  
  173. :F33
  174. td propack U:\PCB\SN-DOORS\SN-DOORS 200 /eltn360kw >>PACKALL.LOG
  175. if errorlevel 1 goto exit
  176. if L%2 == L33 goto exit
  177.  
  178. :F34
  179. td propack U:\PCB\OPINION\OPINION 200 /eltn360kw >>PACKALL.LOG
  180. if errorlevel 1 goto exit
  181. if L%2 == L34 goto exit
  182.  
  183. :F35
  184. td propack U:\PCB\DESQVIEW\DESQVIEW 200 /eltn360kw >>PACKALL.LOG
  185. if errorlevel 1 goto exit
  186. if L%2 == L35 goto exit
  187.  
  188. :F36
  189. td propack U:\PCB\SHARWARE\SHARWARE 200 /eltn360kw >>PACKALL.LOG
  190. if errorlevel 1 goto exit
  191. if L%2 == L36 goto exit
  192.  
  193. :F37
  194. td propack U:\PCB\VENDORS\VENDORS 200 /eltn360kw >>PACKALL.LOG
  195. if errorlevel 1 goto exit
  196. if L%2 == L37 goto exit
  197.  
  198. :F38
  199. td propack U:\PCB\VIRUS\VIRUS 200 /eltn360kw >>PACKALL.LOG
  200. if errorlevel 1 goto exit
  201. if L%2 == L38 goto exit
  202.  
  203. :F39
  204. td propack U:\PCB\PATENTS\PATENTS 200 /eltn360kw >>PACKALL.LOG
  205. if errorlevel 1 goto exit
  206. if L%2 == L39 goto exit
  207.  
  208. :F40
  209. td propack U:\PCB\RLYCOMMO\RLYCOMMO 200 /eltn360kw >>PACKALL.LOG
  210. if errorlevel 1 goto exit
  211. if L%2 == L40 goto exit
  212.  
  213. :F41
  214. td propack U:\PCB\NETUSERS\NETUSERS 200 /eltn360kw >>PACKALL.LOG
  215. if errorlevel 1 goto exit
  216. if L%2 == L41 goto exit
  217.  
  218. :F42
  219. td propack U:\PCB\HARDWARE\HARDWARE 200 /eltn360kw >>PACKALL.LOG
  220. if errorlevel 1 goto exit
  221. if L%2 == L42 goto exit
  222.  
  223. :F43
  224. td propack U:\PCB\TPTC\TPTC 200 /eltn360kw >>PACKALL.LOG
  225. if errorlevel 1 goto exit
  226. if L%2 == L43 goto exit
  227.  
  228. :F44
  229. td propack U:\PCB\QMAIL\QMAIL 200 /eltn360kw >>PACKALL.LOG
  230. if errorlevel 1 goto exit
  231. if L%2 == L44 goto exit
  232.  
  233. :F45
  234. td propack U:\PCB\EZREADER\EZREADER 200 /eltn360kw >>PACKALL.LOG
  235. if errorlevel 1 goto exit
  236. if L%2 == L45 goto exit
  237.  
  238. :F46
  239. td propack U:\PCB\HAMRADIO\HAMRADIO 200 /eltn360kw >>PACKALL.LOG
  240. if errorlevel 1 goto exit
  241. if L%2 == L46 goto exit
  242.  
  243. :F47
  244. td propack U:\PCB\DISABLED\DISABLED 200 /eltn360kw >>PACKALL.LOG
  245. if errorlevel 1 goto exit
  246. if L%2 == L47 goto exit
  247.  
  248. :F48
  249. td propack U:\PCB\COMEDY\COMEDY 200 /eltn360kw >>PACKALL.LOG
  250. if errorlevel 1 goto exit
  251. if L%2 == L48 goto exit
  252.  
  253. :F49
  254. td propack U:\PCB\FORSALE\FORSALE 200 /eltn360kw >>PACKALL.LOG
  255. if errorlevel 1 goto exit
  256. if L%2 == L49 goto exit
  257.  
  258. :F50
  259. td propack U:\PCB\WORKHOME\WORKHOME 200 /eltn360kw >>PACKALL.LOG
  260. if errorlevel 1 goto exit
  261. if L%2 == L50 goto exit
  262.  
  263. :F51
  264. td propack U:\PCB\CP-M\CP-M 200 /eltn360kw >>PACKALL.LOG
  265. if errorlevel 1 goto exit
  266. if L%2 == L51 goto exit
  267.  
  268. :F52
  269. td propack U:\PCB\POLITICS\POLITICS 200 /eltn360kw >>PACKALL.LOG
  270. if errorlevel 1 goto exit
  271. if L%2 == L52 goto exit
  272.  
  273. :F53
  274. td propack U:\PCB\RELIGION\RELIGION 200 /eltn360kw >>PACKALL.LOG
  275. if errorlevel 1 goto exit
  276. if L%2 == L53 goto exit
  277.  
  278. :F54
  279. td propack U:\PCB\PHILSPHY\PHILSPHY 200 /eltn360kw >>PACKALL.LOG
  280. if errorlevel 1 goto exit
  281. if L%2 == L54 goto exit
  282.  
  283. :F55
  284. td propack U:\PCB\TRANSATL\TRANSATL 200 /eltn360kw >>PACKALL.LOG
  285. if errorlevel 1 goto exit
  286. if L%2 == L55 goto exit
  287.  
  288. :F56
  289. td propack U:\PCB\BBS-ADS\BBS-ADS 200 /eltn360kw >>PACKALL.LOG
  290. if errorlevel 1 goto exit
  291. if L%2 == L56 goto exit
  292.  
  293. :F57
  294. td propack U:\PCB\IL-SYSOP\IL-SYSOP 200 /eltn360kw >>PACKALL.LOG
  295. if errorlevel 1 goto exit
  296. if L%2 == L57 goto exit
  297.  
  298. :F58
  299. td propack U:\PCB\PHOENIX\PHOENIX 200 /eltn360kw >>PACKALL.LOG
  300. if errorlevel 1 goto exit
  301. if L%2 == L58 goto exit
  302.  
  303. :F59
  304. td propack U:\PCB\NETMAIL\NETMAIL 200 /eltn360kw >>PACKALL.LOG
  305. if errorlevel 1 goto exit
  306. if L%2 == L59 goto exit
  307.  
  308. :F60
  309. td propack U:\PCB\BOOSTERS\BOOSTERS 800 /eltn360kw >>PACKALL.LOG
  310. if errorlevel 1 goto exit
  311. if L%2 == L60 goto exit
  312.  
  313. :F61
  314. td propack U:\PCB\HM-LANG\HM-LANG 200 /eltn360kw >>PACKALL.LOG
  315. if errorlevel 1 goto exit
  316. if L%2 == L61 goto exit
  317.  
  318. :F62
  319. td propack U:\PCB\HM-SYSOP\HM-SYSOP 200 /eltn360kw >>PACKALL.LOG
  320. if errorlevel 1 goto exit
  321. if L%2 == L62 goto exit
  322.  
  323. :F63
  324. td propack U:\PCB\FORTH\FORTH 200 /eltn360kw >>PACKALL.LOG
  325. if errorlevel 1 goto exit
  326. if L%2 == L63 goto exit
  327.  
  328. :F64
  329. td propack U:\PCB\4DOS\4DOS 200 /eltn360kw >>PACKALL.LOG
  330. if errorlevel 1 goto exit
  331. if L%2 == L64 goto exit
  332.  
  333. :F65
  334. td propack U:\PCB\QEDIT\QEDIT 200 /eltn360kw >>PACKALL.LOG
  335. if errorlevel 1 goto exit
  336. if L%2 == L65 goto exit
  337.  
  338. :F66
  339. td propack U:\PCB\SCIENCE\SCIENCE 200 /eltn360kw >>PACKALL.LOG
  340. if errorlevel 1 goto exit
  341. if L%2 == L66 goto exit
  342.  
  343. :F67
  344. td propack U:\PCB\DSP\DSP 200 /eltn360kw >>PACKALL.LOG
  345. if errorlevel 1 goto exit
  346. if L%2 == L67 goto exit
  347.  
  348. :F68
  349. td propack U:\PCB\OOPS\OOPS 200 /eltn360kw >>PACKALL.LOG
  350. if errorlevel 1 goto exit
  351. if L%2 == L68 goto exit
  352.  
  353. :F69
  354. td propack U:\PCB\DRWHO\DRWHO 200 /eltn360kw >>PACKALL.LOG
  355. if errorlevel 1 goto exit
  356. if L%2 == L69 goto exit
  357.  
  358. :F70
  359. td propack U:\PCB\SOM-MAIN\SOM-MAIN 200 /eltn360kw >>PACKALL.LOG
  360. if errorlevel 1 goto exit
  361. if L%2 == L70 goto exit
  362.  
  363. :F71
  364. td propack U:\PCB\BRIEF\BRIEF 200 /eltn360kw >>PACKALL.LOG
  365. if errorlevel 1 goto exit
  366. if L%2 == L71 goto exit
  367.  
  368. :F72
  369. td propack U:\PCB\LANTASTI\LANTASTI 200 /eltn360kw >>PACKALL.LOG
  370. if errorlevel 1 goto exit
  371. if L%2 == L72 goto exit
  372.  
  373. :F73
  374. td propack U:\PCB\AMIGA\AMIGA 200 /eltn360kw >>PACKALL.LOG
  375. if errorlevel 1 goto exit
  376. if L%2 == L73 goto exit
  377.  
  378. :F74
  379. td propack U:\PCB\MACINTOS\MACINTOS 200 /eltn360kw >>PACKALL.LOG
  380. if errorlevel 1 goto exit
  381. if L%2 == L74 goto exit
  382.  
  383. :F75
  384. td propack U:\PCB\-UNDEF-\-UNDEF- 200 /eltn360kw >>PACKALL.LOG
  385. if errorlevel 1 goto exit
  386. if L%2 == L75 goto exit
  387.  
  388. :F76
  389. td propack U:\PCB\-UNDEF-\-UNDEF- 200 /eltn360kw >>PACKALL.LOG
  390. if errorlevel 1 goto exit
  391. if L%2 == L76 goto exit
  392.  
  393. :exit
  394. echo. >>PACKALL.LOG
  395. tm "Packall Ended" >>PACKALL.LOG
  396. echo ---------- >>PACKALL.LOG
  397.