diff options
author | Alessandro Ranellucci <aar@cpan.org> | 2015-02-01 16:07:32 +0300 |
---|---|---|
committer | Alessandro Ranellucci <aar@cpan.org> | 2015-02-01 16:07:32 +0300 |
commit | 3ae6f2630e21a079689a51ef3c1496c199cfb636 (patch) | |
tree | b9d06a4443c81e692e68b22c62232dc1fee17dcc /utils | |
parent | 766b301f78593a7e07d44b79f600a8bd538ee098 (diff) | |
parent | bb3bf28e594d805f479af5ad2f1c944e7251d5f6 (diff) |
Merge branch 'master' into sender
Conflicts:
Build.PL
Diffstat (limited to 'utils')
-rw-r--r-- | utils/view-mesh.pl | 7 | ||||
-rwxr-xr-x | utils/view-toolpaths.pl | 10 |
2 files changed, 9 insertions, 8 deletions
diff --git a/utils/view-mesh.pl b/utils/view-mesh.pl index 25fbf3638..687a56224 100644 --- a/utils/view-mesh.pl +++ b/utils/view-mesh.pl @@ -12,7 +12,7 @@ BEGIN { use Getopt::Long qw(:config no_auto_abbrev); use Slic3r; use Slic3r::GUI; -use Slic3r::GUI::PreviewCanvas; +use Slic3r::GUI::3DScene; $|++; my %opt = (); @@ -31,11 +31,12 @@ my %opt = (); # make sure all objects have at least one defined instance $model->add_default_instances; + $_->center_around_origin for @{$model->objects}; # and align to Z = 0 my $app = Slic3r::ViewMesh->new; $app->{canvas}->enable_picking(1); $app->{canvas}->enable_moving($opt{enable_moving}); - $app->{canvas}->load_object($model->objects->[0]); + $app->{canvas}->load_object($model, 0); $app->{canvas}->set_auto_bed_shape; $app->{canvas}->zoom_to_volumes; $app->{canvas}->SetCuttingPlane($opt{cut}) if defined $opt{cut}; @@ -66,7 +67,7 @@ sub OnInit { my $frame = Wx::Frame->new(undef, -1, 'Mesh Viewer', [-1, -1], [500, 400]); my $panel = Wx::Panel->new($frame, -1); - $self->{canvas} = Slic3r::GUI::PreviewCanvas->new($panel); + $self->{canvas} = Slic3r::GUI::3DScene->new($panel); my $sizer = Wx::BoxSizer->new(wxVERTICAL); $sizer->Add($self->{canvas}, 1, wxEXPAND, 0); diff --git a/utils/view-toolpaths.pl b/utils/view-toolpaths.pl index 847ba61d9..7e1d305bc 100755 --- a/utils/view-toolpaths.pl +++ b/utils/view-toolpaths.pl @@ -12,7 +12,7 @@ BEGIN { use Getopt::Long qw(:config no_auto_abbrev); use Slic3r; use Slic3r::GUI; -use Slic3r::GUI::PreviewCanvas; +use Slic3r::GUI::3DScene; $|++; my %opt = (); @@ -82,13 +82,13 @@ sub OnInit { my $canvas; if ($d3) { - $canvas = Slic3r::GUI::PreviewCanvas->new($panel); - $canvas->print($print); - + $canvas = Slic3r::GUI::3DScene->new($panel); $canvas->set_bed_shape($print->config->bed_shape); foreach my $object (@{$print->objects}) { - $canvas->load_object($object->model_object); + #$canvas->load_print_object_slices($object); + $canvas->load_print_object_toolpaths($object); + #$canvas->load_object($object->model_object); } $canvas->zoom_to_volumes; } else { |