Set ColPick$Dir <Obey$Dir>

Iconsprites <ColPick$Dir>.!Sprites
