if z<0 then let z=1 if z>128 then let z=128 set_zoom_rel -z get_zoom r sleep 500 set_aflock 1 print "zoom", r sleep 500 cls goto "loop"