mirror of
https://github.com/FULU-Foundation/OrcaSlicer-bambulab.git
synced 2026-05-14 13:02:39 -07:00
Support material
This commit is contained in:
@@ -17,7 +17,7 @@ has 'depth_layers' => (is => 'ro', default => sub {1});
|
||||
|
||||
has 'flow_spacing' => (is => 'rw');
|
||||
|
||||
# perimeter/fill/solid-fill/bridge/skirt
|
||||
# perimeter/fill/solid-fill/bridge/skirt/support-material
|
||||
has 'role' => (is => 'rw', required => 1);
|
||||
|
||||
sub BUILD {
|
||||
@@ -45,6 +45,22 @@ sub clip_end {
|
||||
}
|
||||
}
|
||||
|
||||
sub clip_with_expolygon {
|
||||
my $self = shift;
|
||||
my ($expolygon) = @_;
|
||||
|
||||
my @paths = ();
|
||||
foreach my $polyline ($self->polyline->clip_with_expolygon($expolygon)) {
|
||||
push @paths, (ref $self)->new(
|
||||
polyline => $polyline,
|
||||
depth_layers => $self->depth_layers,
|
||||
flow_spacing => $self->flow_spacing,
|
||||
role => $self->role,
|
||||
);
|
||||
}
|
||||
return @paths;
|
||||
}
|
||||
|
||||
sub points {
|
||||
my $self = shift;
|
||||
return $self->polyline;
|
||||
|
||||
Reference in New Issue
Block a user