| >!Run file for PhotoFiler
| by David Thomas,  1998-2020

Set PhotoFiler$Dir <Obey$Dir>

IconSprites <PhotoFiler$Dir>.!Sprites

RMEnsure UtilityModule 3.50 Error PhotoFiler requires RISC OS 3.5 or later

RMEnsure SpriteExtend  0.99 RMLoad System:Modules.SpriteExt
RMEnsure SpriteExtend  0.99 Error PhotoFiler requires SpriteExtend 0.99 or later

RMEnsure DrawFile      1.30 RMLoad System:Modules.DrawFile
RMEnsure DrawFile      1.30 Error PhotoFiler requires DrawFile 1.30 or later

If "<Alias$LoadArtWorksModules>" <> "" Then LoadArtWorksModules

WimpSlot -min 36K -max 36K

Run <PhotoFiler$Dir>.Library.IfRunning
Run <PhotoFiler$Dir>.Library.PhotoCheck

RMEnsure WimpSWIVe 0.00 Run <PhotoFiler$Dir>.WimpSWIVe.Load
RMEnsure WimpSWIVe 0.08 Error PhotoFiler requires WimpSWIVe 0.08 or later

RMEnsure PhotoFiler 0.00 RMLoad <PhotoFiler$Dir>.PhotoFiler

IconSprites <PhotoFiler$Dir>.Sprites
If "<Boot$OSVersion>" >= "500" Then IconSprites <PhotoFiler$Dir>.5Sprites

If "<Choices$Write>" = "" Then SetMacro PhotoFiler$Choices <PhotoFiler$Dir>.Choices Else SetMacro PhotoFiler$Choices <Choices$Dir>.PhotoFiler

WimpSlot -min 32K -max 32K

Run <PhotoFiler$Dir>.!RunImage %*0