Set Mouse$Dir <Obey$Dir>
IconSprites <Mouse$Dir>.!Sprites
