head	equ  $2000
tail	equ  $2009

	org  $200A
	ldaa #$01
	ldx  #head

loop	staa 0,x
	inca
	inx
	cpx  #tail
	bne  loop