local PointsBuffer = ''  -- A string to accumulate points in

function AddPoint(x, y, width, erase)
 PointsBuffer = PointsBuffer .. string.char(band(x,0xff00) / 256 , band(x,0xff) , band(y,0xff00) / 256 , band(y,0xff))
 if width then
     width = bor(width,0x80)
     if erase then
         width = bor(width,0x40)
     end
     PointsBuffer = PointsBuffer .. string.char(width)
 else
     PointsBuffer = PointsBuffer .. string.char(0)
 end
 if #PointsBuffer > 245 then
     ParseCommand('draw '..PointsBuffer)
     PointsBuffer = ''
 end
end

function FlushPoints()
 if #PointsBuffer > 0 then
     ParseCommand('draw '..PointsBuffer)
     PointsBuffer = ''
 end
end