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

Set JoyFlag 0
Set Reve$Dir <Obey$dir>
Set Joy$dir <Obey$Dir>
IF ADFFS$OSVersion<&50000 THEN RMEnsure JoyKA3010 2 <Joy$Dir>.JoyPatch

RMAFree 200
RMEnsure QTMTracker   1.43 RMLoad ADFFS:trackers.QTMModule
RMEnsure MusicModule2 0.06 RMLoad ADFFS:trackers.Musmod2

IF ADFFS$CPUID>=&A10 THEN ADFRemapVideoMemory 13 80 ELSE ScreenSize 80

FX 200 1 0
wimpslot -min 540k -max 540k
IF ADFFS$CPUID>=&A10 THEN GOARM3JIT 0

| Speed up decoding
IF ADFFS$CPUID>=&A10 THEN JITMEMORYA 70980 E24FD008 E28FDA01

<Reve$Dir>.LOADER

IF ADFFS$CPUID>=&A10 THEN GOARM3JIT
IF ADFFS$CPUID>=&A10 THEN ADFRemapVideoMemory
RMKill MusicModule2
RMKill QTMTracker
If joyflag=255 THEN RMKill Joystick
IF ADFFS$OSVersion<&50000 THEN RmKill JoyKA3010

Unset Reve$Dir
Unset JoyFlag
UnSet Joy$dir
RestoreCSD