Sub Poly(n, ByRef x, ByRef y)

Draws a polygon