Google
 

Trailing-Edge - PDP-10 Archives - bb-bt99e-bb - rnxkon.c08
There is 1 other file named rnxkon.c08 in the archive. Click here to see a list.
 INS 18/41	;08C1
	;HERE IF THE GO BIT DIDN'T COME DOWN IN TIME.
	;EXIT FROM THE NEW COMMAND WITHOUT DOING ANYTHING.
	;WAIT FOR THE PREVIOUS COMMAND TO FINISH, THEN TELL
	;FILIO THAT THE NEW COMMAND IS FINISHED (THIS IS A LIE).
	;IF THE NEW COMMAND IS A TRANSFER, THEN TELL FILIO "POSITION DONE".
	;FILIO WILL THINK HE'S IN THUNG RECOVERY AND WILL RE-ISSUE THE
	;TRANSFER COMMAND.
	;IF THE NEW COMMAND IS A POSITION, THEN TELL FILIO "RECAL DONE".
	;FILIO WILL THINK HE'S IN PHUNG RECOVERY AND WILL RE-ISSUE THE
	;POSITION COMMAND.
	CMDWA3:	MOVSI	T4,(1B0)	;RECAL BIT (PHUNG RECOVERY)
		CAIN	T1,.DXCTR!.CRSRC;POSITION COMMAND?
		IORM	T4,UNISTS##(U)	;YES, TELL FILIO "RECAL DONE"
 INS 30/41	;08C2
		JUMPLE	T2,CMDWA3	;JUMP IF GO STILL UP
 SUM 90262