IF "<Obey$Dir>"="@" THEN Set Obey$Dir ADFS::0.$.!ManUnited
StoreCSD
Dir <Obey$Dir>

Set ManUtd$Dir <Obey$Dir>

RMAFree 200
RMEnsure QTMTracker   1.43 RMLoad ADFFS:trackers.QTMModule
RMEnsure MusicModule2 0.02 RMLoad ADFFS:trackers.MusMod2

IF ADFFS$OSVersion>=&35000 THEN ADFEmulateRISCOS 3.11
IF ADFFS$OSVersion>=&35000 THEN ADFRemapVideoMemory 13 160 ELSE ScreenSize 160

Wimpslot -min 576K -max 576K
IF ADFFS$CPUID>=&A10 THEN GOARM3JIT 0
| Prevent elevation so IOMD doesn't crash detecting the CPU type
IF ADFFS$CPUID>=&A10 THEN JITMEMORYA 69D28 EF020016 E1A00000

RMensure Manutdmodule 0 RMLoad <ManUtd$Dir>.Manutdmod
Set JSflag 0
IF ADFFS$OSVersion<&50000 THEN RMEnsure Joystick 0.0 Set JSflag 1
IF JSflag>0 THEN RMLoad ADFFS:extras.JoyMod
SET RTFM$Flag 0
KEY 0 SYS &EFFC2 TO A%;E%:IF (E% AND 1)=0 AND A%=0 THEN *SET RTFM$Flag 1|MQUIT|M
FX 225,1
FX 21,0
FX 138,0,128
BASIC

Run <ManUtd$Dir>.Manutdmus
Run <ManUtd$Dir>.Intro
Run <ManUtd$Dir>.Intro2
Run <ManUtd$Dir>.Management

RMKill Manutdmodule
IF ADFFS$OSVersion>=&35000 THEN ADFRemapVideoMemory
IF ADFFS$CPUID>=&A10 THEN GOARM3JIT
IF ADFFS$OSVersion>=&35000 THEN ADFEmulateRISCOS
IF JSflag>0 THEN RMEnsure Joystick 0.0 Set JSflag 0
IF JSflag>0 THEN RMKill Joystick
Unset JSflag
RMKill Musicmodule2
RMKill QTMTracker
Unset ManUtd$Dir
Unset RTFM$flag
RestoreCSD