Set Create$Dir <Obey$Dir>
Run <Obey$Dir>.^.^.^.^.!Run
Run <Create$Dir>.!RunImage
