| > Omni:StartShare
|
| Access/Access+ protocol stack
WimpSlot -max 32K
SetEval Omni$RAMAccess  1
RMEnsure Freeway 0.00 SetEval Omni$RAMAccess 0
SetEval Omni$ROMAccess  1
If Omni$RAMAccess	then SetEval Omni$ROMAccess 0
If Omni$ROMAccess	then Run <Omni$Dir>.Utils.Access.Dormant
If Omni$ROMAccess	then RMReInit Freeway
If Omni$ROMAccess	then Set ShareFS$Path Resources:$.Resources.ShareFS.
If Omni$ROMAccess	then X IconSprites ShareFS:!Sprites
If Omni$ROMAccess	then RMReInit ShareFS
UnSet Omni$ROMAccess
UnSet Omni$RAMAccess
Run <Omni$Dir>.Utils.Access.KillTask
RMEnsure OmniAccess 0.14 RMLoad <Omni$Dir>.RMStore.OmniAccess
