juli/OrcaSlicer
1
1
Fork 0
mirror of https://github.com/OrcaSlicer/OrcaSlicer.git synced 2026-05-20 03:43:52 +00:00
Code Issues Packages Projects Releases Wiki Activity

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 {