;-> WERSJA POLSKA "GLOBAL EFECT-u" AMIGAMAN/ACTION DIRECT WARSZAWA 1992.06.16 
c/cls
c/go 0,0,c/this
c/go1 -l c/this
addbuffers df0: 25                      ; Lower this for ram problems?
stack 7000                              ; DON'T CHANGE!!!
failat 21

cd ram:
cd global_disk1:

if not exists ram:env
     makedir >nil: ram:env
     endif

if not exists ram:t
     makedir >nil: ram:t
     endif

assign env: ram:env
assign t: ram:t

2

status >env:process command=copper
break <env:process >nil: ?
delete env:process 			; Stops unfortunate copper probs.

run >nil: <nil: global_disk1:c/copper

global_disk1:c/startup			; Build script and get langauge/VM

echo "*N*N*E[1mGame operating.......*N"
execute env:runcommand
delete env:runcommand

status >env:process command=copper
break <env:process >nil: ?
delete env:process			; Remove the copper list stabiliser.

ask "*NContinue CLI? (Type 'n' if not sure) [y/N]:"
if warn
  echo "Leaving initial CLI running."
  quit 0
else
  echo "Loading Workbench ...." NOLINE
  loadwb
  endcli >nil:
  endif
quit 0