Slic3r/lib/Slic3r.pm

package Slic3r;

use strict;
use warnings;

our $VERSION = "0.5.6-beta";

our $debug = 0;
sub debugf {
    printf @_ if $debug;
}

use Slic3r::Config;
use Slic3r::ExPolygon;
use Slic3r::Extruder;
use Slic3r::ExtrusionLoop;
use Slic3r::ExtrusionPath;
use Slic3r::ExtrusionPath::Arc;
use Slic3r::ExtrusionPath::Collection;
use Slic3r::Fill;
use Slic3r::Geometry;
use Slic3r::Layer;
use Slic3r::Line;
use Slic3r::Perimeter;
use Slic3r::Point;
use Slic3r::Polygon;
use Slic3r::Polyline;
use Slic3r::Polyline::Closed;
use Slic3r::Print;
use Slic3r::Skein;
use Slic3r::STL;
use Slic3r::Surface;
use Slic3r::TriangleMesh;
use Slic3r::TriangleMesh::IntersectionLine;

# printer options
our $nozzle_diameter    = 0.5;
our $print_center       = [100,100];  # object will be centered around this point
our $use_relative_e_distances = 0;
our $extrusion_axis     = 'E';
our $z_offset           = 0;
our $gcode_arcs         = 0;
our $g0                 = 0;

# filament options
our $filament_diameter  = 3;    # mm
our $extrusion_multiplier = 1;
our $temperature        = 200;

# speed options
our $travel_speed           = 130;  # mm/sec
our $perimeter_speed        = 30;   # mm/sec
our $small_perimeter_speed  = 30;   # mm/sec
our $infill_speed           = 60;   # mm/sec
our $solid_infill_speed     = 60;   # mm/sec
our $bridge_speed           = 60;   # mm/sec
our $bottom_layer_speed_ratio   = 0.3;

# accuracy options
our $resolution             = 0.00000001;
our $small_perimeter_area   = (5 / $resolution) ** 2;
our $layer_height           = 0.4;
our $first_layer_height_ratio = 1;
our $infill_every_layers    = 1;
our $extrusion_width_ratio  = 0;
our $bridge_flow_ratio      = 1;
our $flow_speed_ratio       = 1;
our $flow_width;

# print options
our $perimeters         = 3;
our $solid_layers       = 3;
our $perimeter_infill_overlap_ratio = 0.15;   # factor for flow width
our $fill_pattern       = 'rectilinear';
our $solid_fill_pattern = 'rectilinear';
our $fill_density       = 0.4;  # 1 = 100%
our $fill_angle         = 0;
our $start_gcode = "G28 ; home all axes";
our $end_gcode = <<"END";
M104 S0 ; turn off temperature
G28 X0  ; home X axis
M84     ; disable motors
END

# retraction options
our $retract_length         = 1;    # mm
our $retract_restart_extra  = 0;    # mm
our $retract_speed          = 40;   # mm/sec
our $retract_before_travel  = 2;    # mm
our $retract_lift           = 0;    # mm

# skirt options
our $skirts             = 1;
our $skirt_distance     = 6;    # mm
our $skirt_height       = 1;    # layers

# transform options
our $scale              = 1;
our $rotate             = 0;
our $duplicate_x        = 1;
our $duplicate_y        = 1;
our $duplicate_distance = 6;    # mm

1;