|
|    $Id: !Run 183 2005-02-08 21:18:06Z ajw $
|    $URL: http://svn.cp15.org/NFS/tags/v106/!Sunfish/!Run $
|

Set Sunfish$Dir <Obey$Dir>

If "<Choices$Write>" <> "" Then Set Sunfish$Write <Choices$Write>.Sunfish Else Set Sunfish$Write <Sunfish$Dir>
If "<Choices$Write>" <> "" Then Set Sunfish$Path <Sunfish$Write>. Else Set Sunfish$Path <Sunfish$Dir>.

Set File$Type_1B6 Sunfish

IconSprites <Sunfish$Dir>.!Sprites

RMEnsure UtilityModule 3.10 Error Sunfish requires RISC OS 3.10 or later
RMEnsure UtilityModule 3.70 RMEnsure CallASWI 0.02 RMLoad System:Modules.CallASWI
RMEnsure UtilityModule 3.70 RMEnsure CallASWI 0.02 Error Sunfish requires CallASWI 0.02 or later
RMEnsure SharedCLibrary 5.17 RMLoad System:Modules.CLib
RMEnsure SharedCLibrary 5.34 Error Sunfish requires SharedCLibrary 5.34 or later
RMEnsure MimeMap 0.01 RMLoad System:Modules.Network.MimeMap

RMEnsure Toolbox    0.00 RMLoad System:Modules.Toolbox.Toolbox
RMEnsure Toolbox    1.52 Error Toolbox modules out of date (Sunfish requires Toolbox 1.52 or later)
RMEnsure Window     0.00 RMLoad System:Modules.Toolbox.Window
RMEnsure Window     1.70 Error Toolbox modules out of date (Sunfish requires Window 1.70 or later)
RMEnsure Menu       0.00 RMLoad System:Modules.Toolbox.Menu
RMEnsure Menu       0.36 Error Toolbox modules out of date (Sunfish requires Menu 0.36 or later)
RMEnsure Iconbar    0.00 RMLoad System:Modules.Toolbox.Iconbar
RMEnsure Iconbar    1.20 Error Toolbox modules out of date (Sunfish requires Iconbar 1.20 or later)
RMEnsure ProgInfo   0.00 RMLoad System:Modules.Toolbox.ProgInfo
RMEnsure ProgInfo   0.18 Error Toolbox modules out of date (Sunfish requires ProgInfo 0.18 or later)

RMEnsure Internet 5.00 Error Sunfish requires the Internet module 5.00 or later

RMLoad <Sunfish$Dir>.Sunfish

If "%*0" <> "" Then Filer_OpenDir %*0
If "%*0" = "" Then Wimpslot -min 50k -max 50k
If "%*0" = "" Then Run <Sunfish$Dir>.!RunImage
