Sorry, I forgot that the Polygon() graphics function renders filled shapes. Use Line() function instead.
Names Default to Here( 1 );
New Window( "Draw My Polygon",
Outline Box( "Polygon",
Graph Box(
Line(
{ 10, 10 },
{ 50, 10 },
{ 90, 50 },
{ 50, 90 },
{ 10, 10 }
)
)
)
);