home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Today (UK) 7 / cdromtoday7.bin / discover / setup.scr < prev    next >
Text File  |  1994-09-01  |  23KB  |  930 lines
  1. rem ____ Start Script ____
  2. rem we are already in the destination directory,
  3. rem and ka.cnf points to the drive and directory we were installed from
  4. indestdir
  5. rem Make drive letter variables for the benefit of batch files launched by kav
  6. getDriveLetter %CDroot%
  7. set CDdrive %_1%
  8. getDriveLetter %HDroot%
  9. set HDdrive %_1%
  10. rem set default values for a few things
  11. preset AutoMovie On
  12. preset mouseSensitivity 50
  13. preset ExtraMemory Automatic
  14. preset musicVolume 70
  15. preset soundVolume 100
  16. preset Printing Detect
  17. preset PrinterPort LPT1
  18. preset digitizedSound On
  19. preset music On
  20. preset zoomUseRealSound Off
  21. getSoundPort _ioPort _irq _dma _drq
  22. getMusicPort _musicIo
  23. set _soundMenuHeight 14
  24. set _soundMenu sound.mnu
  25. exist %CDRoot%\drivers\algdig.drv
  26. if %_1% = 0
  27.     set _soundMenuHeight 10
  28.     set _soundMenu sound4.mnu
  29. endif
  30. rem Deal with power management for product.bat
  31. set _power "rem power.exe not detected"
  32. detect_power
  33. if %_1% = 1
  34.     set _power "power off"
  35. endif
  36. rem Specify where all the text files used in setup live.
  37. set _text %hdroot%\inst%LANG%.txl
  38. rem
  39. err_handler %_text%\errhand.txt
  40. rem lk 12:35 3/27
  41. rem --------- Disallow setup if in Windows ---------
  42. rem getenv's argument is case sensitive; usually always uppercase,
  43. rem but windir is lowercase.  That way you can't set it from commandline!
  44. getenv windir
  45. if "%_1%" ne ""
  46.     rem by golly they're in windows;
  47.     textbox 1 1 80 25 blue
  48.     color back blue
  49.     beep 2
  50.     type %_text%\nowin.txt 10 11 60 7
  51.     waitkey_noesc
  52.     goto exit_unsaved
  53. endif
  54. rem lk 2:35 3/26 start
  55. rem This check is to see if the CDROM is in the caddy when you run setup
  56. rem because, if you don't you'll get a driver missing error.
  57. :checkCd
  58. existdir %CDRoot%\drivers
  59. if %_1% = 0
  60.     textbox 1 1 25 80 blue
  61.     color back blue
  62.     beep 1
  63.     type %_text%\nocd.txt 15 10 50 7 
  64.     waitKey_noEsc
  65.     switch "%_1%"
  66.     case escape:    
  67.         goto exit_unsaved
  68.     case default:
  69.     endswitch
  70.     color back cyan
  71.     goto checkCd
  72. endif
  73. rem lk 2:49 3/26 end
  74. rem
  75. textbox 1 1 80 25 blue
  76. color back cyan
  77. getOpt -help
  78. if %_err% = 0
  79.     type %_text%\setuphlp.txt 3 2 77 15 -border -nocenter
  80.     waitkey
  81.     goto exit_unsaved
  82. endif
  83. type %_text%\setup.txt 3 2 77 6 -border
  84. color text yellow
  85. echo 6 6 70 1 -center "%title%"
  86. color text white
  87. rem ----------------- select card --------------------
  88. :card
  89. textbox 1 9 80 17 blue
  90. rem menu %_text%\sound.mnu 20 11 44 8 %_text%\sound.tit %_text%\updown.leg
  91. menu %_text%\%_soundMenu% 20 10 44 %_soundMenuHeight% %_text%\sound.tit %_text%\updown.leg
  92. set soundDriver %_1%
  93. if %soundDriver% eq quit
  94.     goto exit_unsaved
  95. endif
  96. set musicDriver "%_2%"
  97. set musicType "%_3%"
  98. set music "%_4%"
  99. set soundDevice "%_5%"
  100. set _iomnu "%_6%"
  101. set _irqmnu "%_7%"
  102. set _dmamnu "%_8%"
  103. set _soundDevice2 "%_9%"
  104. if "%soundDevice%" eq -
  105.     set soundDevice "%_soundDevice2%"
  106. endif
  107. unset _dma
  108. unset _irq
  109. unset _ioPort
  110. textbox 1 9 80 16 blue
  111. rem set i/o port, etc.
  112. set _musicIo "%_ioPort%"
  113. set stopMovies On
  114. rem don't run sbtest if this is really a Reveal card
  115. switch %soundDevice%
  116. case SC400:
  117.     set _reveal "-noAuto"
  118. case SC600FM:
  119.     set _reveal "-noAuto"
  120. case SC600GM:
  121.     set _reveal "-noAuto"
  122. case SC600:
  123.     set _reveal "-noAuto"
  124. case default:
  125.     set _reveal ""
  126. endswitch
  127. switch %soundDriver%
  128. case escape:
  129.     goto exit_unsaved
  130. case sbdig.drv:
  131.     detect_soundBlaster %_reveal%
  132.     set _musicIo "%_ioPort%"
  133. case sbpdig.drv:
  134.     detect_soundBlaster
  135.     set _musicIo "%_ioPort%"
  136. case pasdig.drv:
  137.     rem proaudio spectrum 16
  138.     rem detect settings from config.sys
  139.     detect_spectrum
  140.     set _sb_dma %_2%
  141.     rem if using 16 bit dma, punt and drop back to soundblaster emulation
  142.     rem is this right?
  143.     set _musicIo "%_ioPort%"
  144.     if %_dma% > 4
  145.         set soundDriver sbdig.drv
  146.         rem soundblaster emulation is normally dma channel 1
  147.         rem but use values detect_spectrum read from config.sys
  148.         detect_soundBlaster
  149.         set _dma %_sb_dma%
  150.         set _musicIo 388
  151.     endif
  152.     set soundVolume 62
  153. case default:
  154.     rem explicit defaults
  155. endswitch
  156. rem hard-code default music io port
  157. switch %musicDriver%
  158. case adlib.drv:
  159.     set _musicIo 388
  160. case adlibg.drv:
  161.     set _musicIo 388
  162. case roland.drv:
  163.     if %soundDriver% ne sb16dig.drv
  164.         set _musicIo 330
  165.     endif
  166. case default
  167.     rem normal case
  168. endswitch
  169. setSoundPort "%_ioPort%" "%_irq%" "%_dma%" "%_drq%"
  170. setMusicPort "%_musicIo%"
  171. if "%soundDevice%" eq none
  172.     set digitizedSound Off
  173.     set music Off
  174. endif
  175. if "%soundDriver%" eq .none
  176.     set digitizedSound Off
  177. endif
  178. if "%musicDriver%" eq PCSPKR.DRV
  179.     set music Off
  180. endif
  181. if "%musicDriver%" eq .none
  182.     set music Off
  183. endif
  184. rem clear dma if it's set to the default
  185. if "%_dma%" = -1
  186.     unset _dma 
  187. endif
  188. color back white
  189. color text black
  190. textbox 1 25 80 1
  191. type %_text%\settings.txt 1 25 80 1
  192. color back cyan
  193. color text white
  194. rem ----------------- prepend driver path -----------------
  195. set _nakedSoundDriver %soundDriver%
  196. appendSlash _cdroots %cdroot%
  197. switch %soundDriver% 
  198. rem these three are pseudo drivers and dont really exist
  199. case .none:
  200. rem all others are real
  201. case default:
  202.     set soundDriver %_CDroots%drivers\%soundDriver%
  203.     exist %soundDriver%
  204.     if %_1% eq 0
  205.         rem driver does not exist
  206.         beep
  207.         type %_text%\sounderr.txt 10 10 60 9 -Border
  208.         waitkey 
  209.         unset _soundDevice2
  210.         goto card
  211.     endif
  212.     copy %soundDriver% sound.drv
  213. endswitch
  214. switch %musicDriver% 
  215. rem these three are pseudo drivers and dont really exist
  216. case .none:
  217. rem all others are real
  218. case default:
  219.     set musicDriver %_CDroots%drivers\%musicDriver%
  220.     exist %musicDriver%
  221.     if %_1% eq 0
  222.         rem driver does not exist
  223.         beep
  224.         type %_text%\sounderr.txt 10 10 60 9 -Border
  225.         waitkey 
  226.         unset _soundDevice2
  227.         goto card
  228.     endif
  229.     copy %musicDriver% music.drv
  230. endswitch
  231. rem ----------------- note any tsr's needed for this card -------------
  232. closeDrivers
  233. unset _sc600mode
  234. rem set default tsr lines for product.bat
  235. set _tsr "rem no special tsrs needed"
  236. set _tsr2 "rem no special tsr cleanup needed"
  237. set _vol1 "rem No special sound device"
  238. set _vol2 "rem No special sound device cleanup"
  239. switch %soundDevice%
  240. case GRAVIS:
  241.     rem gravis ultrasound
  242.     set _tsr "ultrasnd.exe -c -d %HDroot%"
  243.     set _tsr2 "ultrasnd.exe -f"
  244.     if %CDroot% ne %HDroot%
  245.         copy ultramid.ini
  246.         copy ultrasnd.exe
  247.     endif
  248. case ARIA:
  249.     copy gm1.bnk
  250.     copy gm2.bnk
  251. case SC600:
  252.     rem Reveal SC600 in native general midi mode
  253.     set _sc600mode GM
  254. case SC600FM:
  255.     rem Reveal SC600 in Sound Blaster (FM) mode
  256.     set _sc600mode FM
  257. case default:
  258. endswitch
  259. if "%_sc600mode%" ne ""
  260.     rem getenv SNDSCAPE
  261.     rem set _tsr "%_1%\ssinit %_sc600mode% /w"
  262.     set _tsr "%hdroot%\callss %_sc600mode% /w"
  263.     set _vol1 "%hdroot%\ssvol 127 127 100"
  264.     set _vol2 "%hdroot%\ssvol /r"
  265.     unset _sc600mode
  266.     rem ssinit is not a tsr, so we can run it now.
  267.     spawn %_tsr%
  268.     spawn %_vol1%
  269.     textbox 1 1 80 25 blue
  270.     color back white
  271.     color text black
  272.     type %_text%\settings.txt 1 25 80 1
  273.     color back cyan
  274.     color text white
  275.     type %_text%\setup.txt 3 2 77 6 -border
  276.     color text yellow
  277.     echo 6 6 70 1 -center "%title%"
  278.     color text white
  279.     openDrivers
  280. endif
  281. rem ----------------- auto music & sound -----------------
  282. rem Automatically play music and sound unless ? option is given on
  283. rem command line
  284. getOpt ?
  285. if %_err% = 0
  286.     goto loop
  287. endif
  288. rem if %musicType% ne none
  289. if %musicType% ne -
  290.     color back blue
  291.     color text yellow blink
  292.     type %_text%\pmusic.txt 20 20 40 1 
  293.     color text white
  294.     type %_text%\playing.txt 5 21 70 4
  295.     rem show them which menu item would have gotten them here, more or less.
  296.     color back cyan
  297.     menu %_text%\main.mnu 19 10 44 9 %_text%\main.tit %_text%\updown.leg -default 0 -showOnly
  298.     music kalogo.%musicType%
  299. endif
  300. rem getenv's argument is case sensitive; usually always uppercase,
  301. rem but windir is lowercase.  That way you can't set it from commandline!
  302. getenv windir
  303. if "%_1%" ne "" 
  304.     rem by golly they're in windows;
  305.     rem don't use the PC Speaker because the driver isn't installed yet
  306.     switch %soundDevice%
  307.     case PCspeaker:
  308.         goto noAutoSoundTest
  309.     case default:
  310.     endswitch
  311. endif
  312. if %digitizedSound% ne Off
  313.     color back blue
  314.     color text yellow blink
  315.     type %_text%\psound.txt 20 20 40 1 
  316.     color text white
  317.     type %_text%\playing.txt 5 21 7