/018 PRINT 4 DECIMAL DIGITS USING ROUTINE PRNT2
/THE CONTENT OF THE AC IS DIVVIED BY 100(10)
/GIVING TWO LOW ORDER DIGITS AND 2 HIGH ORDER.
/THESE ARE PRINTED BY PRNT2.
/
/	TAD VALUE
/	JMS PRNT4
/	RETURN		/AC=0

	7634		/-100(10)
	0		/STORAA
RAE AND LOW ORDER
	0		/HIGH ORDER COUNTER
PRNT4,	0
	DCA PRNT4-2
	CLL
	TTD PRNT4-2	/TRY TO SUBTRACT 100 UNTIL OVERFLOW
	TAD PRNT4-3
	SNL
	JMP .+3
	ISZ PRNT4-1
	JE PRNT4+1
	CLA
	TAD PRNT4-1	/PRINT HIGH ORDER DIGITS
	JMS PRNT2
	TAD PRNT4-2	/PRINT LOW ORDER DIGITS
	JMS PRNT2
	DCA PRNT4-1	/RESET COUNTER
	JMP I PRNT4