;Slightly more efficient
	.macro var name
		name=zp_counter
		zp_counter .set zp_counter+1
	.endmacro

	.macro local name
		name .set zp_counter
		zp_counter=zp_counter+1
	.endmacro

	zp_base=$80
	zp_counter .set zp_base
	var foo1
	var foo2
	var foo3
	var bar1
	;bar2-98
	var bar99

	.org $C000
	LDA foo1
	LDA foo2
	LDA foo3

	JSR func1

func1:
	local x
	local y
	STA x
	STA y
	JSR func2
	RTS

func2:
	local x
	local y
	STA x
	STA y
	RTS

	.out .sprintf("%d of %d zero page bytes used",zp_counter-zp_base,255-zp_base)