|>$.Hsy.!Hearsay.!Boot   Hearsay Boot file
|
| Startup file for Hearsay
|
WimpSlot -min 576K  -max 576K
|
IconSprites <Obey$Dir>.!Sprites
Set Alias$@RunType_D66 Run <Obey$Dir>.!Run %%*0
Set Alias$@RunType_D65 Run <Obey$Dir>.!Run %%*0
Set Alias$@RunType_D33 Run <Obey$Dir>.!Run %%*0
Set Alias$@RunType_D32 Run <Obey$Dir>.!Run %%*0
|
Set File$Type_D66  HsyFrame
Set File$Type_D65  HsyScript
Set File$Type_D33  Profile3
Set File$Type_D32  Profile2
Set File$Type_FF1  RawData
|
RMEnsure SystemDevices  1.13 Error Hearsay needs SystemDevices Module
RMEnsure SpriteUtils    1.04 Error Hearsay needs SpriteUtils Module
RMEnsure SpriteExtend   0.20 Error Hearsay needs SpriteExtension Module
RMEnsure WindowManager  2.00 Error Hearsay needs a newer Window Manager
RMEnsure FontManager    1.15 Error Hearsay needs a newer Font Manager
RMEnsure Draw           1.01 Error Hearsay needs Draw Module 1.01 or later
|
RMEnsure ResourceFS     0.00 IconSprites <Obey$Dir>.Resources.Sprites3
|
if "<System$Path>" = "" then Error 0 System resources cannot be found
|
RMEnsure FPEmulator     2.80 RMLoad System:Modules.FPEmulator
RMEnsure FPEmulator     2.80 Error Hearsay needs FPEmulator 2.80 or later
|
RMEnsure ColourTrans    0.52 RMLoad System:Modules.Colours
RMEnsure ColourTrans    0.52 Error Hearsay needs ColourTrans 0.52 or later
|
RMEnsure SharedCLibrary 0.00 RMLoad System:Modules.CLib
RMEnsure SharedCLibrary 3.75 Error Hearsay needs SharedCLibrary 3.75 or later
|
RMEnsure IRQUtils       0.12 RMLoad <Obey$Dir>.Modules.IRQUtils
RMEnsure Hourglass      2.02 RMLoad <Obey$Dir>.Modules.Hourglass
RMEnsure SoundScheduler 1.13 RMLoad <Obey$Dir>.Modules.Sound2
|
Set Hearsay$Templates Templates
|
|If "<Hearsay$Dir>"=""  Then Seteval Hearsay$Case 1  Else Seteval Hearsay$Case <Hearsay$Case>+1
If "<Hearsay$Dir>"=""  Then Seteval Hearsay$Case 0
Set Hearsay$Dir <Obey$Dir>
Run <Hearsay$Dir>.Resources.Resfind Hearsay
|
Set Hearsay$Dir1 <Hearsay$Dir>
Set HearsayRes$Dir1 <HearsayRes$Dir>
Set Hearsay$Printfile Printer:
Set Hearsay$TXBatch <Hearsay$Dir>.TXBatch
Set Hearsay$RXBatch <Hearsay$Dir>.RXBatch
| Next line modified from standard
Set Hearsay$LogFile <Hearsay$Dir>.^.CallLog
Set Hearsay$Scripts <Hearsay$Dir>.^.Scripts
Set Hearsay$AutoRun <Hearsay$Dir>.AutoRun
Set Hearsay$Library <Hearsay$Dir>.Library
Set Hearsay$TeleDir <Hearsay$Dir>.Tele-Dir
Set Hearsay$BatMan  <Hearsay$Dir>.Resources.BatMan
Set Hearsay$Driver  <Hearsay$Dir>.Driver
Set Hearsay$Resources <Hearsay$Dir>.Resources
|
| NB parameter substitution is active here - hence use double percents below
|
Set Hearsay$DateFormat %%ZDY %%MO %%CE%%YR
Set Hearsay$TimeFormat %%Z24:%%MI
|
||Set Hearsay$com_port SP_DualPC
||Set Hearsay$com_port_num 0
||Set Hearsay$title Empty
|||||
|||WimpSlot -min 544K
||WimpSlot -min 672K
||Run "<Hearsay$Dir>.!RunImage" %*0 
