set SendCharge$Dir <Obey$Dir>
iconsprites <SendCharge$Dir>.!Sprites
WimpSlot -min 512k -max 512k

Run <SendCharge$Dir>.!RunImage
