| Run file for !ViewPage application
|
*Set DRWAPP$DIR <Obey$Dir>
*Set ViewPage$DIR <DRWAPP$DIR>
*Set ViewPage$Path <DRWAPP$DIR>.
Run <ViewPage$Dir>.Resources.ResFind ViewPage
Run <ViewPage$Dir>.SetVars
*Set ViewPage$Help "<ViewPage$Dir>.Documents.index/html"
*Set ViewPage$Version "0.1 C 1.00"
*Set ViewPage$Title "ViewPage"
*Set ViewPage$Publisher " BASIC  Andrew Ayre 1996"
*Set ViewPage$Description "An application using DrWimpC"
*Set ViewPage$Web ""
|IF "<ViewPage$Running>"<>"" THEN Error ViewPage is already running.
RMEnsure SharedCLibrary 5.17 RMLoad System:Modules.Clib
RMEnsure SharedCLibrary 5.34 Error You need Clib 5.34 or later
*WimpSlot -min 6247k -max 6247k
*IconSprites <Obey$Dir>.!Sprites
*WimpSlot -min 6247k
*Run <ViewPage$Dir>.!RunImage %*0
