IF "<Obey$Dir>"="@" THEN Set Obey$Dir ADFS::AGGRESSOR.$.!Aggressor
HideCommandWindow
Set Aggressor$Dir <Obey$Dir>
RMAFree 64
IF ADFFS$OSVersion>=&50000 THEN ADFRemapVideoMemory 13 160 ELSE ScreenSize 160
RMensure FPEmulator 0.00 RMLoad <Aggressor$DIR>.FPEmulator
RMEnsure LZWD 1.03 RMLoad ADFFS:extras.LZWD103
<Aggressor$Dir>.MODERN
Wimpslot -min 576K -max 576K
IF ADFFS$OSVersion>=&50000 THEN GOARM3JIT 0
| Fix bug in code: jumps to the wrong location
IF ADFFS$OSVersion>=&50000 THEN JITMEMORYA DE14 E59C0404 E28F0D05
IF ADFFS$OSVersion>=&50000 THEN JITMEMORYA DE94 E59C0404 E28F00C0

| Quit correctly
IF ADFFS$OSVersion>=&50000 THEN JITMEMORYA 27F00 EF000005 EF000011

| Add key debounce when remapping keys
IF ADFFS$OSVersion>=&50000 THEN JITMEMORYA 1D274 DAFFFFED EF0793C6

ADFJoystickKeys J1 L=78 R=79 U=65 D=82 B1=66 B2=43 B3=60 B4=39 J2 L=98 R=100 U=74 D=92 B1=75 B2=54 B3=89 B4=101
| Kosh  Heckler       Joystick
| X     Left cursor   Left      - Left
| Z     Right cursor  Right     - Right
| H     Keypad 6      Up        - Up
| B     Keypad 3      Down      - Down
| J     Keypad +      B1        - Fire
| T     Page down     B2        - Turn
| A     Up cursor     B3        - Load
| Q     Keypad 0      B4        - Nuke

ADFForceVSync 4
FX 200 1
<Aggressor$Dir>.LOADER
FX 200 0
ADFJoystickKeys
ADFForceVSync 0
IF ADFFS$OSVersion>=&50000 THEN GOARM3JIT
IF ADFFS$OSVersion>=&50000 THEN ADFRemapVideoMemory
RMEnsure LZWD 0.0 Set kill$LZWD 0
IF "<kill$LZWD>"="" THEN RMKill LZWD
UnSet Aggressor$Dir
UnSet kill$LZWD