3D-printing/OrcaSlicer
1
0
Fork 0
mirror of https://github.com/SoftFever/OrcaSlicer.git synced 2025-10-31 04:31:15 -06:00
Code Issues Projects Releases Packages Wiki Activity Actions 5

Also remove bridged perimeters area from support material

Browse source
This commit is contained in:
Alessandro Ranellucci 2014-04-30 01:20:18 +02:00
parent 3e3cc4171c
commit 1d10cd3da6
3 changed files with 71 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

14
lib/Slic3r/Layer/BridgeDetector.pm
View file

@ -77,12 +77,14 @@ sub detect_angle {
# we also test angles of each open supporting edge
# (this finds the optimal angle for C-shaped supports)
push @angles, map Slic3r::Line->new($_->first_point, $_->last_point)->direction,
push @angles,
map Slic3r::Line->new($_->first_point, $_->last_point)->direction,
grep { !$_->first_point->coincides_with($_->last_point) }
@edges;
# remove duplicates
my $min_resolution = PI/180; # 1 degree
@angles = map { ($_ >= &PI-&epsilon) ? ($_-&PI) : $_ } @angles;
@angles = sort @angles;
for (my $i = 1; $i <= $#angles; ++$i) {
if (abs($angles[$i] - $angles[$i-1]) < $min_resolution) {
@ -239,6 +241,14 @@ sub unsupported_edges {
$grown_lower,
);
# filter out edges parallel to the bridging angle
for (my $i = 0; $i <= $#$unsupported; ++$i) {
if (first { abs($_->direction - $angle) < epsilon } @{$unsupported->[$i]->lines}) {
splice @$unsupported, $i, 1;
--$i;
}
}
if (0) {
require "Slic3r/SVG.pm";
Slic3r::SVG::output(
@ -247,7 +257,7 @@ sub unsupported_edges {
green_expolygons => $self->_anchors,
red_expolygons => union_ex($grown_lower),
no_arrows => 1,
polylines => [ map $_->split_at_first_point, @{$self->expolygon} ],
polylines => \@bridge_edges,
red_polylines => $unsupported,
);
}