WimpSlot -min 120K -max 120K
IconSprites <Obey$Dir>.!Sprites
Set BBCTape$Dir <Obey$Dir>
Run <Obey$Dir>.!RunImage
