PRG	START
	RPUSH
;
	LAD	GR1,1
LOOP	LD	GR2,='0'	;リテラル宣言でないとダメ？
	ADDA	GR2,GR1
	ST	GR2,CNT
	OUT	BUF,LEN
	ADDA	GR1,=1
	CPA	GR1,=9
	JMI	LOOP
;
	RPOP
	RET
;
LEN	DC	9
BUF	DC	'Count = '
CNT	DC	' '
;
	END