| To HD install:
| 1. Create a !Hostages folder
| 2. Copy everything from the floppy to !Hostages, except the following files:
|    !BOOT
|    HOSTAGES
|    DATA.GAMEDATA.code (it will error as it is disc protection)
| 3. Create !Hostages.!Run with the following contents:
|    ADFBootFloppy F1020101
SetEval fix$up 0
IF "<Obey$Dir>"<>"@" THEN SetEval fix$up 1
IF "<Obey$Dir>"="@" THEN Set Obey$Dir ADFS::0.$
Set Hostages$Dir <Obey$Dir>
Set patch$ver <Hostages$Dir>.24-05-13

FX 200,3
FX 11,0
FX 4,1
WimpSlot -min 280k -max 280k
ScreenSize 40
IfThere <patch$ver> THEN SetEval fix$up 0

ADFClipScreen 8:5 0 23
IF fix$up THEN FX 225,1
| fixup CORE
IF fix$up THEN ECHO Correcting game code<21>
IF fix$up THEN KEY 0 770F$="<Hostages$Dir>.DATA."+E$+"."+F$|M2540F$="|<Hostages$Dir>.DATA.SPR."+F$|M3030CHAIN "|<Hostages$Dir>."+F$|M3320!K%=1|M3360!K%=0|M
IF fix$up THEN KEY 1 3580DEFPROCdt(A%):LOCAL ERROR|M3590ONERRORLOCAL:ot%=TIME|M3600ot%+=A%:REPEAT:PROCrest:UNTILTIME>=ot%:ot%=TIME:ENDPROC|MSAVE "|<Obey$Dir>.CORE"|MQUIT|M
IF fix$up THEN FX 21,0
IF fix$up THEN FX 138,0,128
IF fix$up THEN FX 138,0,129
IF fix$up THEN BASIC -load <Obey$Dir>.CORE
| fixup END
IF fix$up THEN ECHO <6><10><13> END<21>
IF fix$up THEN KEY 0 30LIBRARY"|<Hostages$Dir>.CORE"|MSAVE "|<Obey$Dir>.END"|MQUIT|M
IF fix$up THEN FX 21,0
IF fix$up THEN FX 138,0,128
IF fix$up THEN BASIC -load <Obey$Dir>.END
| fixup GAME1
IF fix$up THEN ECHO <6><10><13> GAME1<21>
IF fix$up THEN KEY 0 30LIBRARY"|<Hostages$Dir>.CORE"|M160OSCLI("LOAD |<Hostages$Dir>.DATA.GAMEDATA.IMA "+STR$~scrback%)|M170OSCLI("LOAD |<Hostages$Dir>.DATA.GAMEDATA.LIGHT "+STR$~light%)|M
IF fix$up THEN KEY 1 1055PROCdt(4)|M3905PROCdt(12)|MSAVE "|<Obey$Dir>.GAME1"|MQUIT|M
IF fix$up THEN FX 21,0
IF fix$up THEN FX 138,0,128
IF fix$up THEN FX 138,0,129
IF fix$up THEN BASIC -load <Obey$Dir>.GAME1
| fixup GAME2
IF fix$up THEN ECHO <6><10><13> GAME2<21>
IF fix$up THEN KEY 0 30LIBRARY"|<Hostages$Dir>.CORE"|MSAVE "|<Obey$Dir>.GAME2"|MQUIT|M
IF fix$up THEN FX 21,0
IF fix$up THEN FX 138,0,128
IF fix$up THEN BASIC -load <Obey$Dir>.GAME2
| fixup GAME3
IF fix$up THEN ECHO <6><10><13> GAME3<21>
IF fix$up THEN KEY 0 30LIBRARY"|<Hostages$Dir>.CORE"|M220OSCLI("LOAD |<Hostages$Dir>.DATA.GAMEDATA.SIGHT "+STR$~sight%)|M1455IFRND(10)=1THEN|M1475ENDIF|M1600PROCabk:PROCdt(4)|M
IF fix$up THEN KEY 1 3430CALLmask:PROCdt(4)|MSAVE "|<Obey$Dir>.GAME3"|MQUIT|M
IF fix$up THEN FX 21,0
IF fix$up THEN FX 138,0,128
IF fix$up THEN FX 138,0,129
IF fix$up THEN BASIC -load <Obey$Dir>.GAME3
| fixup GAME4
IF fix$up THEN ECHO <6><10><13> GAME4<21>
IF fix$up THEN KEY 0 30LIBRARY"|<Hostages$Dir>.CORE"|MSAVE "|<Obey$Dir>.GAME4"|MQUIT|M
IF fix$up THEN FX 21,0
IF fix$up THEN FX 138,0,128
IF fix$up THEN BASIC -load <Obey$Dir>.GAME4
| fixup SETUP
IF fix$up THEN ECHO <6><10><13> SETUP<21>
IF fix$up THEN KEY 0 20IF M%=0 THEN M%=PAGE:PAGE=M%+&1800:CHAIN"|<Hostages$Dir>.SETUP"|M3330.K% EQUD 0:.music|M3345LDR R0,K%:TEQ R0,#0:LDMEQFD R13!,{R0-R12,PC}|M
IF fix$up THEN KEY 1 3670SYS"OS_CallEvery",1,music,0|M3520F%=OPENIN"|<Hostages$Dir>.DATA.SPL.COLDTEA"|M3790LIBRARY"|<Hostages$Dir>.CORE"|M3820CHAIN"|<Hostages$Dir>.START"|MSAVE "|<Obey$Dir>.SETUP"|MQUIT|M
IF fix$up THEN FX 21,0
IF fix$up THEN FX 138,0,128
IF fix$up THEN FX 138,0,129
IF fix$up THEN BASIC -load <Obey$Dir>.SETUP
| fixup START
IF fix$up THEN ECHO <6><10><13> START<21>
IF fix$up THEN KEY 0 30LIBRARY"|<Hostages$Dir>.CORE"|M290TIME=0:ot%=0|M350PROCdt(2):PROCdisplay|M440FOR A%=1TO4:PROCdt(2):PROCmusic1:NEXT|M450|M460|M470|M750|M780PROCdt(2)|M
IF fix$up THEN KEY 1 900PROCdt(2)|MSAVE "|<Obey$Dir>.START"|MQUIT|M
IF fix$up THEN FX 21,0
IF fix$up THEN FX 138,0,128
IF fix$up THEN FX 138,0,129
IF fix$up THEN BASIC -load <Obey$Dir>.START
IF fix$up THEN ECHO <6><10><13>Patched, running
IF fix$up THEN SAVE <patch$ver> 8000+3

IF ADFFS$OSVersion>=&50000 THEN ADFEmulateRISCOS 3.11
IF ADFFS$OSVersion>=&50000 THEN GOARM3JIT 0
IfThere <patch$ver> THEN BASIC -quit <Hostages$Dir>.SETUP ELSE UnSet patch$ver

| Run from floppy fallback
IF "<patch$ver>"="" THEN StoreCSD
IF "<patch$ver>"="" THEN DIR <Obey$Dir>
IF "<patch$ver>"="" THEN ADFForceVSync 2
IF "<patch$ver>"="" THEN ECHO <21>
IF "<patch$ver>"="" THEN KEY 0 M%=PAGE:PAGE=M%+&1800|MLOAD "SETUP"|M3330.music|M3345MOV R0,#14:MOV R1,#4:SWI"OS_Byte":MOV R3,R1:MOV R0,#13:MOV R1,#4:SWI"OS_Byte":TEQ R3,#0:LDMEQFD R13!,{R0-R12,PC}|M3670SYS"OS_CallEvery",1,music,0|M20|MRUN|F|M
IF "<patch$ver>"="" THEN FX 21,0
IF "<patch$ver>"="" THEN FX 138,0,128
IF "<patch$ver>"="" THEN BASIC
FX 200,0
IF ADFFS$OSVersion>=&50000 THEN GOARM3JIT
IF ADFFS$OSVersion>=&50000 THEN ADFEmulateRISCOS
IF "<patch$ver>"="" THEN ADFForceVSync 0
IF "<patch$ver>"="" THEN RestoreCSD
ADFClipScreen
UnSet fix$up
UnSet patch$ver
UnSet Hostages$Dir