IF "<Obey$Dir>"="@" THEN Set Obey$Dir ADFS::MirrorImg.$.!MirrorImg

Set Mirror$Dir <Obey$Dir>
Set Mirror$Levels <Obey$Dir>.Levels

IF ADFFS$OSVersion>=&50000 THEN RMEnsure QTMTracker 1.45 RMLoad ADFFS:trackers.QTMModule

Wimpslot -min 1600K -max 1600K
IF ADFFS$OSVersion>=&50000 THEN GOARM4JIT 0
| Prevent elevated code
IF ADFFS$OSVersion>=&50000 THEN JITMEMORYA 20000 EF000016 E1A00000
IF ADFFS$OSVersion>=&50000 THEN JITMEMORYA 1ABB0 EF000016 E1A00000
IF ADFFS$OSVersion>=&50000 THEN JITMEMORYA 9978 EF000016 E1A00000
IF ADFFS$OSVersion>=&50000 THEN JITMEMORYA 93E4 EF000016 E1A00000

| Prevent direct entry into FileCore
IF ADFFS$OSVersion>=&50000 THEN JITMEMORYA 23DD8 EF020016 E1A00000
IF ADFFS$OSVersion>=&50000 THEN JITMEMORYA 23DDC E58FF048 E1A00000
IF ADFFS$OSVersion>=&50000 THEN JITMEMORYA 23E0C E1A0F005 EF060240
IF ADFFS$OSVersion>=&50000 THEN JITMEMORYA 23E10 00000000 EA000009
IF ADFFS$OSVersion>=&50000 THEN JITMEMORYA 23E48 E330F003 E1A00000

| Prevent loading the internal version of QTMTracker
IF ADFFS$OSVersion>=&50000 THEN JITMEMORYA DCBC0 EF00001E E1A00000

<Mirror$Dir>.!RunImage
IF ADFFS$OSVersion>=&50000 THEN GOARM4JIT
SetEval kill$mod 1
RMEnsure QTMTracker 0.00 SetEval kill$mod 0
IF kill$mod THEN RMKill QTMTracker
UnSet kill$mod
UnSet Mirror$Dir
UnSet Mirror$Levels