Help for this page

Select Code to Download

Select or download this

glBegin(GL_POLYGON);    
@pos=($_[0],$_[1]);
...
  glVertex2f($point3[0],$point3[1]);
  glVertex2f($point4[0],$point4[1]);
  glVertex2f($point5[0],$point5[1]);

Select or download this

my @ang=(0,90,45,0,225);
my @dist=(0,10,6,4,8);
...
  $points[$posi]=($prev[0],$prev[1]);
  glVertex2f($prev[0],$prev[1]);
}