LDA	Asize
		STA	Count
FOR,	SZA
		BUN 	DO
		BUN	END
DO,		LDA	Const
		STA	Aptr I
		ISZ	Aptr
		LDA	Count
		ADD	MinusOne
		STA	Count
		BUN	FOR
END,		HLT

//----------DATA----------//
Asize,		DEC	5
MinusOne,	DEC	-1
Count,		DEC	0
Const,		HEX	FFFF
Aptr,		HEX	50
		ORG	50
Array,		DEC	0
		DEC	0
		DEC	0
		DEC	0
		DEC	0