.bra {
.ket }

failat 21

c:SetPatch >NIL:

resident c:assign pure
resident c:execute pure
assign t: ram:

assign SYS: 	  CD0:
assign Demos:     SYS:Demos

assign >NIL: BIN: exists
if warn
    assign Bin:       Demos:bin
endif

assign AV_Player: Bin:
assign ENV: ram:
assign LOCALE: ram:

assign >NIL: Scripts: exists
if warn
    assign Scripts:   SYS:scripts
endif

if exists CD0:PFCD
   assign >NIL: PFCD: CD0:PFCD
endif

if exists CD0:PFCD_NTSC
   assign >NIL: Pinball_Fantasies_NTSC: CD0:PFCD_NTSC
endif


if exists CD0:Oscar
   assign >NIL: Oscar: CD0:Oscar
endif

path CD0:c BIN: add

assign >NIL: DebugDisk: exists
if not warn
   execute DebugDisk:debugscript
endif

;NOTE !!! if you update Workbench, REMEMBER to remove
;ADDBUFFERS DF0: from s/startup-sequence !!!

;FreeAnim used to go here ;-) - Not now - program should do freeanim
;Bin:FreeAnim >NIL:

; JOYMOUSE 4
;RUN >NIL: Bin:JoyMouse


BIN:warnifpressed >NIL: FORWARD

if warn
    ;======= NO DEMO MODE

run >NIL: BIN:gameselect DEMOS:gameselect2.pic MINUTES -1

    else

    ;======= DEMO MODE

run >NIL: BIN:gameselect DEMOS:gameselect2.pic SECONDS 45 REBOOTLOOPS 1


endif




endcli >NIL:
