vclear
box t_box 100 100 100
vdisplay t_box
vfit
vselmode 1 1
vmoveto 26 305
vselect 26 305
vselect 204 409 1

vdump $imagedir/${casename}_1.png

vmoveto 0 0