|Run file for SiteWriter
|Copyright Daniel M Johnson 1998


|System variables set by SiteWriter app:
|<SiteWriterWebDir$Dir> is the path of the webdir
|<SiteWriterFont$Dir> is the font used for display

Iconsprites <Obey$Dir>.!sprites
Set SiteWriter$Dir <Obey$Dir>
Set File$Type_181 SiteWrit
Set Alias$@RunType_181 /<SiteWriter$Dir> -load %%*0



|Check a scrap file/directory exists
If "<Wimp$Scrap>"="" Then Error Wimp$Scrap not defined
If "<Wimp$ScrapDir>"="" Then Error Wimp$ScrapDir not defined

|Make sure we are in RiscOS3.1
RMEnsure UtilityModule 3.10 Error This application is only suitable for use with RISC OS 3.10 or later versions


|Load some toolbox modules
RMENSURE Toolbox  0.00  RMLOAD System:modules.toolbox.toolbox
RMENSURE Toolbox  1.17  ERROR You need toolbox 1.17 or later
RMENSURE Window   0.00  RMLOAD System:modules.toolbox.window
RMENSURE Window   1.12  ERROR You need window 1.12 or later
RMENSURE Menu     0.00  RMLOAD System:modules.toolbox.menu
RMENSURE Menu     0.13  ERROR You need menu 0.13 or later
RMENSURE Iconbar  0.00  RMLOAD System:modules.toolbox.iconbar
RMENSURE Iconbar  1.06  ERROR You need iconbar 1.06 or later
RMENSURE FontMenu  0.00  RMLOAD System:modules.toolbox.FontMenu
RMENSURE FontMenu  0.16  ERROR You need FontMenu 0.16 or later
RMEnsure ColourDbox 0.14 RMLoad System:modules.toolbox.ColourDbox
RMEnsure ColourDbox 0.14 Error You need ColourDbox 0.14 or later

wimpslot -min 1100K -max 1100K
Run <SiteWriter$Dir>.!RunImage %*0


