|050
|Above line must be the first it tells the !Monitor
|application which mode is being used.

|Run file for Fervour
|Uses the 50KHz mode for normal monitors
ADFMount <Fervour$Dir>.F1015101

| Bypass loader screen
MEMA 10000 3 0 616F4C46 24726564 6B736154 0 E24F1020 E3A0000E EF020007 E2811002 E4D10001 E4D12001 E1800402 E4D12001 E1800802 E50F0044 E24F0040 E24F104C E3A02004 E3A03000 E3A04001 EF020024 EF020011
GO 10018

UnSet Alias$RunFervour
RMEnsure ColourTrans 0.52 RMLoad <Fervour$Dir>.Colours
WimpSlot -min 448k -max 448k
IF ADFFS$OSVersion>=&35000 THEN GOARM3JIT 0

Set VTwist 0
IF ADFFS$OSVersion<&50000 THEN RMEnsure Joystick 0.00 RMLoad <Fervour$Dir>.DummyJoy
RMEnsure FervourMode 1.01 RMLoad <Fervour$Dir>.50KHzMode
RMEnsure AEHModule 1.11 <Fervour$Dir>.AEHModule
RMEnsure SoundMaster 1.05 <Fervour$Dir>.SM
RMEnsure VTJoystick 2.00 Set VTwist 1
IF ADFFS$OSVersion<&50000 AND "<VTwist>" = "0" THEN RMKill Joystick
IF ADFFS$OSVersion>=&35000 THEN ADFEmulateRISCOS 3.11
| Fix reliance on self-modifying pipelined instruction
IF ADFFS$OSVersion>=&35000 THEN JITMEMORYA 8038 88701FFB EA03DFF0
IF ADFFS$OSVersion>=&35000 THEN MEMA 100000 E3A00902 E2800064 EAFC200C

<Fervour$Dir>.!RUNimage %0
IF ADFFS$OSVersion>=&35000 THEN ADFEmulateRISCOS
UnSet fervour$task
SetEval kill$module 1
RMEnsure SoundMaster 0.0 SetEval kill$module 0
IF kill$module THEN RMKill SoundMaster
SetEval kill$module 1
RMEnsure AEHModule 0.0 SetEval kill$module 0
IF kill$module THEN RMKill AEHModule
SetEval kill$module 1
RMEnsure FervourMode 0.0 SetEval kill$module 0
IF kill$module THEN RMKill FervourMode
UnSet kill$module

IF ADFFS$OSVersion>=&35000 THEN GOARM3JIT