pal
t paradise.txt
maus
;	Global Effect
;	-------------
;
;	1.3/2.0 Startup Sequence.
;	Workbench 1.3.2 System Files.
;
;	By Toby Simpson 05-Feb-92/Vsn 8.280+/AmigaDOS
;	Update 03 Mar. 92 for 9.287+
;	Gamma-Release updates 21-Mar 92 for 10.50
;
;	(C) Copyright Toby W.Simpson, Millennium Interactive Ltd., 1992
;	ALL RIGHTS RESERVED
;
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

echo "*NGlobal Effect"
echo "============="
echo "*N(C) Copyright 1992 Millennium Interactive Ltd., All rights reserved."
echo "By Toby W.Simpson"
echo "*NPlease wait, loading ...." NOLINE

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