Polygon

%
G21 G90
 
#<r> = 30
#<n> = 5
 
G00 X0 Y#<r>
#<a> = 0
#<c> = 0
o<loop> while [#<c> LE #<n>]
  #<x> = [#<r> * SIN[#<a>]]
  #<y> = [#<r> * COS[#<a>]]
  G01 X#<x> Y#<y>
  #<a> = [#<a> + 360 / #<n>]
  #<c> = [#<c> + 1]
o<loop> endwhile
%