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

Set ThamesW$Dir <Obey$Dir>
ScreenSize 160
WimpSlot -min 576K -max 576K

Set ThamesWater$DataDir <Obey$Dir>.!TWData
IF ADFFS$CPUID>&A10 THEN GOARM3JIT 0
RMEnsure GameModes 0 RMLoad <ThamesW$Dir>.GameModes
RMEnsure UtilityModule 3.30 <ThamesW$Dir>.PatchGM 1
| Bugfix: Page Zero access
IF ADFFS$CPUID>&A10 THEN JITMEMORYA 846C E1A04000 E1B04000
IF ADFFS$CPUID>&A10 THEN JITMEMORYA 8484 E5D40000 15D40000
IF ADFFS$CPUID>&A10 THEN JITMEMORYA 8488 E3500000 13500000

Unset TWNoMem
<ThamesW$Dir>.Setmemory 00
If"<TWNoMem>"<>"" Then Error 0 Unable to run !ThamesW
<ThamesW$Dir>.WaitLoad <ThamesW$Dir>.Breifing
<ThamesW$Dir>.WaitLoad <ThamesW$Dir>.ControlC 0
RMEnsure UtilityModule 3.30 <ThamesW$Dir>.PatchGM 0
<ThamesW$Dir>.Exit
IF ADFFS$CPUID>&A10 THEN GOARM3JIT