New --bridge-acceleration option

This commit is contained in:
Alessandro Ranellucci 2013-03-09 20:31:09 +01:00
parent 2acda9973e
commit e9c7460c11
5 changed files with 22 additions and 5 deletions

View file

@ -199,10 +199,13 @@ sub extrude_path {
# adjust acceleration
my $acceleration;
$acceleration = $Slic3r::Config->perimeter_acceleration
if $Slic3r::Config->perimeter_acceleration && $path->is_perimeter;
$acceleration = $Slic3r::Config->infill_acceleration
if $Slic3r::Config->infill_acceleration && $path->is_fill;
if ($Slic3r::Config->perimeter_acceleration && $path->is_perimeter) {
$acceleration = $Slic3r::Config->perimeter_acceleration;
} elsif ($Slic3r::Config->infill_acceleration && $path->is_fill) {
$acceleration = $Slic3r::Config->infill_acceleration;
} elsif ($Slic3r::Config->infill_acceleration && $path->role == EXTR_ROLE_BRIDGE) {
$acceleration = $Slic3r::Config->bridge_acceleration;
}
$gcode .= $self->set_acceleration($acceleration) if $acceleration;
my $area; # mm^3 of extrudate per mm of tool movement