; udskrive 5 første
; kvadrattal 1,4,9,16,25

; konstanter
	antal=5
	en=1

; variable
	udskrevet=0
	kvadrat=0

; program
start:	HENT udskrevet
	ADD en
	GEM udskrevet
	MULT udskrevet
	GEM kvadrat
	UD kvadrat
	HENT antal
	SUB en
	GEM antal
	HNUL slut
	HOP start
slut:	STOP