Set PartMgr$Dir <Obey$Dir>

SetEval PartMgr$BASIC 0
SetEval PartMgr$OS32bit 0
RMEnsure BASIC 1.39 SetEval PartMgr$BASIC 1
If PartMgr$BASIC THEN BASIC -quit <PartMgr$Dir>.32bitOS
If PartMgr$BASIC AND PartMgr$OS32bit THEN RMLoad <PartMgr$Dir>.Modules.BASICPM32
If PartMgr$BASIC AND NOT PartMgr$OS32bit THEN RMLoad <PartMgr$Dir>.Modules.BASICPM
WimpSlot -min 350K -max 500K
IF "<Wimp$ScrapDir>"<>"" THEN Set PartMgr$Scrap <Wimp$ScrapDir>.PartMgr. ELSE Set PartMgr$Scrap <PartMgr$Dir>.Scrap.
If PartMgr$BASIC THEN BASICPM -quit <PartMgr$Dir>.!RunImage ELSE BASIC -quit <PartMgr$Dir>.!RunImage
If PartMgr$BASIC THEN RMKill BASICPM
UnSet PartMgr$BASIC
UnSet PartMgr$OS32bit