StoreCSD
DIR ADFS::0.$.!BUBLEFAIR

WimpSlot -min 640K -max 640K
RAMFSFree 32 ERROR Bubble Fair requires a RAM drive
IF ADFFS$CPUID>=&A10 THEN RMAFree 128 ELSE RMAFree 32
RMEnsure QTMTracker 1.43 RMLoad ADFFS:trackers.QTMModule
RMEnsure Trk_Player 3.00 RMLoad ADFFS:trackers.TrkPly2QTM
RMEnsure LZWD       1.03 RMLoad ADFFS:extras.LZWD103
COPY PICS.MORPION RAM::0.$.MORPION ~A~C~VF

IF ADFFS$OSVersion>=&35000 THEN ADFRemapVideoMemory 13 208 ELSE ScreenSize 208
ChannelVoice 1 0
ChannelVoice 2 0
ChannelVoice 3 0
ChannelVoice 4 0
ChannelVoice 5 0
ChannelVoice 6 0
ChannelVoice 7 0
ChannelVoice 8 0
ADFForceVSync 4

IF ADFFS$OSVersion>=&35000 THEN ADFEmulateRISCOS 3.11
IF ADFFS$CPUID>=&A10 THEN GOARM3JIT 0
| Un-LZWD BF_code
MEMA 50000 E28F0008 E3A01C92 EF0CD100 EF000011 635F4642 0065646F
GO 50000
| Modify expand to exit back to us
MEMA 4066C EA019E5B >A7FE0 E59F0008 E59F1008 E5810000 E1A0F004 EF000011 0009A57C
GO 40548
| Decrypt code
MEMA A7F24 AD100 AEC4 E51FA010 E51F0010 E3A01B01 E281100C E2405D0A E3A06D0A E2466004 E3A0B000 E3A08046 E1A00000 E1A00000 E3A01B01 E281100C E0566008 43A06D0A 42466004 40466008
MEMA A7F70 E7902001 E02BB002 E7957006 E0222007 E022200F E022200A E7802001 E2566004 43A06D0A 42466004 E2511004 5AFFFFF3 E2588004 5AFFFFEB E3A01B01 E281100C
MEMA A7FB0 E7905001 E025500B E7805001 E2511004 5AFFFFFA EF000011
GO A7F2C
MEMA AE30 EA000023
| Don't load internal Trk_Player
MEMA A3C8 E1A00000
| Fix bugs in protection and prevent direct IOC FDC access
MEMA A3F0 EB00024B >AD60 EA000031 >AECC EA000049
| Change the Module name of the internal GameModes
MEMA 65F84 464273
GO 9894
IF ADFFS$CPUID>=&A10 THEN GOARM3JIT
IF ADFFS$OSVersion>=&35000 THEN ADFRemapVideoMemory
IF ADFFS$OSVersion>=&35000 THEN ADFEmulateRISCOS
ADFForceVSync 0
RMKill Trk_Player
RMKill QTMTracker
RMKill LZWD
RestoreCSD