| Install to HD:
| 1. Copy !KONFLIKT to HD
| 2. Replace the contents of !KONFLIKT.!RUN with:
|  ADFBootFloppy F1021801

IF "<Obey$Dir>"="@" THEN Set Obey$Dir ADFS::0.$.!KONFLIKT
HideCommandWindow
IF ADFFS$OSVersion>=&35000 THEN ADFRemapVideoMemory 9 160 ELSE ScreenSize 160
WimpSlot -min 720K -max 720K
ADFProtectCMOS On
ADFProtectModules On
Set Alias$RMREINIT ADFDoNothing %%*0
Set Alias$RMKILL ADFDoNothing %%*0
StoreCSD
Dir <Obey$Dir>
KEY 0 30MODE15:OFF:DIM location 250:DIM workspace (170*1024):DIM ddd (170*1024):PROCA|M100QUIT|MRUN|F|M
ECHO <21>
IF ADFFS$CPUID>=&A10 THEN GOARM3JIT 0
FX 225,1
FX 21,0
FX 138,0,128
BASIC -load LOADER
SpriteFree 32
ADFPause 200

| Fix speed issues and Page Zero access in Voice Generator
KEY 0 10030PROCstallK(4700)|M10730F%=TIME+385:WHILETIME|<F%ANDF%|<|>200000|M10760ENDWHILE|M11560IFsel=1THENQUIT|M12580PROCstall(167)|M12635SYS"ADFFS_KeyDebounce"|M13290PROCstallK(4700)|M
KEY 1 13810PROCstallK(4700)|M14090PROCstall(335)|M40000DEFPROCstall(F%):F%=TIME+F%:WHILETIME|<F%:ENDWHILE:ENDPROC|M40010DEFPROCstallK(F%):F%=TIME+F%:WHILETIME|<F%ANDINKEY(0)=-1:ENDWHILE:ENDPROC|M
KEY 2 710FORP%=264TO392STEP32:musak!P%=&8000:NEXT:P%=musak+&374:[OPT2:MOV R1,R14:BL&BBFE0:]:P%=&BBFE0:[OPT2:CMP R11,#&8000:MOVLT PC,R1:MOV R6,R1:MOV R1,R14:MOV R14,R6:LDRB R6,[R11,#3]:LDRB R4,[R11,#2]:MOV PC,R1:]|M
KEY 3 6950PROCstall(57)|M14090|M7271|M7272|M7565FOR A%=&74F00TO&75000STEP4:code%!A%=0:NEXT|M*UnSet KEY$*|MRUN|F|M
ECHO <21>
FX 21,0
FX 138,0,128
FX 138,0,129
FX 138,0,130
FX 138,0,131
BASIC -load NEWVERT
ChannelVoice 1 1
FX 20
UnSet Alias$RMREINIT
UnSet Alias$RMKILL
IF ADFFS$CPUID>=&A10 THEN GOARM3JIT
IF ADFFS$OSVersion>=&35000 THEN ADFRemapVideoMemory
ADFProtectCMOS Off
ADFProtectModules Off
RestoreCSD