|> !Run
|
|  Execution file for !ArtWorks2
|
|  (c) 1992-1994 Computer Concepts Ltd.
|      2003      Martin Wuerthner
|
RMEnsure UtilityModule 3.50 Error "This application is only suitable for use with RISC OS 3.50 or later versions"
|
Set ArtWorks2$Dir <Obey$Dir>
WimpSlot -min 1200k -max 1200k
|
RMEnsure ABI3 3.10 RMLoad <ArtWorks2$Dir>.RMStore.ABI3Mod
RMEnsure ABI3 3.10 Error "The copy of ABI3 used by ArtWorks 2 is out of date. ArtWorks 2 may have been incorrectly installed. Please re-install ArtWorks 2 or seek technical help."
RMEnsure GDraw 3.03 RMLoad <ArtWorks2$Dir>.RMStore.GDraw
RMEnsure GDraw 3.03 Error "ArtWorks 2 requires GDraw 3.03 or later"
RMEnsure StreamSquash2 2.00 RMLoad <ArtWorks2$Dir>.RMStore.CCSquash2
RMEnsure StreamSquash2 2.00 Error "ArtWorks 2 requires StreamSquash2 2.00 or later"
RMEnsure GSpriteExtend 0.70 RMLoad <ArtWorks2$Dir>.RMStore.SpriteExt
RMEnsure GSpriteExtend 0.70 Error "ArtWorks 2 requires GSpriteExtend 0.70 or later"
RMEnsure DitherExtend 0.60 RMLoad <ArtWorks2$Dir>.RMStore.DitherExt
RMEnsure DitherExtend 0.60 Error "ArtWorks 2 requires DitherExtend 0.60 or later"
|
If "<Boot$OSVersion>" < "400" Then IconSprites <ArtWorks2$Dir>.!Sprites Else If "<Boot$OSVersion>" < "500" Then IconSprites <ArtWorks2$Dir>.4Sprites Else IconSprites <ArtWorks2$Dir>.5Sprites
|
Set File$Type_D94 ArtWork
Set File$Type_D95 ArtWkMod
Set File$Type_D8E ABIDefs
Set Alias$@RunType_D94 Run <ArtWorks2$Dir>.!Run %%*0
Set Alias$@RunType_D95 Error 0 "You cannot run an ArtWorks module - refer to the installation instructions in the !Help file alongside the module!"
|
SetEval ArtWorks$Licence 0
<ArtWorks2$Dir>.FileEnsure <ArtWorks2$Dir>.Licence ArtWorks$Licence
If NOT ArtWorks$Licence AND "<Boot$OSVersion>" < "500" Then Run <ArtWorks2$Dir>.!RunInst26
If NOT ArtWorks$Licence AND "<Boot$OSVersion>" >= "500" Then Run <ArtWorks2$Dir>.!RunInst32
If ArtWorks$Licence Then Run "<ArtWorks2$Dir>.!RunImage" %*0