home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 1995 April / pcw-0495.bin / covdisk / pcw.bat
DOS Batch File  |  1995-02-05  |  4KB  |  185 lines
  1. @echo off
  2.  
  3. :start
  4.  
  5. cls
  6. echo                       PERSONAL COMPUTER WORLD COVER DISK
  7. echo                         APRIL 1995 (c) VNU PUBLISHING
  8. echo"
  9. echo Welcome to the latest Personal Computer World Cover disk. This month we have an
  10. echo exclusive new Comic Relief screen saver for Windows, which is encrypted but can
  11. echo be unlocked over  the phone for £7.99,  of which,  over 65% of the ex-VAT price
  12. echo goes to Comic Relief, helping some of the poorest people in Africa and the UK.
  13. echo"
  14. echo"
  15. echo"
  16. echo"
  17. echo"
  18. echo"
  19. echo"
  20. echo"
  21. echo"
  22. echo"
  23. echo"
  24. echo"
  25. echo Plus there are two sets of Visual Basic Listings from articles in this issue of
  26. echo the magazine,  and three handy and  powerful utilities;  CRC - to check whether
  27. echo your files have changed (by even one bit),  ICE - for compacting and scrambling
  28. echo COM files  so that  they cannot be  easily debugged  but still run,  and SIZE a
  29. echo comprehensive utility to return all sorts of file size information.
  30.  
  31. :comicrel
  32.  
  33. \covdisk\comicrel\getopt "Install to which drive?" "  C:" "  D:" "  E:" "  F:" "  G:" "Cancel Installation"
  34.  
  35. if errorlevel=6 goto exit
  36. if errorlevel=5 goto cr_g
  37. if errorlevel=4 goto cr_f
  38. if errorlevel=3 goto cr_e
  39. if errorlevel=2 goto cr_d
  40. if errorlevel=1 goto cr_c
  41. goto exit
  42.  
  43. :cr_c
  44.  
  45. cls
  46. md c:\pcw
  47. md c:\pcw\accole
  48. md c:\pcw\utils
  49. md c:\pcw\utils\crc
  50. md c:\pcw\utils\ice
  51. md c:\pcw\utils\size
  52. md c:\pcw\vbhands
  53. md c:\red_nose
  54.  
  55. echo"
  56. echo Installing...
  57. echo"
  58. \covdisk\magazine\accole c:\pcw\accole\
  59. \covdisk\utils\cyclic c:\pcw\utils\crc\
  60. \covdisk\utils\encrypt c:\pcw\utils\ice\
  61. \covdisk\utils\disksize c:\pcw\utils\size\
  62. \covdisk\magazine\vbhands c:\pcw\vbhands\
  63. \covdisk\comicrel\comicrel \covdisk\comicrel\comicrel c:\red_nose\
  64.  
  65. c:
  66. cd\red_nose
  67. buyme
  68. goto exit
  69.  
  70. :cr_d
  71.  
  72. cls
  73. md d:\pcw
  74. md d:\pcw\accole
  75. md d:\pcw\utils
  76. md d:\pcw\utils\crc
  77. md d:\pcw\utils\ice
  78. md d:\pcw\utils\size
  79. md d:\pcw\vbhands
  80. md d:\red_nose
  81.  
  82. echo"
  83. echo Installing...
  84. echo"
  85. \covdisk\magazine\accole d:\pcw\accole\
  86. \covdisk\utils\cyclic d:\pcw\utils\crc\
  87. \covdisk\utils\encrypt d:\pcw\utils\ice\
  88. \covdisk\utils\disksize d:\pcw\utils\size\
  89. \covdisk\magazine\vbhands d:\pcw\vbhands\
  90. \covdisk\comicrel\comicrel \covdisk\comicrel\comicrel d:\red_nose\
  91.  
  92. d:
  93. cd\red_nose
  94. buyme
  95. goto exit
  96.  
  97. :cr_e
  98.  
  99. cls
  100. md e:\pcw
  101. md e:\pcw\accole
  102. md e:\pcw\utils
  103. md e:\pcw\utils\crc
  104. md e:\pcw\utils\ice
  105. md e:\pcw\utils\size
  106. md e:\pcw\vbhands
  107. md e:\red_nose
  108.  
  109. echo"
  110. echo Installing...
  111. echo"
  112. \covdisk\magazine\accole e:\pcw\accole\
  113. \covdisk\utils\cyclic e:\pcw\utils\crc\
  114. \covdisk\utils\encrypt e:\pcw\utils\ice\
  115. \covdisk\utils\disksize e:\pcw\utils\size\
  116. \covdisk\magazine\vbhands e:\pcw\vbhands\
  117. \covdisk\comicrel\comicrel \covdisk\comicrel\comicrel e:\red_nose\
  118.  
  119. e:
  120. cd\red_nose
  121. buyme
  122. goto exit
  123.  
  124. :cr_f
  125.  
  126. cls
  127. md f:\pcw
  128. md f:\pcw\accole
  129. md f:\pcw\utils
  130. md f:\pcw\utils\crc
  131. md f:\pcw\utils\ice
  132. md f:\pcw\utils\size
  133. md f:\pcw\vbhands
  134. md f:\red_nose
  135.  
  136. echo"
  137. echo Installing...
  138. echo"
  139. \covdisk\magazine\accole f:\pcw\accole\
  140. \covdisk\utils\cyclic f:\pcw\utils\crc\
  141. \covdisk\utils\encrypt f:\pcw\utils\ice\
  142. \covdisk\utils\disksize f:\pcw\utils\size\
  143. \covdisk\magazine\vbhands f:\pcw\vbhands\
  144. \covdisk\comicrel\comicrel \covdisk\comicrel\comicrel f:\red_nose\
  145.  
  146. f:
  147. cd\red_nose
  148. buyme
  149. goto exit
  150.  
  151. :cr_g
  152.  
  153. cls
  154. md g:\pcw
  155. md g:\pcw\accole
  156. md g:\pcw\utils
  157. md g:\pcw\utils\crc
  158. md g:\pcw\utils\ice
  159. md g:\pcw\utils\size
  160. md g:\pcw\vbhands
  161. md g:\red_nose
  162.  
  163. echo"
  164. echo Installing...
  165. echo"
  166. \covdisk\magazine\accole g:\pcw\accole\
  167. \covdisk\utils\cyclic g:\pcw\utils\crc\
  168. \covdisk\utils\encrypt g:\pcw\utils\ice\
  169. \covdisk\utils\disksize g:\pcw\utils\size\
  170. \covdisk\covdisk\magazine\vbhands g:\pcw\vbhands\
  171. \covdisk\comicrel\comicrel \covdisk\comicrel\comicrel g:\red_nose\
  172.  
  173. g:
  174. cd\red_nose
  175. buyme
  176.  
  177. :exit
  178.  
  179. cls
  180. echo                       PERSONAL COMPUTER WORLD COVER DISK
  181. echo                         APRIL 1995 (c) VNU PUBLISHING
  182. echo"
  183. echo Goodbye from the PCW Cover Disk until next month...
  184. echo"
  185.