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

IF ADFFS$CPUID>=&A10 THEN ADFRemapVideoMemory 9 80 ELSE ScreenSize 80
RMAFree 256
RMEnsure QTMTracker   1.43 RMLoad ADFFS:trackers.QTMModule
RMEnsure MusicModule2 0.02 RMLoad ADFFS:trackers.MusMod2
Set JSflag 0
IF ADFFS$OSVersion<&50000 THEN RMEnsure Joystick 0.0 Set JSflag 1
IF JSflag>0 THEN RMLoad ADFFS:extras.JoyMod

IF ADFFS$CPUID<&A10 THEN RMensure TequeMemory 0 RMLoad MemMod
IF ADFFS$CPUID<&A10 THEN TEQUELOADSCR

WimpSlot -min 488k -max 488k
LOAD ProfProg
ADFCRC 8000 207BC D82BEB55 ProgProg
MPTITLMUS
IF ADFFS$CPUID>=&A10 THEN GOARM3JIT 0
| Correct JoyMod Joystick code
MEMA 181E0 E330001F 13300000 >181F0 E330001F 13300000
GO 8000
IF ADFFS$CPUID>=&A10 THEN GOARM3JIT

IF JSflag>0 THEN RMEnsure Joystick 0.0 Set JSflag 0
IF JSflag>0 THEN RMKill Joystick
Unset JSflag
RMKill MusicModule2
RMKill QTMTracker
IF ADFFS$CPUID<&A10 THEN RMKill TequeMemory
IF ADFFS$CPUID>=&A10 THEN ADFRemapVideoMemory
RestoreCSD