Zooming is simple

defzoom(x,c,s):
translate(c)
scale(s)
translate(-x[0], -x[1])

zoom2.eps

zoom3.eps

zoom4.eps