| To install to HD:
| 1. Copy !Soccer from disc 1 to HD
| 2. Copy !Soccer from disc 2 to HD, overwritting as necessary
| 3. Copy the disc 1 floppy image as !Soccer.F1032601
| 4. Replace the contents of !Soccer.!Run with:
|  ADFBootFloppy F1032601
IF "<Obey$Dir>"="@" THEN Set Obey$Dir ADFS::0.$.!Soccer
IfThere <Obey$Dir>.F1032601 THEN ADFMount <Obey$Dir>.F1032601
ADFHideHourglass On
FX 9,0
IF ADFFS$OSVersion>=&35000 THEN ADFRemapVideoMemory 9 160 ELSE ScreenSize 160
ECHO <22><9>
ECHO (C) 1993 SENSIBLE SOFTWARE.
ECHO
ECHO PLEASE WAIT WHILE LOADING.
ADFPause 100

IF ADFFS$OSVersion>=&35000 THEN RMEnsure QTMTracker     1.43 RMLoad ADFFS:trackers.QTMModule
IF ADFFS$OSVersion>=&35000 THEN RMEnsure DesktopTracker 2.00 RMLoad ADFFS:trackers.DTT
IF ADFFS$OSVersion>=&35000 THEN ADFEmulateRISCOS 3.11

Set Soccer$Dir <Obey$Dir>
RMEnsure DeskTopTracker 1.11 RMLoad <Soccer$Dir>.PlayMod
Set JSflag 0
IF ADFFS$OSVersion<&50000 THEN RMEnsure Joystick 0.0 Set JSflag 1
IF JSflag>0 THEN RMLoad ADFFS:extras.JoyMod

IF ADFFS$OSVersion>=&35000 THEN Set SSMemory$Flag 1 ELSE Run <Soccer$Dir>.FreeMem
WimpSlot -min 128k -max 128k
IF ADFFS$OSVersion>=&35000 THEN Set Vga$Mode 0 ELSE Run <Soccer$Dir>.ChooseMode

IF <SSMemory$Flag> <> 0 Then WimpSlot -min 1000k -max 1000k
IF <SSMemory$Flag> =  0 Then WimpSlot -min 512k -max 512k
IF ADFFS$CPUID>=&A10 THEN GOARM3JIT 0
IF <Vga$Mode> = 0  Then RMEnsure ScMode 0.01 RMLoad <Soccer$Dir>.ScMode
IF <Vga$Mode> <> 0 Then RMEnsure MyMode 0.00 RMLoad <Soccer$Dir>.MyMode
| Bug fix: Page Zero access
IF ADFFS$CPUID>=&A10 THEN JITMEMORYA 37514 EAFF50EE E8BD8000

| Bug fix: Device 3 handler doesn't preserve IRQ R14
IF ADFFS$CPUID>=&A10 THEN JITMEMORYA 8E74 01B0F00E 049DF004
IF ADFFS$CPUID>=&A10 THEN JITMEMORYA 8E78 E92D4038 E92D0038
IF ADFFS$CPUID>=&A10 THEN JITMEMORYA 8F00 E8BD4038 E8BD8038
IF ADFFS$CPUID>=&A10 THEN JITMEMORYA 8F10 E92D41F8 E92D01F8
IF ADFFS$CPUID>=&A10 THEN JITMEMORYA 8FC0 E8BD41F8 E8BD81F8

IF ADFFS$CPUID>=&A10 THEN JITMEMORYA 82CB8 E3A03632 E52DE004
IF ADFFS$CPUID>=&A10 THEN JITMEMORYA 82CE4 01B0F00E 049DF004
IF ADFFS$CPUID>=&A10 THEN JITMEMORYA 82CE8 E92D4038 E92D0038
IF ADFFS$CPUID>=&A10 THEN JITMEMORYA 82D80 E92D41F8 E92D01F8

| Bug fix: Leaves IRQ disabled
IF ADFFS$CPUID>=&A10 THEN JITMEMORYA 8DB0 E3A02008 EA07DC92
IF ADFFS$CPUID>=&A10 THEN MEMA 200000 E52DE004 EF020013 E3A02008 EAF82368

<Soccer$Dir>.Credits
IF <Vga$Mode> =  0 Then RMkill ScMode ELSE RMkill MyMode
IF ADFFS$CPUID>=&A10 THEN GOARM3JIT
IF ADFFS$OSVersion>=&35000 THEN ADFRemapVideoMemory
IF ADFFS$OSVersion>=&35000 THEN ADFEmulateRISCOS
RMkill DeskTopTracker
IF ADFFS$OSVersion>=&35000 THEN RMKill QTMTracker
IF JSflag>0 THEN RMEnsure Joystick 0.0 Set JSflag 0
IF JSflag>0 THEN RMKill Joystick
Unset JSflag
Unset Soccer$Dir
Unset SSMemory$Flag
Unset Vga$Mode
ADFHideHourglass Off