home *** CD-ROM | disk | FTP | other *** search
/ High Voltage Shareware / high1.zip / high1 / DIR4 / RMD40.ZIP / INSTALL.FIL < prev    next >
Text File  |  1994-01-31  |  6KB  |  277 lines
  1.  
  2. BACKGROUND 63
  3.  
  4. TELESCOPE OFF
  5.  
  6. WINOPEN 0 2 95
  7.  
  8. "              RESUME MASTER DELUXE"
  9. "              Shareware Version 4.0"
  10. "-- For that winning edge in today's job market --"
  11. ""
  12. "(C) Copyright  Whirlwind Technologies  1991-1994"
  13. "               All Rights Reserved"
  14.  
  15. TELESCOPE ON
  16.  
  17. SHADOW ON
  18.  
  19. WINOPEN 0 12 31
  20. "Install Resume Master Deluxe to hard drive?"
  21. "                 (Y or N)"
  22. ASK 44 14
  23. WINCLOSE
  24. JUMP.NO VIEW_README
  25.  
  26. SPACE 385
  27.  
  28.  
  29. DRIVE C 28 12 31 15 32 14 79
  30.  
  31. PATH \RMD40 0 12 31 15 32 14 79
  32.  
  33. UNPACK RMD40.PAK 0 12 31 32 14 79
  34.  
  35. JUMP.FAIL INSTALL_FAILURE
  36.  
  37. WINOPEN 0 12 31
  38. "Resume Master Deluxe is now installed on your computer"
  39. "at: ~1~2."
  40. ""
  41. "          Press the [Enter] key to continue."
  42.  
  43. WAIT +36 +7
  44.  
  45. WINCLOSE
  46.  
  47. '------------------- HANDLE README FILE VIEW/PRINT ------------------------
  48. :VIEW_README
  49. WINOPEN 0 12 31
  50. "Would you like to VIEW the README File?"
  51. "              (Y or N)"
  52.  
  53. ASK +39 +2
  54.  
  55. WINCLOSE
  56.  
  57. JUMP.NO PRINT_README
  58.  
  59. WINOPEN 0 0 31
  60. "Loading ..."
  61. VIEW ~0\README 79 31
  62. WINCLOSE
  63.  
  64. :PRINT_README      'INSTALL.TXT
  65. WINOPEN 0 12 31
  66. "Would you like to PRINT the README file?"
  67. "                (Y or N)"
  68.  
  69. ASK 44 14
  70.  
  71. WINCLOSE
  72. JUMP.NO VIEW_VENDOR.DOC
  73.  
  74. WINOPEN 0 0 31
  75. "Printing ..."
  76. PRINT ~0\README
  77. WINCLOSE
  78. JUMP.FAIL PRINTER_ERROR1
  79. JUMP VIEW_VENDOR.DOC
  80.  
  81. :PRINTER_ERROR1
  82. WINOPEN 0 12 31
  83. "Your printer is not responding.  Possible problems:"
  84. "   -- Printer is not turned on"
  85. "   -- Printer is out of paper"
  86. "   -- Printer is not attached to LPT1 (parallel port 1)"
  87. "   -- The file no longer exists on the distribution disk"
  88. ""
  89. "Do you want to try to print again  (Y or N)?"
  90. ASK 57 18
  91. WINCLOSE
  92. JUMP.YES PRINT_README
  93.  
  94.  
  95. '------------------- HANDLE VENDOR.DOC FILE VIEW/PRINT ------------------------
  96. :VIEW_VENDOR.DOC
  97. WINOPEN 0 12 31
  98. "Would you like to VIEW the VENDOR.DOC File?"
  99. "                 (Y or N)"
  100.  
  101. ASK +39 +2
  102.  
  103. WINCLOSE
  104.  
  105. JUMP.NO PRINT_VENDOR.DOC
  106.  
  107. WINOPEN 0 0 31
  108. "Loading ..."
  109. VIEW ~0\VENDOR.DOC 79 31
  110. WINCLOSE
  111.  
  112. :PRINT_VENDOR.DOC      'INSTALL.TXT
  113. WINOPEN 0 12 31
  114. "Would you like to PRINT the VENDOR.DOC file?"
  115. "                  (Y or N)"
  116.  
  117. ASK 44 14
  118.  
  119. WINCLOSE
  120. JUMP.NO VIEW_MANUAL.DOC
  121.  
  122. WINOPEN 0 0 31
  123. "Printing ..."
  124. PRINT ~0\VENDOR.DOC
  125. WINCLOSE
  126. JUMP.FAIL PRINTER_ERROR3
  127. JUMP VIEW_MANUAL.DOC
  128.  
  129. :PRINTER_ERROR3
  130. WINOPEN 0 12 31
  131. "Your printer is not responding.  Possible problems:"
  132. "   -- Printer is not turned on"
  133. "   -- Printer is out of paper"
  134. "   -- Printer is not attached to LPT1 (parallel port 1)"
  135. "   -- The file no longer exists on the distribution disk"
  136. ""
  137. "Do you want to try to print again  (Y or N)?"
  138. ASK 57 18
  139. WINCLOSE
  140. JUMP.YES PRINT_VENDOR.DOC
  141.  
  142. '------------------- HANDLE MANUAL.DOC FILE VIEW/PRINT ------------------------
  143. :VIEW_MANUAL.DOC
  144. WINOPEN 0 12 31
  145. "Would you like to VIEW the User's Manual?"
  146. "                 (Y or N)"
  147.  
  148. ASK +39 +2
  149.  
  150. WINCLOSE
  151.  
  152. JUMP.NO PRINT_MANUAL.DOC
  153.  
  154. WINOPEN 0 0 31
  155. "Loading ..."
  156. VIEW ~0\MANUAL.DOC 79 31
  157. WINCLOSE
  158.  
  159. :PRINT_MANUAL.DOC
  160. WINOPEN 0 12 31
  161. "Would you like to PRINT the User's Manual?"
  162. "                 (Y or N)"
  163.  
  164. ASK 44 14
  165.  
  166. WINCLOSE
  167. JUMP.NO EXIT
  168.  
  169. WINOPEN 0 0 31
  170. "Printing ..."
  171. PRINT ~0\MANUAL.DOC
  172. WINCLOSE
  173. JUMP.FAIL PRINTER_ERROR2
  174. JUMP EXIT
  175.  
  176. :PRINTER_ERROR2
  177. WINOPEN 0 12 31
  178. "Your printer is not responding.  Possible problems:"
  179. "   -- Printer is not turned on"
  180. "   -- Printer is out of paper"
  181. "   -- Printer is not attached to LPT1 (parallel port 1)"
  182. "   -- The file no longer exists on the distribution disk"
  183. ""
  184. "Do you want to try to print again  (Y or N)?"
  185. ASK 57 18
  186. WINCLOSE
  187. JUMP.YES PRINT_MANUAL.DOC
  188.  
  189. :EXIT
  190.  
  191. WINCLOSE
  192.  
  193. EXIST ~1~2\MANUAL.DOC       'test if program installed or not
  194. JUMP.NO NOT_INSTALLED
  195.  
  196. WINOPEN 0 0 31
  197. "     RESUME MASTER DELUXE INSTALLATION COMPLETE"
  198. ""
  199. "To run program: Attach to ~1~2 and enter RESUME"
  200. "To print manual: Attach to ~1~2 and enter" 
  201. "                 COPY MANUAL.DOC PRN"
  202. ""
  203. "        !!! PLEASE REGISTER THIS PROGRAM !!!"
  204. ""
  205. "         Press the [Enter] key to continue"
  206.  
  207. WAIT +36 +11
  208.  
  209. SHELL
  210. "~1"
  211. "CD ~2"" 
  212. END
  213.  
  214. :NOT_INSTALLED
  215. WINOPEN 0 0 31
  216. "           RESUME MASTER DELUXE NOT INSTALLED"
  217. ""
  218. "To install at a later time, run installation program again."
  219. ""
  220. "            Press the [Enter] key to continue."
  221.  
  222. WAIT +36 +11
  223.  
  224. END
  225.  
  226.  
  227. ' ----------------------
  228. ' Installation Failure.
  229. ' It is a good idea to
  230. ' add a similar routine
  231. ' to the bottom of all
  232. ' script files.
  233. ' ----------------------
  234.  
  235. :INSTALL_FAILURE
  236.  
  237. ' labels begin with a colon and can be up to 32 characters long.
  238.  
  239. WINOPEN 0 12 79
  240.  
  241. ' the easiest way to center a message on the screen is to make
  242. ' either the x or y coordinates "0".
  243. ' 79 is a red window with emphasized white letters (good for error messages)
  244.  
  245. "THE INSTALLATION PROGRAM FAILED PRIOR TO COMPLETION"
  246. ""
  247. "Possible reasons:"
  248. "   -- The floppy disk was removed prior to completion."
  249. "   -- The floppy disk was damaged during shipping."
  250. "   -- Your disk drive is out of alignment."
  251. ""
  252. "Press [Enter] to remove incomplete program files."
  253.  
  254. WAIT 62 20
  255.  
  256.  
  257. ' delete all partial files using internal variables
  258. '   ~1 = the drive the user installed to (C: was the default)
  259. '   ~2 = the path the user installed to (\SAMPLE was the default)
  260.  
  261. DELETE ~1~2\*.* 0 0 31
  262.  
  263. ' now remove the directory
  264.  
  265. RD ~1~2
  266.  
  267. WINCLOSE
  268.  
  269.  
  270. WINOPEN 0 12 31
  271.  
  272. "Partially Installed Files are Now Deleted."
  273. ""
  274. "      Press [Enter] to Quit."
  275.  
  276. WAIT 47 15
  277.