| !DataCard, version "1.04 (17-Nov-89)"
|
If "<System$Path>" = "" then Error 0 System resources cannot be found
WimpSlot -min 72K -max 72K
IconSprites <Obey$Dir>.!Sprites
CDir <Obey$Dir>.^.Data
Set DataCard$Dir <Obey$Dir>
If "<Data$Dir>" = "" then SetEval Data$Dir DataCard$Dir LEFT ((LEN DataCard$Dir)-9) + "Data"
SetMacro Alias$Open_Data Filer_OpenDir <Data$Dir>
Run <DataCard$Dir>.!RunImage %*0
