ORG	$C000		; geymum stafinn í minnishólfiđ $C000-$C008
	FCC	' ****  '
	FCC	' *   * '
	FCC	' *    *'
	FCC	' *    *'
	FCC	'***   *'
	FCC	' *    *'
	FCC	' *    *'
	FCC	' *   * '
	FCC	' ****  '


	ORG	$C100		; geymum forritiđ sjálft í $C100

	LDX	#$C000		; geymum stafinn í minnishólfi $C000
	ldab	#$0007		; dálka teljari
	ldy 	#$0009		; línu teljari
lykkja	ldaa	0,x		; minnishólfiđ sem stafurinn er geymdur í hlađiđ í A
	jsr	$ffb8		; birta staf í A
	inx			; hćkka minnishólfsteljara
	decb			; minnka dálkateljara
	bne	lykkja		; ef b!=0 ţá fara aftur í lykkju
	jsr	$ffc4		; birta 'enter'
	ldab	#$0007		; upphafsstilla dálkateljara
	dey			; minnka línuteljara
	bne	lykkja		; ef y!=0 ţá fara aftur í lykkju
	swi			; hćtta