TDSCH.MAC;2=[11,10]TDSCH.VGN;1
\
-2,2
	.IDENT	/8X/
-/TM086/,,
;
;	JAMES T. DOWNARD	21-JUN-79
;
;	JGD  --  PUT VALUE FOR ROUND ROBIN SCHEDULE INTERVAL
;		 AND EXECUTIVE SWAP INTERVAL INTO A LOCATION
;		 IN SYSCM, SO THAT THESE VALUES MAY BE EASILY
;		 MODIFIED ON A RUNNING SYSTEM, 'ON THE FLY'.
;		 ALSO, CHANGE UPTIM: TO UPTIM:: TO MAKE INSERTING
;		 THE CLOCK TIC HOOK A LITTLE MORE STRAIGHTFORWARD.
%
-/UPTIM:/,.,/; JGD/
UPTIM::	MOV	#$TKPS+2,R4	;POINT PAST CONVERSION VECTOR
-/ROBIN:/,,
-/MOV	#R$$NDC,/,.,/; JGD/
	MOV	$ROBIN,RNDCT	; RESET CLOCK TICKS TO NEXT INTERVAL
-/SWAP:/,,
-/MOV	#S$$WPC,SWPCT	;RESET/,.,/; JGD/
	MOV	$SWAP,SWPCT	; RESET SWAP COUNT
/