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

Set Chocks$Dir <Obey$Dir>
ScreenSize 160
SpriteFree 56
RMAFree 120
HideCommandWindow
WIMPSLOT -MIN 640K -MAX 640K
IF ADFFS$OSVersion>=&50000 THEN GOARM4JIT 0
ADFSCREENLOAD <Obey$Dir>.!Piccy
ECHO <19><1><24><255><255><255>
ADFPause 100
RMLOAD <Chocks$Dir>.SOUNDS.JOYSTICK
RMLOAD <Chocks$Dir>.SOUNDS.GUNMD2
RMLOAD <Chocks$Dir>.SOUNDS.WHEELMD
RMLOAD <Chocks$Dir>.SOUNDS.EXPLODEMD2
RMLOAD <Chocks$Dir>.SOUNDS.EXPLODEMD3
RMLOAD <Chocks$Dir>.SOUNDS.ENGINE
RMLOAD <Chocks$Dir>.SOUNDS.Decomp
SLOAD <Chocks$Dir>.SPRITES.SPRITES
SMERGE <Chocks$Dir>.SPRITES.2PLAYER
<Chocks$Dir>.SPRITES.CHOCKCHAR
| Add error free Joystick check and correct the exit code
ADFForceVSync 4
KEY 0 SYS &EFFC0 TO J%|M50|M5848|MRUN|F|M
ECHO <21>
FX 225,1
FX 21,0
FX 138,0,128
BASIC -load <Obey$Dir>.CHOCKSAWAY
FX 20
ADFForceVSync 0
IF ADFFS$OSVersion>=&50000 THEN GOARM4JIT