Set GEKRip$Dir <Obey$Dir>
Set GEKRip$SquashLoaded 1
RMEnsure SquashUtils 0.00 Set GEKRip$SquashLoaded 0
If <GEKRip$SquashLoaded> = 0 Then RMLoad <GEKRip$Dir>.Squash
WimpSlot -min 32K -max 32k
Run <GEKRip$Dir>.!RunImage
If <GEKRip$SquashLoaded> = 0 Then RMKill SquashUtils
If <GEKRip$SquashLoaded> = 0 Then UnSet GEKRip$SquashLoaded