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

New option to use G10/G11 for firmware-controlled retraction. #1494

Browse source
This commit is contained in:
Alessandro Ranellucci 2013-10-27 16:59:18 +01:00
parent 0e3c9ebe52
commit bcc061176c
5 changed files with 23 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

13
lib/Slic3r/Config.pm
View file

@ -86,6 +86,13 @@ our $Options = {
type => 'bool',
default => 0,
},
'use_firmware_retraction' => {
label => 'Use firmware retraction',
tooltip => 'This experimental setting uses G10 and G11 commands to have the firmware handle the retraction. This is only supported in recent Marlin.',
cli => 'use-firmware-retraction!',
type => 'bool',
default => 0,
},
'extrusion_axis' => {
label => 'Extrusion axis',
tooltip => 'Use this option to set the axis letter associated to your printer\'s extruder (usually E but some printers use A).',
@ -1391,6 +1398,12 @@ sub validate {
die "Invalid value for --gcode-flavor\n"
if !first { $_ eq $self->gcode_flavor } @{$Options->{gcode_flavor}{values}};
die "--use-firmware-retraction is only supported by Marlin firmware\n"
if $self->use_firmware_retraction && $self->gcode_flavor ne 'reprap';
die "--use-firmware-retraction is not compatible with --wipe\n"
if $self->use_firmware_retraction && first {$_} @{$self->wipe};
# --print-center
die "Invalid value for --print-center\n"
if !ref $self->print_center

6
lib/Slic3r/GCode.pm
View file

@ -504,6 +504,8 @@ sub retract {
$self->speed('retract');
$gcode .= $self->G1(undef, undef, $retract->[2] - $retracted, $comment);
}
} elsif ($self->config->use_firmware_retraction) {
$gcode .= "G10 ; retract\n";
} else {
$self->speed('retract');
$gcode .= $self->G1(@$retract);
@ -546,7 +548,9 @@ sub unretract {
my $to_unretract = $self->extruder->retracted + $self->extruder->restart_extra;
if ($to_unretract) {
$self->speed('retract');
if ($self->config->extrusion_axis) {
if ($self->config->use_firmware_retraction) {
$gcode .= "G11 ; unretract\n";
} elsif ($self->config->extrusion_axis) {
# use G1 instead of G0 because G0 will blend the restart with the previous travel move
$gcode .= sprintf "G1 E%.5f F%.3f",
$self->extruder->extrude($to_unretract),

2
lib/Slic3r/GUI/Tab.pm
View file

@ -689,7 +689,7 @@ sub build {
},
{
title => 'Advanced',
options => [qw(vibration_limit)],
options => [qw(use_firmware_retraction vibration_limit)],
},
]);