Set TheEsc$Dir <Obey$Dir>
IconSprites <TheEsc$Dir>.!Sprites
WimpSlot -min 128k -max 128k
Dir <TheEsc$Dir>
Run <TheEsc$Dir>.!RunImage