Set Slider$Dir <Obey$Dir>

IconSprites <Slider$Dir>.!Sprites

WimpSlot -min 256k -max 256k

Run <Slider$Dir>.!RunImage %*0
