Support material

This commit is contained in:
Alessandro Ranellucci 2012-02-19 12:03:36 +01:00
parent e0e2023a5a
commit 7b67fae686
12 changed files with 135 additions and 17 deletions

View file

@ -34,17 +34,16 @@ sub BUILD {
my $self = shift;
$self->fillers->{$_} ||= $FillTypes{$_}->new(print => $self->print)
for ('rectilinear', $Slic3r::fill_pattern, $Slic3r::solid_fill_pattern);
my $max_print_dimension = $self->print->max_length * sqrt(2);
$_->max_print_dimension($max_print_dimension) for values %{$self->fillers};
}
sub make_fill {
my $self = shift;
my ($layer) = @_;
my $max_print_dimension = $self->print->max_length * sqrt(2);
for (values %{$self->fillers}) {
$_->layer($layer);
$_->max_print_dimension($max_print_dimension);
}
$_->layer($layer) for values %{$self->fillers};
printf "Filling layer %d:\n", $layer->id;