;                   SUPREME presents:
;                    Star Trek Game
;                   Startup-Sequence
;          « we HATE stupid recrackers!! »
;  so Quicksilver, take off your FUCKING fingers!!!

FastMemFirst
Type megadeath
;
ask " Do you have 1 megabyte? (Y/N):"
if WARN
 supreme
Endif
;
Ask " Wanna read the Docs (GERMAN!)? (Y/N):"
If WARN
 Less StarTrek.DOC
EndIf

Ask " Wanna see the Intro-Anim ? (Y/N):"
If WARN
 ShowAnim >Nil: TrekGame.preanim +4
EndIf

CheckMem 1500000 
If NOT WARN
 Ask " Enough Memory - Copy DataDisk to RAM: ? (Y/N):"
 If WARN
  Echo "*N Copying Datadisk to RAM: ... *N"
  Copy STDATA: ram: all quiet
  Ask " Please Remove DataDisk, then press <Return>!"
  Assign STDATA: RAM:
 EndIf
 Echo "*N Starting the Game ..."
 FailAt 3000000  ; ahem...
 StarTrek
 FailAt 20
Else
 FailAt 3000000
 CheckMem 600000
 If WARN
  Echo "*N 512K Memory only - Starting Special Version with less Sounds."
  StarTrek512
 Else
  Echo "*N 1MB Memory - Starting the Game ..."
  StarTrek
 EndIf
 FailAt 20
EndIf

Type s/Bye

Show Enterprise.pic

; End of Script