Set XCal$Dir <Obey$Dir>
IconSprites <XCal$Dir>.!Sprites
Wimpslot -min 64K -max 64K
Run <XCal$Dir>.!RunImage
