/EXIT
/SMALL TASK TO EXIT TO SINGLE USER OS8 WITH SYS:=RF08
/
/THIS TASK SHOULD EVENTUALLY BECOME MORE SOPHISTICATED,
/AND ALSO BE ABLE TO RUN FOR ANY TYPE OF SYS:.
/IN SEQUENCE IT SHOULD:
/1.STOP THE BACKGROUND SCHEDULER.
/2.TYPE A MESSAGE SUCH AS "SET SWITCHES" IF REQUIRED.
/3.WAIT HALF A SECOND SO THAT THE DISK SWAP IN PROGRESS
/  IS TERMINATED FOR SURE.
/4.READ FROM DISK THE MONITOR HEAD FROM BLOCK 0
/  FIX BOTH FIELD 0 AND 1.
/5.TURN THE INTERRUPT OFF.
/6.HALT IN CASE OF A PDP8I WITH UNTRAP
/7.JUMP TO 7600 IN FIELD 0.
	ORG	200
	TASKNA	EX
	200
	0
EX,	IOF
	CLA CLL
IFDEF TNOUNTRP <
	TAD (7746
	DCA AUTO16
	CDF 0
	TAD (6615
	DCA I AUTO16
	TAD (7600
	DCA I AUTO16
	TAD (6603
	DCA I AUTO16
	TAD (6622
	DCA I AUTO16
	TAD (5352
	DCA I AUTO16
	TAD (5752
	DCA I AUTO16
	HLT
	CDF CIF 0
	JMP I (7747	/ >
IFZERO MONFLD < IFNZRO COREND-7600&4000 <
	CDF CIF 0
	JMP I C7600	/ >

$$$$$$$$$$$$$