| !Run file for Grimoire

IconSprites <Obey$Dir>.!Sprites

Set Grimoire$Dir <Obey$Dir>
Set Grimoire$Path <Obey$Dir>.

| The top toolbar row's buttons (Toolbar22 in square-pixel modes)
IconSprites <Grimoire$Dir>.Resources.Toolbar

Set Grimoire$Help <Grimoire$Dir>.!Help

| Snippet files: your own in Choices:Grimoire.Snippets, then the supplied ones
Set GrimSnip$Path Choices:Grimoire.Snippets.,<Grimoire$Dir>.Snippets.

| { Sourcery generated help details

Set Grimoire$Version "1.11"
Set Grimoire$Web "http://www.reallysmall.co.uk"
Set Grimoire$Title "Grimoire"
Set Grimoire$Publisher "The Really Small Software Company"
Set Grimoire$Description "Code editor"
| }

RMEnsure UtilityModule 3.10 Error This application is only suitable for use with RISC OS 3.10 or later versions

| { Sourcery generated module list

Set Grimoire$RunComplete ""
If "<Boot$OSVersion>" LEFT 1 = 5 Then Run <Grimoire$Dir>.!RunFiles.RunOS5
If "<Grimoire$RunError>" <> "" Then Error "Error loading modules"
If "<Grimoire$RunComplete>" = "" Then Run <Grimoire$Dir>.!RunFiles.RunOSAny
Unset Grimoire$RunComplete
| }

| Running Grimoire makes it the OLE editor for these types; !Boot only
| claims the ones no other editor has
| Register as the OLE editor for text and source files
Set OLEServer$Type_fff -R /<Grimoire$Dir> -N Grimoire
Set OLEServer$Type_feb -R /<Grimoire$Dir> -N Grimoire
Set OLEServer$Type_fd7 -R /<Grimoire$Dir> -N Grimoire
Set OLEServer$Type_f80 -R /<Grimoire$Dir> -N Grimoire
Set OLEServer$Type_faf -R /<Grimoire$Dir> -N Grimoire
Set OLEServer$Type_ffb -R /<Grimoire$Dir> -N Grimoire
Set OLEServer$Type_ae5 -R /<Grimoire$Dir> -N Grimoire
Set OLEServer$Type_f79 -R /<Grimoire$Dir> -N Grimoire
Set OLEServer$Type_f81 -R /<Grimoire$Dir> -N Grimoire
Set OLEServer$Type_f74 -R /<Grimoire$Dir> -N Grimoire
Set OLEServer$Type_ce5 -R /<Grimoire$Dir> -N Grimoire
Set OLEServer$Type_2a8 -R /<Grimoire$Dir> -N Grimoire
Set OLEServer$Type_102 -R /<Grimoire$Dir> -N Grimoire
Set OLEServer$Type_fe1 -R /<Grimoire$Dir> -N Grimoire


Set Alias$@EditType_FFF /<Grimoire$Dir> %%*0
SetMacro Alias$@RunType_FFF If "<Wimp$State>"="commands" Then Type %%*0 Else /<Grimoire$Dir> %%*0

| Minutes between autosaves of modified files (0 for none), and whether
| the first save over a file keeps the old one as file~
If "<Grimoire$Autosave>" = "" Then Set Grimoire$Autosave 5
If "<Grimoire$Backups>" = "" Then Set Grimoire$Backups Yes

| The languages are the drivers in !Languages
If "<Languages$Dir>" = "" Then Error Grimoire needs !Languages. Open the directory that holds it, then run Grimoire again.

WimpSlot -Min 1024k -Max 1024k
Run <Grimoire$Dir>.!RunImage %*0
