' Gambas class file
PUBLIC SUB da1_MouseDown()
Draw.Begin(da1)
Draw.Ellipse(Mouse.X, Mouse.Y, 9, 9)
Draw.End
END
PUBLIC SUB da2_MouseMove()
Draw.Begin(da2)
Draw.Ellipse(mouse.X, mouse.Y, 9, 9)
Draw.End
END
PUBLIC SUB da3_MouseUp()
Draw.Begin(da3)
Draw.Ellipse(Mouse.X, Mouse.Y, 9, 9)
Draw.End
END