Starport BBS
VIEWER: start.bat MODE: TEXT (CP437)
@Echo Off

Echo Please stand by...
Echo Loading Basic Instinct.
Echo.

If '%Ultrasnd%' == '' Goto NoGus

Ctty Nul
Ren CapaPlay.Dat CapaPlay.Exe
Ren BigVga.Dat BigVga.Com
Ren RunTime.Dat Brun45.Exe
Ctty Con

If Exist Quit.Yes Del Quit.Yes

If '%1' == '1' Goto Part1
If '%1' == '2' Goto Part2

Echo 1 > Decrunch.$$$
Echo IntroTn.Hum >> Decrunch.$$$
Echo Music.Mod >> Decrunch.$$$
Echo Intel.Huf >> Decrunch.$$$ 
Echo Intel.Gnu >> Decrunch.$$$ 
Echo Inst2.Huf >> Decrunch.$$$ 
Echo Inst2.Raw >> Decrunch.$$$ 
Echo Check3.Huf >> Decrunch.$$$ 
Echo Check3.Raw >> Decrunch.$$$ 
Echo Slem.Huf >> Decrunch.$$$ 
Echo Slem.Raw >> Decrunch.$$$ 
Echo Texts.Huf >> Decrunch.$$$ 
Echo Texts.Raw >> Decrunch.$$$ 
Echo ElgBar.Huf >> Decrunch.$$$ 
Echo ElgBar.Raw >> Decrunch.$$$ 
Echo Foggy.Huf >> Decrunch.$$$ 
Echo Foggy.Raw >> Decrunch.$$$ 

Copy BigVga.Com Temp.Raw > nul

CapaPlay Loader.Snd -XLoader.Dat

CapaPlay Music.Mod -XIntro.Dat

If Exist Quit.Yes Goto Finish

Ctty Nul
Del *.Raw
Del *.Grh
Del *.Gnu
Del Music.Mod
Ctty Con

:Part1

Echo 0 > Decrunch.$$$
Echo B-Ware.Huf >> Decrunch.$$$ 
Echo B-Ware.Raw >> Decrunch.$$$ 
Echo Stasi.Huf >> Decrunch.$$$ 
Echo Stasi.Raw >> Decrunch.$$$ 
Echo Sun4.Huf >> Decrunch.$$$ 
Echo Sun4.Raw >> Decrunch.$$$ 
Echo Devil.Huf >> Decrunch.$$$ 
Echo Devil.Raw >> Decrunch.$$$ 
Echo Oepir2.Huf >> Decrunch.$$$ 
Echo Oepir2.Grh >> Decrunch.$$$ 
Echo Font07.Huf >> Decrunch.$$$ 
Echo Font07.Grh >> Decrunch.$$$ 
Echo Cruelty.Hum >> Decrunch.$$$ 
Echo Music.Mod >> Decrunch.$$$ 

CapaPlay Loader.Snd -XLoader.Dat

CapaPlay Music.Mod -XPart1.Dat

If Exist Quit.Yes Goto Finish

Ctty Nul
Del *.Raw
Del *.Grh
Del Music.Mod
Ctty Con

:Part2

Echo 0 > Decrunch.$$$
Echo Bwr!.Huf >> Decrunch.$$$ 
Echo Bwr!.Raw >> Decrunch.$$$ 
Echo Comix.Huf >> Decrunch.$$$ 
Echo Comix.Hrk >> Decrunch.$$$ 
Echo Logga4.Huf >> Decrunch.$$$ 
Echo Logga4.Raw >> Decrunch.$$$ 
Echo Bw2clr.Huf >> Decrunch.$$$ 
Echo Bw2clr.gnu >> Decrunch.$$$ 
Echo BwEcon.Huf >> Decrunch.$$$ 
Echo BwEcon.Raw >> Decrunch.$$$ 
Echo Elgko2.Huf >> Decrunch.$$$ 
Echo Elgko2.Grh >> Decrunch.$$$ 
Echo Drax.Hum >> Decrunch.$$$
Echo Music.Mod >> Decrunch.$$$

CapaPlay Loader.Snd -XLoader.Dat

CapaPlay Music.Mod -XPart2.Dat

Goto End

:NoGus
Echo Too bad!
Echo.
Echo I couldn't find your UltraSnd environment string!
Echo.
Echo Possible solutions:
Echo.
Echo 1. If you don't own an UltraSound: BUY ONE.
Echo.
Echo 2. If you have one installed, but haven't set your variable then:
Echo    Set the variable.
Echo.
Echo    2a. If you don't know HOW to set the variable then just type:
Echo        Set UltraSnd=[BasePort],[PlayDMA],[RecDMA],[GF1 IRQ],[Midi IRQ]
Echo        Example: Set UltraSnd=230,1,3,5,7
Echo.
Echo.
Echo Well, when you've done this try running the demo again.
Echo.
Goto End


:Finish
Cls
Echo You chose to exit the demo, CU L8R!
Echo Please watch the whole demo some time, if you haven't already.
Echo To contact us, dial 0302-20385 (Liket, ask for Leif)
Echo or 0223-33020 (Excalibur, ask for Daniel)
Echo If you wanna talk bullshit and Music dial Excalibur...
Echo If you wanna talk bullshit, code and music, dial Liket...
Echo If you wanna join us, call Liket...
Echo Please note that we're a Serious group - but we do lame things
Echo once in a while! =)  Well, a man's gotta have SOME fun!
Echo.
Echo By the way, did you know that you can start from different parts?
Echo Try DEMO 1, DEMO 2, DEMO 3 or DEMO 4 .....
Echo.
Echo Lita aldrig på en isbjörn med kniv!

:End
Ctty Nul
Del *.Raw
Del *.Grh
Del *.Hrk
Del *.Gnu
Del Music.Mod
Del End.Mod
Del Quit.Yes
Del Settings.Bat
Del Decrunch.$$$
Ren CapaPlay.Exe CapaPlay.Dat
Ren BigVga.Com BigVga.Dat
Ren Brun45.Exe RunTime.Dat
Ctty Con
[ RETURN TO DIRECTORY ]