3D-printing/OrcaSlicer
1
0
Fork 0
mirror of https://github.com/SoftFever/OrcaSlicer.git synced 2025-08-07 22:14:00 -06:00
Code Issues Projects Releases Packages Wiki Activity Actions 1

New extrusion math

Browse source
This commit is contained in:
Alessandro Ranellucci 2011-10-01 18:10:33 +02:00
parent ea88cad8e3
commit 55f2247cd9
4 changed files with 13 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

5
slic3r.pl
View file

@ -13,6 +13,8 @@ use Slic3r;
use Time::HiRes qw(gettimeofday tv_interval);
use XXX;
use constant PI => 4 * atan2(1, 1);
my %opt;
GetOptions(
'help' => sub { usage() },
@ -78,7 +80,8 @@ GetOptions(
if $Slic3r::nozzle_diameter < 0;
die "--layer-height can't be greater than --nozzle-diameter\n"
if $Slic3r::layer_height > $Slic3r::nozzle_diameter;
$Slic3r::flow_width = 4 * (($Slic3r::nozzle_diameter/2)**2) / $Slic3r::layer_height;
$Slic3r::flow_width = ($Slic3r::nozzle_diameter**2)
* $Slic3r::thickness_ratio * PI / (4 * $Slic3r::layer_height);
Slic3r::debugf "Flow width = $Slic3r::flow_width\n";
# --perimeters