Remove ;_WIPE marks in G-code which were left between objects in sequential printing

This commit is contained in:
Alessandro Ranellucci 2015-03-06 10:25:31 +01:00
parent 722e94513c
commit c2009af1c6
2 changed files with 3 additions and 1 deletions

View file

@ -584,7 +584,7 @@ sub wipe {
$gcode .= $gcodegen->writer->extrude_to_xy( $gcode .= $gcodegen->writer->extrude_to_xy(
$gcodegen->point_to_gcode($line->b), $gcodegen->point_to_gcode($line->b),
-$dE, -$dE,
'retract' . ($gcodegen->enable_cooling_markers ? ';_WIPE' : ''), 'wipe and retract' . ($gcodegen->enable_cooling_markers ? ';_WIPE' : ''),
); );
$retracted += $dE; $retracted += $dE;
} }

View file

@ -195,12 +195,14 @@ sub export {
# no collision happens hopefully. # no collision happens hopefully.
if ($finished_objects > 0) { if ($finished_objects > 0) {
$gcodegen->set_origin(Slic3r::Pointf->new(map unscale $copy->[$_], X,Y)); $gcodegen->set_origin(Slic3r::Pointf->new(map unscale $copy->[$_], X,Y));
$gcodegen->enable_cooling_markers(0); # we're not filtering these moves through CoolingBuffer
print $fh $gcodegen->retract; print $fh $gcodegen->retract;
print $fh $gcodegen->travel_to( print $fh $gcodegen->travel_to(
Slic3r::Point->new(0,0), Slic3r::Point->new(0,0),
undef, undef,
'move to origin position for next object', 'move to origin position for next object',
); );
$gcodegen->enable_cooling_markers(1);
} }
my @layers = sort { $a->print_z <=> $b->print_z } @{$object->layers}, @{$object->support_layers}; my @layers = sort { $a->print_z <=> $b->print_z } @{$object->layers}, @{$object->support_layers};