3D-printing/OrcaSlicer
1
0
Fork 0
mirror of https://github.com/SoftFever/OrcaSlicer.git synced 2025-10-30 20:21:12 -06:00
Code Issues Projects Releases Packages Wiki Activity Actions 5

Make retraction configurable for each extruder

Browse source
This commit is contained in:
Alessandro Ranellucci 2012-08-07 21:08:56 +02:00
parent 63e77fcfd8
commit cf01c142de
5 changed files with 67 additions and 43 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lib/Slic3r/Extruder.pm
View file

@ -5,10 +5,12 @@ use Slic3r::Geometry qw(PI);
use constant OPTIONS => [qw(
nozzle_diameter filament_diameter extrusion_multiplier temperature first_layer_temperature
retract_length retract_lift retract_speed retract_restart_extra retract_before_travel
)];
has $_ => (is => 'ro', required => 1) for @{&OPTIONS};
has 'e_per_mm3' => (is => 'lazy');
has 'retract_speed_mm_min' => (is => 'lazy');
has '_mm3_per_mm_cache' => (is => 'ro', default => sub {{}});
sub _build_e_per_mm3 {
@ -16,6 +18,11 @@ sub _build_e_per_mm3 {
return $self->extrusion_multiplier * (4 / (($self->filament_diameter ** 2) * PI));
}
sub _build_retract_speed_mm_min {
my $self = shift;
return $self->retract_speed * 60;
}
sub make_flow {
my $self = shift;
return Slic3r::Flow->new(nozzle_diameter => $self->nozzle_diameter, @_);