Honeycomb infill. #300

This commit is contained in:
Alessandro Ranellucci 2012-04-16 11:55:14 +02:00
parent 0faebad4da
commit cb182b8bc2
8 changed files with 126 additions and 20 deletions

View file

@ -54,6 +54,18 @@ sub distance_to {
return Slic3r::Geometry::distance_between_points($self, $point);
}
sub rotate {
my $self = shift;
my ($angle, $center) = @_;
@$self = @{ +(Slic3r::Geometry::rotate_points($angle, $center, $self))[0] };
}
sub translate {
my $self = shift;
my ($x, $y) = @_;
@$self = @{ +(Slic3r::Geometry::move_points([$x, $y], $self))[0] };
}
sub x { $_[0]->[0] }
sub y { $_[0]->[1] }