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

Set OddBall$Path <Obey$Dir>.
SetEval OddBallSound 1
SetEval OddBallMusic 1
SetEval OddBallReset 0
RMEnsure QTMTracker 1.45 RMLoad ADFFS:trackers.QTMModule
RMEnsure Stasis 1.22 RMLoad ADFFS:trackers.Stasis
StasisLink 1 1
StasisLink 2 2
StasisLink 3 3
StasisLink 4 4
StasisLink 5 5
StasisLink 6 6
StasisLink 7 7
StasisLink 8 8
WimpSlot -min 640K -max 640K
IF ADFFS$OSVersion>=&50000 THEN GOARM3JIT 0
IF ADFFS$OSVersion<&50000 THEN OddBall:Code.NoError RMEnsure GameModes 0.00 RMLoad System:Modules.GameModes
IF ADFFS$OSVersion<&50000 THEN OddBall:Code.NoError RMEnsure GameModes 0.00 RMLoad OddBall:Modules.GameModes
IF ADFFS$OSVersion<&50000 THEN Oddball:Code.NoError RMEnsure IRQUtils 0.00  RMLoad Oddball:Modules.IRQUtils
OddBall:Code.Title
SetMacro OddBall$LevelPath <OddBall$Path>
Set OddBall$Maze 1
Set Oddball$No 1
SetMacro OddBall$SavePath <OddBall$Path>Saved.<OddBall$No>.
Set OddBall$DemoPath <OddBall$Path>Demo.
Set OddBall$FilePath <Oddball$DemoPath>
If OddBallSound=0 Then Audio Off
If OddBallSound=1 Then Audio On
| Fix VSync wait in Blitz
IF ADFFS$OSVersion>=&50000 THEN JITMEMORYA 22C BA000007 EF020013 Blitz
RMLoad OddBall:Modules.Blitz
| Bugfix: SWI without X in StasisMod
IF ADFFS$OSVersion>=&50000 THEN JITMEMORYA 115C EF000020 EF020020 StasisMod
RMEnsure StasisMod 0.0 RMLoad OddBall:Modules.StasisMod
| Bugfix: Wait for StasisMod to initialise
FX 19
FX 19
FX 19
FX 19
If OddBallMusic=1 Then PlayMod 0 OddBall:Sounds.Music
| Fix code so it doesn't generate an error
IF ADFFS$OSVersion>=&50000 THEN JITMEMORYA 32E0 08BD8FFF E8BD8FFF Amnesia
RMLoad OddBall:Modules.Amnesia
RMLoad OddBall:Modules.FastSpr

Set OddBall$Key1 <Key$1>
Set OddBall$Key2 <Key$2>
Set OddBall$Key3 <Key$3>
Set OddBall$Key4 <Key$4>
Set OddBall$Key5 <Key$5>
Set OddBall$Key6 <Key$6>
Set OddBall$Key7 <Key$7>
Set OddBall$Key8 <Key$8>
Set OddBall$Key9 <Key$9>
Set OddBall$Key10 <Key$10>
Set OddBall$Key11 <Key$11>
Set OddBall$Key12 <Key$12>

OddBall:Code.NoError OddBall:Keys

StasisLoad 2 OddBall:Sounds.Blam
StasisLoad 3 OddBall:Sounds.Bonus
StasisLoad 4 OddBall:Sounds.Bounce
StasisLoad 5 OddBall:Sounds.Clink
StasisLoad 6 OddBall:Sounds.Crack
StasisLoad 7 OddBall:Sounds.Explo
StasisLoad 8 OddBall:Sounds.FallOff
StasisLoad 9 OddBall:Sounds.Goodies
StasisLoad 10 OddBall:Sounds.HollowPlop
StasisLoad 11 OddBall:Sounds.Magnet
StasisLoad 12 OddBall:Sounds.Throb

LOAD OddBall:Code.LoadCode 8000
MEMA 8068 EF000011
GO 8000
IF ADFFS$OSVersion>=&50000 THEN GOARM3JIT
RMKill Stasis
RMKill QTMTracker