TITLE	STRLEN
	ORG	200
STRLEN:	LA	1,DATA		; R1: アドレスへのポインタ
	EX	2,16(1)		; 
	ST	2,RESULT	; RESULT <= R2
	HLT			; stop
DATA:	DC	2
	DC	4
	DC	9
	DC	20
	DC	12
	DC	1
	DC	7
	DC	100
	DC	56
	DC	0
	DC	4
	DC	13
	DC	87
	DC	64
	DC	34
	DC	72
	DC	53
RESULT:	DS	1
	END