home *** CD-ROM | disk | FTP | other *** search
/ 3D Dinosaur Adventure / DINO16B14.iso / dino3d / install.hmm < prev    next >
Encoding:
Text File  |  1994-02-22  |  4.6 KB  |  197 lines
  1. rem Set default language
  2. set LANG eng
  3. set _text inst%LANG%.txl
  4. err_handler %_text%\errhand.txt
  5. rem ----------------- select language/quit --------------------
  6. :pick_language
  7. textbox 1 1 80 24 blue
  8. color back cyan
  9. getOpt -help
  10. if %_err% = 0
  11.         type %_text%\insthlp.txt 3 2 77 15 -border -nocenter
  12.         waitkey
  13.         goto exit_unsaved
  14. endif
  15. rem only one language, so don't show menu
  16. rem type %_text%\install.txt 2 2 77 6  -border
  17. rem textbox 1 9 80 13 blue
  18. menu %_text%\startup.mnu 15 11 50 7 %_text%\startup.tit %_text%\updown.leg -default 0 -lookupOnly
  19. set LANG %_1%
  20. set yes %_2%
  21. set no %_3%
  22. set shortTitle %_4%
  23. set title "%_5%"
  24. switch %_1%
  25. case quit:
  26.                 goto exit_unsaved
  27. case escape:
  28.                 goto exit_unsaved
  29. case default:
  30. endswitch
  31. set _text inst%LANG%.txl
  32. type %_text%\install.txt 3 2 76 6  -border
  33. color text yellow
  34. echo 5 6 70 1 -center "%title%"
  35. color text white
  36. rem --------- If on slow cpu, switch to alternate product --------
  37. set _needCpu 486
  38. getCpuType
  39. set _gotCpu %_1%
  40. set _version 1
  41. if %_gotCpu% < %_needCpu%
  42.         set _version 0
  43. endif
  44. color back blue
  45. type %_text%\cpuid.txt 11 19 60 5 
  46. color back cyan
  47. menu %_text%\cpuid.mnu 17 11 48 6 %_text%\cpuid.tit %_text%\updown.leg -default %_version%
  48. switch %_1%
  49. case slow:
  50.         set _links ka386.lnk
  51. case fast:
  52.         set _links ka.lnk
  53. case escape:
  54.         goto exit_unsaved
  55. endswitch
  56. textbox 1 9 80 16 blue
  57. rem -------------- Text vs. Graphics Install ---------
  58. rem Don't switch into graphics if -T is given
  59. getOpt -T
  60. switch %_err%
  61. case 0:
  62.         rem -T given, no graphics
  63.         textbox 1 1 80 25 blue
  64.         color back cyan
  65.         type %_text%\install.txt 3 2 76 6  -border 
  66.         rem color back blue
  67.             set _options "-T"
  68. case 1:
  69.         rem -T not given, use graphics
  70.         graphics 
  71.         if %_err% > 0
  72.                 beep
  73.                 type %_text%\novga.txt 2 2 77 10 -border
  74.                 waitkey
  75.                         textbox 1 1 80 25 blue
  76.         endif
  77. endswitch
  78. getOpt -N:
  79. switch %_err%
  80. case 0:
  81.         rem -N given, add it to options
  82.         set _next %_1%
  83. case 1:
  84.         rem -N not given
  85.         set _next 9999
  86. endswitch
  87. pict install.img 18 1
  88. rem ---------  Ask user Where to install it ------------
  89. promptdir  C:\%shortTitle% 13 17 58 8 %_text%\whichdrv.tit %_text%\whichdrv.txt -center
  90. textbox 1 17 80 9 blue
  91. if %_1% eq escape
  92.     goto exit_unsaved
  93. endif
  94. setdestdir %_1%
  95. getVga
  96. if %_err% = 1
  97.     type %_text%\novga.txt 2 13 77 10 -border
  98.     waitkey
  99.     textbox 1 12 80 13 blue
  100. endif
  101. set _needDisk 3
  102. getdiskfree
  103. set _gotDisk %_1%
  104. if %_gotDisk% < %_needDisk%
  105.     type %_text%\diskfree.txt 17 17 50 8 -border
  106.     waitkey_noesc
  107.     goto exit_unsaved
  108. endif
  109. set needMem 520
  110. getmemfree
  111. set _gotMem %_1%
  112. if %_gotMem% < %needMem%
  113.     type %_text%\memfree.txt 17 19 50 6 -border
  114.     waitkey
  115.     textbox 1 17 80 8 blue
  116. endif
  117. mkdirdest
  118. if %_err% != 0
  119.     beep
  120.     type %_text%\noaccess.txt 17 19 50 6 -border
  121.     waitkey_noesc
  122.     goto exit_unsaved
  123. endif
  124. ifcanwrite can_write
  125.     type %_text%\noaccess.txt 17 19 50 6 -border
  126.     waitkey_noesc
  127.     goto exit_unsaved
  128. :can_write
  129. type %_text%\copying.txt 17 19 50 6 -border
  130. copy %_text%
  131. set _text %hdroot%\%_text%
  132. saveconfig
  133. copy nofiles.txt
  134. copy readme.bat
  135. copy readme.doc
  136. copy %shortTitle%.ico %shortTitle%.ico
  137. copy %shortTitle%.pif %shortTitle%.pif
  138. rem Copy files needed for sound test
  139. copy ka.ad
  140. copy knowledg.voc
  141. copy sbtest.com
  142. copy kalogo.adl
  143. copy kalogo.rld
  144. copy install.exe setup.exe
  145. copy setup.scr
  146. rem copy iinstall.pal
  147. rem copy iinstall.fnt
  148. rem Copy files needed for real product
  149. copy ka.bml
  150. copy ka.com
  151. copy ka.db
  152. copy ka.inl
  153. copy ka.lch
  154. copy %_links% ka.lnk
  155. copy ka.ndx
  156. copy ka.not
  157. copy ka.skp
  158. copy ka.str
  159. copy ka.txt
  160. copy kav.pgm
  161. copy mouse.com
  162. copy moustest.exe
  163. copy small.fnt
  164. copy standard.fnt
  165. copy tiny.fnt
  166. copy vgacapt.exe
  167. copy whichvga.com
  168. copy zrun.exe
  169. type %_text%\copying2.txt 17 19 50 6 -border
  170. mkdir dinogame
  171. copy dinogame\dg.zsl dg.zsl
  172. copy dinogame\dg.xml dg.xml
  173. copy dinogame\dg.iml dg.iml
  174. copy dinogame\dg.evl dg.evl
  175. copy dinogame\fixed.pal fixed.pal
  176. copy dinogame\ground.pal ground.pal
  177. copy dinogame\sky.pal sky.pal
  178. copy dinogame\black2.pal black2.pal
  179. copy dinogame\zrunfile zrunfile -expand
  180. copy dinogame\ka.ad ka.ad
  181. copy sb16dig.drv
  182. rem Make batch file so shell install can loop.
  183. getDriveLetter %CDroot%
  184. set CDdrive %_1%
  185. getDriveLetter %HDroot%
  186. set HDdrive %_1%
  187. copy %_text%\install.bat install.bat -expand
  188. rem Done copying.
  189. :install_done
  190. type %_text%\finish.txt 17 19 50 6 -border
  191. beep
  192. waitkey
  193. chain .\setup
  194. :exit_unsaved
  195. textbox 1 1 80 25 black
  196. quit
  197.