juli/OrcaSlicer
1
1
Fork 0
mirror of https://github.com/OrcaSlicer/OrcaSlicer.git synced 2026-05-31 00:52:51 +00:00
Code Issues Packages Projects Releases Wiki Activity

Acceleration control. #185

Browse Source
This commit is contained in:
Alessandro Ranellucci
2012-02-10 14:53:44 +01:00
parent ad8c9d4ea1
commit 74c71b4ef2
5 changed files with 38 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
lib/Slic3r/Extruder.pm
View File

@@ -233,6 +233,15 @@ sub unretract {
return $gcode;
}
sub set_acceleration {
my $self = shift;
my ($acceleration) = @_;
return unless $Slic3r::acceleration;
return sprintf "M201 E%s%s\n",
$acceleration, ($Slic3r::gcode_comments ? ' ; adjust acceleration' : '');
}
sub G0 {
my $self = shift;
return $self->G1(@_) if !$Slic3r::g0;