Set SMS$Dir <Obey$Dir>
IconSprites <SMS$Dir>.!Sprites
Set Alias$sms "Run <SMS$Dir>.Code "
