| Run-File fr Arcturus

RMEnsure UtilityModule 3.10 Error Sorry, need RISC OS 3.10 or higher to run

Fx 229 1
Set Arcturus$Dir <Obey$Dir>
IconSprites <Arcturus$Dir>.!Sprites

WimpSlot -min 32K -max 32K
RMEnsure CoconizerPlayer 1.04 Set coco Nix
If "<coco>"="Nix" Then Run <Arcturus$Dir>.CocoPlayer

Set Arcturus$Fix Patcher
RMEnsure ADFFS 2.28 Set Arcturus$Fix ADFFS
RMEnsure ADFFS 2.04 Set Arcturus$Fix Patcher
RMEnsure UtilityModule 3.70 RMEnsure CallASWI RMLoad System:Modules.CallASWI
RMEnsure Patcher 0 RMLoad System:Modules.Patcher
RMEnsure Patcher 0 If "<Arcturus$Fix>"="Patcher" Then Set Arcturus$Fix No

WimpSlot -min 0K -max 0K
Echo <22><15>
Run <Arcturus$Dir>.FreierSlot 1312K
WimpSlot -min 1312K -max 1312K
If "<Arcturus$Fix>"="Patcher" Then RPCCacheFixOn
If "<Arcturus$Fix>"="ADFFS" Then ADFCacheOff 250 Else cache iw
Run <Arcturus$Dir>.IntroCode
If "<Arcturus$Fix>"="ADFFS" Then ADFCacheOff 500 Else cache iw
Run <Arcturus$Dir>.GameCode
If "<Arcturus$Fix>"="Patcher" Then RPCCacheFixOff Else cache on

Unset Arcturus$Dir
If "<coco>"="Nix" Then RMKill CoconizerPlayer
If "<coco>"="Nix" Then Unset coco
If "<Arcturus$Fix>"="Patcher" Then RMKill Patcher
Unset Arcturus$Fix
Fx 229 0
