3D-printing/OrcaSlicer
1
0
Fork 0
mirror of https://github.com/SoftFever/OrcaSlicer.git synced 2025-11-01 05:01:10 -06:00
Code Issues Projects Releases Packages Wiki Activity Actions 4

Implemented skirt

Browse source
This commit is contained in:
Alessandro Ranellucci 2011-09-05 20:00:59 +02:00
parent d8b848a67f
commit ff5044c031
6 changed files with 38 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

17
lib/Slic3r/Perimeter.pm
View file

@ -73,6 +73,23 @@ sub make_perimeter {
}
push @{ $layer->perimeters }, Slic3r::ExtrusionPath->new_from_points(reverse @path_points);
}
# generate skirt on bottom layer
if ($layer->id == 0 && $Slic3r::skirts > 0) {
# find out convex hull
my $points = [ map { @{ $_->mgp_polygon->polygons->[0] } } @{ $layer->surfaces } ];
my $convex_hull = $self->_mgp_from_points_ref($points)->convexhull2;
my $convex_hull_polygon = $self->_mgp_from_points_ref($convex_hull);
# draw outlines from outside to inside
for (my $i = $Slic3r::skirts - 1; $i >= 0; $i--) {
my $outline = $convex_hull_polygon->offset_polygon(
- ($Slic3r::skirt_distance + ($Slic3r::flow_width * $i)) / $Slic3r::resolution
);
push @{$outline->[0]}, $outline->[0][0]; # repeat first point as last to complete the loop
push @{ $layer->skirts }, Slic3r::ExtrusionPath->new_from_points(@{$outline->[0]});
}
}
}
sub offset_polygon {