|>!Snapper.!Run
|
| Startup file for Snapper
|
IconSprites <Obey$Dir>.!Sprites
|
WimpSlot -min 96K -max 96K
|
RMEnsure ResourceFS     0.00 IconSprites <Obey$Dir>.Resources.Sprites3
|
If "<System$Path>" = "" then Error 0 System resources cannot be found
|
RMEnsure UtilityModule 3.10 Error This application 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 This application requires CallASWI 0.02 or later
RMEnsure FPEmulator 4.03 RMLoad System:Modules.FPEmulator
RMEnsure FPEmulator 4.03 Error This application requires FPEmulator 4.03 or later
RMEnsure SharedCLibrary 5.17 RMLoad System:Modules.CLib
RMEnsure SharedCLibrary 5.34 Error This application requires SharedCLibrary 5.34 or later
|
Set Snapper$Dir     <Obey$Dir>
|
RMEnsure SpellUtils 0.03 RMLoad <Snapper$Dir>.Resources.Spell
|
|Set SnapperRes$Dir  <Obey$Dir>.Resources.UK
Run <Snapper$Dir>.Resources.Resfind Snapper

Set Snapper$Templates Templates
|Set Snapper$Scrap <Wimp$ScrapDir>
|
| To use Snapper in debug mode
|set Snapper$Debug 1
|
WimpSlot -min 600K -max 600K

|
Run "<Snapper$Dir>.!RunImage"
