3DPrinting/PrusaSlicer-NonPlainar
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Connect support material paths

Browse source
This commit is contained in:
Alessandro Ranellucci 2012-06-23 22:58:12 +02:00
parent bf1aba3d08
commit 1fb44474a9
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lib/Slic3r/Print/Object.pm
View file

@ -547,7 +547,8 @@ sub generate_support_material {
Slic3r::debugf "Generating patterns\n"; Slic3r::debugf "Generating patterns\n";
my $support_patterns = []; # in case we want cross-hatching my $support_patterns = []; # in case we want cross-hatching
{ {
my @support_material_areas = @{union_ex([ map @$_, @unsupported_expolygons ])}; my @support_material_areas = map $_->offset_ex(- 0.5 * scale $Slic3r::flow->width),
@{union_ex([ map @$_, @unsupported_expolygons ])};
my $fill = Slic3r::Fill->new(print => $params{print}); my $fill = Slic3r::Fill->new(print => $params{print});
my $filler = $fill->filler($Slic3r::support_material_pattern); my $filler = $fill->filler($Slic3r::support_material_pattern);
@ -579,7 +580,7 @@ sub generate_support_material {
Slic3r::SVG::output(undef, "support_$_.svg", Slic3r::SVG::output(undef, "support_$_.svg",
polylines => [ map $_->polyline, map @$_, $support_patterns->[$_] ], polylines => [ map $_->polyline, map @$_, $support_patterns->[$_] ],
polygons => [ map @$_, @support_material_areas ], polygons => [ map @$_, @support_material_areas ],
) for (0,1,2); ) for 0 .. $#$support_patterns;
} }
} }