| !Run file for OmniDesk
| by R.G.Hallas
|
IF "<OmniDesk$Running>"="Yes" THEN ERROR 0 You may only use one copy of OmniDesk at once.
|
Set OmniDesk$Dir <Obey$Dir>
Set Which$Sprites "<OmniDesk$Dir>.5Sprites"
If "<Boot$OSVersion>" < "500" Then Set Which$Sprites "<OmniDesk$Dir>.4Sprites"
If "<Boot$OSVersion>" < "400" Then Set Which$Sprites "<OmniDesk$Dir>.!Sprites"
IconSprites <Which$Sprites>
Unset Which$Sprites
If "<System$Path>"="" Then Error 0 Please locate your System resources, then try again.
|
Set OmniDesk$InterfaceManager No
RMEnsure UtilityModule 4.00 Set OmniDesk$InterfaceManager Yes
If "<OmniDesk$InterfaceManager>"="Yes" Then RMEnsure InterfaceManager 0 RMLoad System:Modules.Interface
If "<OmniDesk$InterfaceManager>"="Yes" Then RMEnsure InterfaceManager 2.00 ERROR 0 The copy of the Interface Manager module in your System is too old. Please replace it with the copy provided inside !OmniDesk.Resources, then try again.
|
If "<OmniDesk$InterfaceManager>"="Yes" Then 3DColours 4 0 1 14 12
| The above command will force the new Interface Manager II to use
| the standard colours associated with version I for all applications,
| i.e. grey and white rather than the excessively stark black and white.
| Comment the line out (with a | character) if you don't want this to
| happen. You may feel, though, as I do, that you want all your
| existing applications which use Interface to retain their old colours.
| If so, you should specifically load Interface when you start the machine
| (preferably in a boot-up sequence), and after loading it issue the above
| 3DColours command. This will force the normal colours to be used by all
| Interface applications.
|
| N.B. The documentation for Interface says that the default colours are
| the ones given in the above command. In fact, version 2.00 of the module
| uses default colours 7 0 1 14 12, which may be a small bug. Either that
| or the documentation's wrong. Either way, it gives black and white
| borders as opposed to the expected grey and white ones.
|
UnSet OmniDesk$InterfaceManager
|
WimpSlot -min 128K -max 128K
Run <OmniDesk$Dir>.!RunImage
