on mouse_move
   gclear
   drawgrid
   gtext 12 82 mouse_x & " " & mouse_y
.