home *** CD-ROM | disk | FTP | other *** search
- BigMenu(' Bazooka SUE Installation~ Wählen Sie einen Installationsmodus ',
- ' Minimal ( 6MB Festplattenplatz)',
- ' Normal ( 40MB Festplattenplatz)',
- ' Maximal (150MB Festplattenplatz) ')
- AskPath('Geben sie eine Pfad auf der Festplatte an, in dem die Daten abgelegt werden sollen',
- 'C:\VILLADMO\')
- case menuresult =
- 0 : { exit }
- 1 : {
- OpenFile('Sue.CFG')
- write('CDROM=',sourcedrive,':')
- write('SAVE=',path)
- write('INV=',path,'INV\')
- write('PATCH=',path,'PATCH\')
- write('MIDI=',path,'MIDI\')
- write('WAV=',sourcepath,'WAV\')
- write('FLC=',sourcepath,'FLC\')
- write('DAT=',sourcepath,'DAT')
- write('CODE=',path,'code')
- CloseFile
- copydir('INV')
- copydir('PATCH')
- copydir('MIDI')
- copy('code')
- copy('demo.exe')
- copy('dos4gw.exe')
- copy('ultramid.ini')
- copy('ultramid.exe')
- }
- 2 : {
- OpenFile('Sue.CFG')
- write('CDROM=',sourcedrive,':')
- write('SAVE=',path)
- write('INV=',path,'INV\')
- write('PATCH=',path,'PATCH\')
- write('WAV=',sourcepath,'WAV\')
- write('MIDI=',path,'MIDI\')
- write('FLC=',path,'FLC\')
- write('DAT=',sourcepath,'DAT')
- write('CODE=',path,'code')
- CloseFile
- copydir('INV')
- copydir('PATCH')
- copydir('MIDI')
- copydir('FLC')
- copy('code')
- copy('demo.exe')
- copy('dos4gw.exe')
- copy('ultramid.ini')
- copy('ultramid.exe')
- }
- 3 : {
- OpenFile('Sue.CFG')
- write('CDROM=',sourcedrive,':')
- write('SAVE=',path)
- write('INV=',path,'INV\')
- write('PATCH=',path,'PATCH\')
- write('WAV=',sourcepath,'WAV\')
- write('MIDI=',path,'MIDI\')
- write('FLC=',path,'FLC\')
- write('DAT=',path,'DAT')
- write('CODE=',path,'code')
- CloseFile
- copydir('PATCH')
- copydir('INV')
- copydir('FLC')
- copydir('MIDI')
- copy('code')
- copy('dat')
- copy('demo.exe')
- copy('dos4gw.exe')
- copy('ultramid.ini')
- copy('ultramid.exe')
- }
- endcase
-
- copydir('SDD53')
- OpenFile('uvsetup.bat')
- write('cd SDD53')
- write('attrib -r')
- write('uvconfig.exe')
- write('cd ..')
- closeFile
-
- OpenFile('SUE.BAT')
- Write('@ECHO OFF')
- Write('ATTRIB -r /S')
- Write('demo %1 %2 %3 %4 %5')
- CloseFile
-
- OpenFile('SUEV.BAT')
- Write('@ECHO OFF')
- Write('ATTRIB -r /S')
- write('if exist sdd53\uvconfig.dat goto ok')
- write('cd SDD53')
- write('attrib -r')
- write('uvconfig.exe')
- write('pause')
- write('cd ..')
- write('goto ok')
- write(':weiter')
- write('cd SDD53')
- write('uvconfig.exe')
- write('cd ..')
- write(':ok')
- Write('demo %1 %2 %3 %4 %5')
- CloseFile
-
- InfoWin(' Starten Sie das Spiel mit SUE, ',
- '~ SUEV für SciTec Display Doctor. ',
- '~ Parameter -n : ohne Sound ',
- '~ -f : Soundkarte einstellen ')
- ende:
- cd(path,'.')
-
-