|
| Startup file for DPlngScan
|
If "<Boot$OSVersion>" >= "500" Then IconSprites <Obey$Dir>.5Sprites Else If "<Boot$OSVersion>" >= "400" Then IconSprites <Obey$Dir>.4Sprites Else IconSprites <Obey$Dir>.!Sprites
|
Obey <Obey$Dir>.!BInstall
|
WimpSlot -min 1024K -max 1024K
|
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 DPlngScan$Dir     <Obey$Dir>
Set DPlngScanRes$Dir  <Obey$Dir>.Resources.UK
Set DPlngScan$Templates Templates
|
SetEval DPlngScan$Memory -2
RMEnsure UtilityModule 5.00 SetEval DPlngScan$Memory -1
|
|Set DPlngScan$Scrap <Wimp$ScrapDir>
|
Set DPlngScan$Printfile Printer:
|
IF <DPlngScan$Memory> = -2 then WimpSlot -min 2048K
|
Run "<DPlngScan$Dir>.!RunImage" %*0
