Bezier Curve (WIP)

function DrawCurve(P1, P2, P3, Precision)
    local PointTable = {}
    for i = 1, Precision do
        local Percent = i/Precision
        local Mark1, Mark2 = {P1[1]+(P2[1]-P1[1])*Percent, P1[2]+(P2[2]-P1[2])*Percent}, {P2[1]+(P3[1]-P2[1])*Percent, P2[2]+(P3[2]-P2[2])*Percent}
        PointTable[i] =
    end
end

DrawCurve({1, 4}, {3, 7}, {-4, 9}, 10)