Evaluated proc mtext {canvas x y text} { set draw [magic:new draw]; @$draw push graph; @$draw strokewidth 1; @$draw font Helvetica; @$draw fontsize 32; @$draw annotation $x $y $text; @$draw pop graph; @@$canvas draw $draw  }