
/
/ PRINT A THROUGH Z AND -10 THROUGH -1.
/
START	LAW	15
	JMS	TYPE
	LAW	12
	JMS	TYPE
	LAW	-28
	DAC	CTR
	LAW	101
	DAC	CHARR
AGAIN	LAC	CHAR
	JMS	TYPE
	ISZ	CHAR
	ISZ	CTR
	JMP	AGAIN
	LAW	15
	JMS	TYPE
	LAW	12
	JMS	TYPE
	LAW	-12
	DAC	CHAR
LOOP	LAC	CHAR
	JMS	%DIP
	ISZ	CHAR
	JMP	LOOP
	HLT
	JMP	START
TYPE	0
	TLS
	TSF
	JMP	.
	JMP*	TYPE
CHAR	0
CTR	0
	.END	START
