TKTN.MAC;4/AU=TKTN.MAC;3/-BF
\
-2,2
	.IDENT	"03.1"
-4,4
; COPYRIGHT (C) 1974,1976, 1977
-23,23
;VERSION	03.1
-40
;
;	EB034  DETACH TI: AFTER ISSUING MESSAGE
%
-468,468,/;EB034/
60$:
-472,473,/; EB034/
	MOV	#IO.DET,TKNDPB+2	;YES DETATCH IT
	CALL	CODOIO
65$:	JMP	$TKTN			; HAVE ANOTHER GO
/