function createDot(x as integer, y as integer, v as integer = 0) as Dot
    dim as Dot d = any
    d.x = x
    d.y = y
    d.v = v
end function