IF "<Obey$Dir>"="@" THEN Set Obey$Dir ADFS::0.$.!MrDoo
HideCommandWindow
Set MrDoo$Dir <Obey$Dir>
IF ADFFS$OSVersion>=&50000 THEN ADFRemapVideoMemory 13 90 ELSE ScreenSize 90
SpriteFree 200
WimpSlot -min 512K -max 512K
IF ADFFS$OSVersion>=&50000 THEN GOARM3JIT 0

| Fix bug in code
KEY 0 80CALLVq:CALLVr:CLS:OFF:REPEAT:F%!1500=0:F%!1320=6:CALLVs:CLS:OFF:CALLVt:PROCVl:CALLVq:F%!Vu=1:PROCVv:PROCVw:IF NOTUW THEN|M220ENDIF:UNTIL UW:OSCLI"Fx 200 0":CALL Vp:OSCLI"SNew":QUIT|M
| Add ESC key debounce
KEY 1 2220DEF PROCVw:LOCAL B:ip=FALSE:iq=TRUE:REPEATUNTILNOTINKEY(-113):REPEAT:CALL hx:IF INKEY(-99) THEN ip=TRUE|M*KEY 1|MRUN|F|M
ECHO <21>
FX 225,1
FX 21,0
FX 138,0,128
FX 138,0,129
BASIC -load <MrDoo$Dir>.!RunImage
IF ADFFS$OSVersion>=&50000 THEN GOARM3JIT
IF ADFFS$OSVersion>=&50000 THEN ADFRemapVideoMemory
UnSet MrDoo$Dir