Set SMS$Dir <Obey$Dir>
Set Alias$sms "Run <SMS$Dir>.Code "
RMEnsure ddUtil 0.30 RMLoad <SMS$Dir>.ddUtil
RMEnsure ddUtil 0.30 Error The SMS frontend requires the ddUtil module Version 0.30 or later
RMEnsure ddci 0.10 RMLoad <SMS$Dir>.ddci_I
RMEnsure ddci 0.10 Error The SMS frontend requires a ddci module
WimpSlot -min 32k
Run <SMS$Dir>.!RunImage
