IF "<Obey$Dir>"="@" THEN Error Emotions must be installed to hard disc, see !ADFFS.obey.F10013101 for details
<Obey$Dir>.!Boot
HideCommandWindow
IconSprites <Obey$Dir>.!Sprites
Set Emotions$Continue On
Set Emotions$Kill On
ScreenSize 160

RMEnsure QTMTracker 1.45 RMLoad ADFFS:trackers.QTMModule
IF ADFFS$OSVersion>=&50000 THEN ADFEmulateRISCOS 3.50
Wimpslot -min 256k -max 256k
IF ADFFS$OSVersion>=&50000 THEN GOARM3JIT 0
| Don't load their Hourglass Module, as it corrupts the RMA
| RMLoad <Emotions$Dir>.Resources.Hourglass
RMLoad <Emotions$Dir>.Resources.Squash
Set Alias$Hourglass ADFDoNothing %%*0
Hourglass On
IF "<GEK$Configure>" = "" Then Set GEK$Configure <Emotions$Dir>.^.Prefs
IF "<GEKOnfig$Dir>" = "" Then IF ADFFS$OSVersion>=&50000 THEN GOARM3JIT
IF "<GEKOnfig$Dir>" = "" Then Error GEKonfig resources cannot be found.

<Emotions$Dir>.Resources.Intro
<Emotions$Dir>.Resources.Init

IF "<Emotions$Continue>"="On" then <Emotions$Dir>.Resources.Story1
| Bugfix: Tries to *SAVE <GEK$Configure>T 0 0
| Bugfix: Doesn't scan modes correctly, force prefs resolution
| Bugfix: ScreenModes_ReadInfo without X
LOAD <Emotions$Dir>.Resources.!RunImage 8000
ADFCRC 8000 25FE2 7B17F50BC Resources.!RunImage
MEMA 8024 E3E00000 EF0600EF
GO 8000
KEY 0 30030DEFPROCXb:SYS263872:PROCj_("X320 Y256 G256 EX1 EY1"):PROCea(S_+(256*4*3)):SYS46,256+34,Ua%,"page",0,0,0:SYS131077,"Save |<GEK$Configure>T 8000+0"TO;sf:IFsf=6THENSYS131077,"Delete |<GEK$Configure>T"TO;sf|M3350la=TRUE|M
KEY 1 3370NEXT A:SYS&687C0TOMb$|M3770QUIT|M28840QUIT|MRUN|F|M
ECHO <21>
FX 225,1
FX 21,0
FX 138,0,128
FX 138,0,129
BASIC -load @00009000,00025FF0

IF "<Emotions$Kill>"="On" THEN RMkill QTMTracker
IF "<Emotions$Kill>"="On" THEN RMkill SquashUtils
IF ADFFS$OSVersion>=&50000 THEN GOARM3JIT
IF ADFFS$OSVersion>=&50000 THEN ADFEmulateRISCOS
FX 20
FX 21,0
FX 200,0
Unset GEK$Configure
UnSet Emotions$Continue
UnSet Emotions$Kill
UnSet Alias$Hourglass