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

Set Pon$Dir <Obey$Dir>
IF ADFFS$OSVersion>=&35000 THEN ADFRemapVideoMemory 13 160 ELSE ScreenSize 160
ADFForceVSync 2
ADFEmulateFDC 1772

WimpSlot -min 640K -max 640K
IF ADFFS$CPUID>=&A10 THEN GOARM3JIT 0

| Fix jump to SWI vector
IF ADFFS$CPUID>=&A10 THEN JITMEMORYA 96DE4 EB060240 EF060240
IF ADFFS$CPUID>=&A10 THEN JITMEMORYA 96E40 EF000016 E1A00000
IF ADFFS$CPUID>=&A10 THEN JITMEMORYA 96E6C E92D0001 E1A00000
IF ADFFS$CPUID>=&A10 THEN JITMEMORYA 96E90 EA000D1B EAFFFFD3

| Fix read from unset variable
IF ADFFS$CPUID>=&A10 THEN JITMEMORYA 6491C E898007E EA026DB7
IF ADFFS$CPUID>=&A10 THEN MEMA 100000 E898007E E3350000 0AFD9268 EAFD9243

<Pon$Dir>.!RunImage

IF ADFFS$CPUID>=&A10 THEN GOARM3JIT
IF ADFFS$OSVersion>=&35000 THEN ADFRemapVideoMemory
UnSet Pon$Dir
ADFForceVSync 0
ADFEmulateFDC