home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-387-Vol-3of3.iso / c / can-mar.zip / INSTALL.BAT < prev    next >
DOS Batch File  |  1993-02-13  |  4KB  |  183 lines
  1. @ECHO OFF            
  2. BENMOUSE GROWFILLEDBOX 1 1 80 25  RED CYAN 4 
  3. BENMOUSE MESSAGE C.A.N.~~COPYRIGHT~1993~BY~JEFF~GLAZE. 
  4. BENMOUSE MESSAGE PREPARE~TO~SELECT~THE~SOURCE~FOR~THE~C.A.N.~DIRECTORY~AND~FILES. 
  5. BENMOUSE MENU C.A.N.~INSTALL~ INSTALL~FROM~DRIVE~A: INSTALL~FROM~DRIVE~B: 
  6. IF ERRORLEVEL 3 GOTO END 
  7. IF ERRORLEVEL 2 GOTO INSTALLB
  8. IF ERRORLEVEL 1 GOTO INSTALLA
  9. BENMOUSE ECHO HEY,WHAT'S UP?
  10. GOTO END
  11.  
  12. :INSTALLA
  13. BENMOUSE MENU DESTINATION~DRIVE INSTALL~ON~DRIVE~C: INSTALL~ON~DRIVE~D: INSTALL~ON~DRIVE~E: INSTALL~ON~DRIVE~F:
  14. IF ERRORLEVEL 5 GOTO END
  15. IF ERRORLEVEL 4 GOTO AF
  16. IF ERRORLEVEL 3 GOTO AE
  17. IF ERRORLEVEL 2 GOTO AD
  18. IF ERRORLEVEL 1 GOTO AC
  19.  
  20. :AC
  21. MD C:\CAN-MAR
  22. BENMOUSE ECHO PLEASE WAIT, INSTALLING FILES!
  23. XCOPY A: C:\CAN-MAR
  24. C:
  25. CD C:\CAN-MAR
  26. GOTO END
  27.  
  28. :AD
  29. MD D:\CAN-MAR
  30. BENMOUSE ECHO PLEASE WAIT, INSTALLING FILES
  31. XCOPY A: D:\CAN-MAR
  32. d:
  33. CD D:\CAN-MAR 
  34. GOTO END
  35.  
  36. :AE
  37. MD E:\CAN-MAR
  38. BENMOUSE ECHO PLEASE WAIT, INSTALLING FILES!
  39. XCOPY A: E:\CAN-MAR
  40. E:
  41. CD E:\CAN-MAR
  42. GOTO END
  43.  
  44. :AF
  45. MD F:\CAN-MAR
  46. BENMOUSE ECHO PLEASE WAIT, INSTALLING FILES
  47. XCOPY A: F:\CAN-MAR
  48. F:
  49. CD F:\CAN-MAR 
  50. GOTO END
  51.  
  52. :INSTALLB
  53.  
  54. BENMOUSE MENU DESTINATION~DRIVE INSTALL~ON~DRIVE~C: INSTALL~ON~DRIVE~D: INSTALL~ON~DRIVE~E: INSTALL~ON~DRIVE~F:
  55. IF ERRORLEVEL 5 GOTO END
  56. IF ERRORLEVEL 4 GOTO BF
  57. IF ERRORLEVEL 3 GOTO BE
  58. IF ERRORLEVEL 2 GOTO BD
  59. IF ERRORLEVEL 1 GOTO BC
  60.  
  61. :BC
  62. MD C:\CAN-MAR
  63. BENMOUSE ECHO PLEASE WAIT, INSTALLING FILES!
  64. XCOPY B: C:\CAN-MAR
  65. C:
  66. CD C:\CAN-MAR
  67. GOTO END
  68.  
  69. :BD
  70. MD D:\CAN-MAR
  71. BENMOUSE ECHO PLEASE WAIT, INSTALLING FILES!
  72. XCOPY B: D:\CAN-MAR
  73. D:
  74. CD D:\CAN-MAR
  75. GOTO END
  76.  
  77. :BE
  78. MD E:\CAN-MAR
  79. BENMOUSE ECHO PLEASE WAIT, INSTALLING FILES!
  80. XCOPY B: E:\CAN-MAR
  81. E:
  82. CD E:\CAN-MAR
  83. GOTO END
  84.  
  85. :BF
  86. MD F:\CAN-MAR
  87. BENMOUSE ECHO PLEASE WAIT, INSTALLING FILES!
  88. XCOPY B: F:\CAN-MAR
  89. F:
  90. CD F:\CAN-MAR
  91. GOTO END
  92.  
  93. :END
  94. CAN-MAR
  95. @PLAY CAN-NEW
  96. @CANMAR-T
  97. @PLAY THADVEN1
  98. @PLAY UNO-FIN4
  99. @PLAY UNO-FIN1
  100. @PLAY UNO-FIN2
  101. @PLAY UNO-FIN3
  102. @PLAY STEPTITL
  103. @PLAY STEPSFI
  104. @CANMAR-Q
  105. @PLAY CT-GO1
  106. @PLAY PLANET-S
  107. @PLAY FLY-BY!1
  108. @PLAY WRSPRTS
  109. @PLAY DIVE3
  110. @TUTORIAL
  111. @PLAY CT-GO1
  112. @PLAY BLOCSPI2
  113. @PLAY BUTINLOV
  114. @PLAY B-FLYS
  115. @CANMAR-X
  116. @PLAY CT-GO1
  117.  
  118.  
  119. BENMOUSE GROWFILLEDBOX 1 1 80 25 BLUE MAGENTA 4
  120. BENMOUSE MENU REVIEW~JOHN~SCHNELL'S~UNO~FLIX LET'S~DO~IT!  NOT~NOW~THANKS.
  121.  
  122.  
  123. IF ERRORLEVEL 2 IF NOT ERRORLEVEL 3 GOTO NEXT
  124. IF ERRORLEVEL 1 IF NOT ERRORLEVEL 2 GOTO JOHN
  125. BENMOUSE ECHO OK
  126. FINISH
  127.  
  128. :JOHN
  129. @PLAY THADVEN1
  130. @PLAY UNO-FIN4
  131. @PLAY UNO-FIN1
  132. @PLAY UNO-FIN2
  133. @PLAY UNO-FIN3
  134. GOTO NEXT
  135.  
  136. :NEXT
  137.  
  138. BENMOUSE GROWFILLEDBOX 1 1 80 25 BLUE MAGENTA 4
  139. BENMOUSE MENU REVIEW~MARCH~FLIX "BUTTERFLIES" THE~"BLOCK" "WATERSPORTS" "PLANETS" "STEPS" EXIT
  140.  
  141. IF ERRORLEVEL 6 IF NOT ERRORLEVEL 7 GOTO FINISH
  142. IF ERRORLEVEL 5 IF NOT ERRORLEVEL 6 GOTO EE
  143. IF ERRORLEVEL 4 IF NOT ERRORLEVEL 5 GOTO DD
  144. IF ERRORLEVEL 3 IF NOT ERRORLEVEL 4 GOTO CC
  145. IF ERRORLEVEL 2 IF NOT ERRORLEVEL 3 GOTO BB
  146. IF ERRORLEVEL 1 IF NOT ERRORLEVEL 2 GOTO AA
  147. BENMOUSE ECHO OK
  148. END
  149.  
  150. :AA
  151. @PLAY BUTINLOV
  152. @PLAY B-FLYS
  153. GOTO NEXT
  154.  
  155. :BB
  156. @PLAY BLOCSPI2
  157. GOTO NEXT
  158.  
  159. :CC
  160. @PLAY WRSPRTS
  161. @PLAY DIVE3
  162. GOTO NEXT
  163.  
  164. :DD
  165. @PLAY PLANET-S
  166. @PLAY FLY-BY!1
  167. GOTO NEXT
  168.  
  169. :EE
  170. @PLAY STEPTITL
  171. @PLAY STEPSFI
  172. GOTO NEXT
  173.  
  174.  
  175.  
  176. :FINISH
  177. @PLAY CT-GO1
  178. BENMOUSE GROWFILLEDBOX 1 1 80 25 WHITE BLUE 4
  179. BENMOUSE MESSAGE TO~PLAY~FLIX~WITHOUT~INSTALLATION~NEXT~TIME....~USE~REPLAY.BAT
  180. BENMOUSE MESSAGE SEND~A~BLANK~DISK~AND~52~CENTS~ POSTAGE~TO~RECEIVE~NEXT~MONTHS~AWESOME~ISSUE! THANKS~FOR~YOUR~SUPPORT! 
  181. BENMOUSE CLEANUP
  182. ECHO          THANK YOU FOR YOUR PARTICIPATION! COME BACK NOW, HEAR?
  183.