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

Set Prov$Dir <Obey$Dir>
ADFJoystickKeys J1 U=60 D=78 B1=71 B2=95 B3=59
| Keys:
| A             - up
| Z             - down
| RETURN     B1 - Fire
| SPACE      B2 - Swap direction
| Left CTRL  B3 - Boost
LOAD <Prov$Dir>.EXPLO 8F00
WimpSlot -min 500K -max 500K
IF ADFFS$OSVersion>=&50000 THEN GOARM4JIT 0
<Prov$Dir>.STARTUP
FX 112,2
<Prov$Dir>.BETTY2
LOAD <Prov$Dir>.d1 143E0
LOAD <Prov$Dir>.d1 10030
LOAD <Prov$Dir>.d2 14398
StoreCSD
DIR <Prov$Dir>
GO &15E04
ADFJoystickKeys
FX 112,0
IF ADFFS$OSVersion>=&50000 THEN GOARM4JIT
UnSet Prov$Dir
RestoreCSD