clear
	s=@scale
	s=s*1.25
:zoom
	scale s
	redraw
:end
	exit