| >!Run file for HerNet
|  Justin Fletcher, 1998
|
Set HerNet$Dir <Obey$Dir>
IconSprites <HerNet$Dir>.!Sprites
|
| We need to load the HerNet module
If "<Heretic$Dir>"="" Then Error HerNet requires Heretic to be have been seen. Please locate Heretic before running HerNet.
|
| If HereticSupport is loaded, and HereticNetwork is loaded, all is well
| If HereticSupport is loaded, and HereticNetwork is not loaded, all is well
| If HereticSupport is not loaded, and HereticNetwork is loaded, kill HereticNetwork
| If HereticSupport is not loaded, then load it
| Why ?
| Because we need to ensure we are poking into the correct module, and if
| HereticNetwork is running but there is no HereticSupport then things WILL go
| awry.
Set HerNet$NeedHereticSupport No
RMEnsure HereticSupport 1.03 Set HerNet$NeedHereticSupport Yes
If "<HerNet$NeedHereticSupport>" = "Yes" Then Set HerNet$KillHereticNetwork Yes
If "<HerNet$NeedHereticSupport>" = "Yes" Then RMEnsure HereticNetwork 0 Set HerNet$KillHereticNetwork No
If "<HerNet$NeedHereticSupport>" = "Yes" AND "<HerNet$KillHereticNetwork>" = "Yes" Then RMKill HereticNetwork
If "<HerNet$NeedHereticSupport>" = "Yes" Then RMLoad <Heretic$Dir>.Support
RMEnsure HereticSupport 1.03 Error HerNet requires HereticSupport 1.03 or later.
Unset HerNet$NeedHereticSupport
Unset HerNet$KillHereticNetwork
|
RMEnsure HereticNetwork 0.00 RMLoad <HerNet$Dir>.NetDriver
|
| If they only wanted the modules loaded, don't run the program
If "%0" = "-quit" Then Obey
|
| If we are running under an older window manager we need to load BorderUtils
RMEnsure WindowManager 3.20 RMEnsure BorderUtils 0.00 RMLoad System:Modules.BorderUtil
|
WimpSlot -min 48k -max 48k
Run <HerNet$Dir>.!RunImage %*0