| To install to HD
| 1. Create a !Confusion directory on the HD
| 2. Copy Confusion.* into !Confusion
| 3. Save this file as !Confusion.!Run
IF "<Obey$Dir>"="@" THEN Set Obey$Dir ADFS::0.$.Confusion
StoreCSD
DIR <Obey$Dir>

RMAFree 256
ScreenSize 160
SpriteFree 32

RMEnsure FPEmulator 0.0 RMLoad FPEmulator
PRINT Text
WimpSlot -min 256K -max 256K
IF ADFFS$CPUID>=&A10 THEN GOARM3JIT 0
| Fix exit code in sound Modules
IF ADFFS$CPUID>=&A10 THEN JITMEMORYA 300 E92D401F E1A0F00E EXPLODE
IF ADFFS$CPUID>=&A10 THEN JITMEMORYA 300 E92D401F E1A0F00E H
IF ADFFS$CPUID>=&A10 THEN JITMEMORYA 300 E92D401F E1A0F00E ITTPCE
IF ADFFS$CPUID>=&A10 THEN JITMEMORYA 300 E92D401F E1A0F00E GAMEOVER

RMEnsure EXPLODE 0.0 RMLoad Effects.CIS3
RMEnsure H 0.0 RMLoad Effects.DIEM
RMEnsure ITTPCE 0.0 RMLoad Effects.ITTPC
RMEnsure GAMEOVER 0.0 RMLoad Effects.GAMEM

ChannelVoice 1 ITTPCE
FX 200,2
ECHO <22><13><12><23><1><0><0><0><0><0><0><0><0>
ECHO Confusion
ECHO
ECHO is Loading
ECHO
ECHO Please Wait
Sound 1 65520 15 1
ADFPause 250
ChannelVoice 1 H
Set Alias$CH.1 ChannelVoice 1 %%*0

| Bug fix: FX 113 is missing the bank
LOAD TitleData 8000
ADFCRC 8000 D008 17112B97 TitleData
MEMA CF5C 312C33
GO 8000

UnSet Alias$CH.1
RMKill EXPLODE
RMKill H
RMKill ITTPCE
RMKill GAMEOVER
IF ADFFS$CPUID>=&A10 THEN GOARM3JIT
RestoreCSD