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

Set GOLD$Dir <Obey$Dir>
Set GOLD$Escape NO
Set GOLD$Man NO
IfThere <GOLD$Dir>.GSAVE THEN ELSE CDir <GOLD$Dir>.GSAVE
ScreenSize 80

RMEnsure FPEmulator 2.80 RMLOAD SYSTEM:MODULES.FPEmulator
RMEnsure FPEmulator 2.80 Error Floating point emulator is out of date

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

musload <GOLD$Dir>.music.olym_mus
muson

IF ADFFS$CPUID>=&A10 THEN WimpSlot -min 736k -max 736k ELSE WimpSlot -min 640k -max 640k
IF ADFFS$CPUID>=&A10 THEN GOARM3JIT 0
ADFClipScreen 8:5 0 20
<GOLD$Dir>.OLY
IF ADFFS$CPUID>=&A10 AND ADFFS$JIT THEN Set GOLD$Escape YES
IF "<GOLD$Escape>" = "NO" AND "<GOLD$Man>" = "YES" THEN <GOLD$Dir>.FILO
IF ADFFS$CPUID>=&A10 AND ADFFS$JIT THEN Set GOLD$Escape YES
RMKill musicmodule2
IF "<GOLD$Escape>" = "NO" THEN <GOLD$Dir>.EVENT
ADFClipScreen
IF ADFFS$CPUID>=&A10 THEN GOARM3JIT
Set musmod2$loaded 1
RMEnsure MusicModule2 0.0 Set musmod2$loaded 0
IF "<musmod2$loaded>"="1" THEN RMKill MusicModule2
UnSet musmod2$loaded
RMKill QTMTracker
UnSet GOLD$Dir
UnSet GOLD$Escape
UnSet GOLD$Man
RestoreCSD