3D-printing/OrcaSlicer
1
0
Fork 0
mirror of https://github.com/SoftFever/OrcaSlicer.git synced 2025-11-02 20:51:23 -07:00
Code Issues Projects Releases Packages Wiki Activity Actions 4

Some initial work for adapting plater to the new centering workflow

Browse source
This commit is contained in:
Alessandro Ranellucci 2013-12-15 18:00:44 +01:00
parent 250608aa52
commit 4993b12799
2 changed files with 30 additions and 15 deletions
Download patch file Download diff file Expand all files Collapse all files

43
lib/Slic3r/GUI/Plater.pm
View file

@ -864,6 +864,8 @@ sub clean_instance_thumbnails {
sub recenter {
my $self = shift;
$self->{model}->center_instances_around_point($self->{config}->print_center);
return;
return unless @{$self->{objects}};
# get model bounding box in pixels
@ -976,7 +978,6 @@ sub repaint {
my $thumbnail = $object->transformed_thumbnail->clone; # in scaled coordinates
$thumbnail->scale(&Slic3r::SCALING_FACTOR * $parent->{scaling_factor}); # in unscaled pixels
$thumbnail->translate(map $_ * $parent->{scaling_factor}, @{$instance->offset});
$thumbnail->translate(@{$parent->{shift}});
$object->instance_thumbnails->[$instance_idx] = $thumbnail;
@ -989,7 +990,7 @@ sub repaint {
}
foreach my $expolygon (@$thumbnail) {
my $points = $expolygon->contour->pp;
$dc->DrawPolygon($parent->_y($points), 0, 0);
$dc->DrawPolygon($parent->points_to_pixel($points), 0, 0);
}
if (0) {
@ -1021,7 +1022,7 @@ sub repaint {
my ($convex_hull) = @{offset([convex_hull(\@points)], $parent->{config}->skirt_distance * $parent->{scaling_factor}, 100, JT_ROUND)};
$dc->SetPen($parent->{skirt_pen});
$dc->SetBrush($parent->{transparent_brush});
$dc->DrawPolygon($parent->_y($convex_hull), 0, 0);
$dc->DrawPolygon($parent->points_to_pixel($convex_hull), 0, 0);
}
}
@ -1033,7 +1034,8 @@ sub mouse_event {
my $parent = $self->GetParent;
my $point = $event->GetPosition;
my $pos = Slic3r::Point->new(@{$parent->_y([[$point->x, $point->y]])->[0]}); # in pixels
my $pos = $parent->point_to_model_units([ $point->x, $point->y ]); #]] in pixels
$pos = Slic3r::Point->new_scale(@$pos);
if ($event->ButtonDown(&Wx::wxMOUSE_BTN_LEFT)) {
$parent->select_object(undef);
for my $obj_idx (0 .. $#{$parent->{objects}}) {
@ -1243,21 +1245,32 @@ sub statusbar {
return $self->skeinpanel->GetParent->{statusbar};
}
sub to_pixel {
my $self = shift;
return $_[0] * $self->{scaling_factor} * &Slic3r::SCALING_FACTOR;
# convert a model coordinate into a pixel coordinate, assuming preview has square shape
sub point_to_pixel {
my ($self, $point) = @_;
my $canvas_height = $self->{canvas}->GetSize->GetHeight;
return [
$point->[X] * $self->{scaling_factor} + (0),
$canvas_height - ($point->[Y] * $self->{scaling_factor} + (0)),
];
}
sub to_units {
my $self = shift;
return $_[0] / $self->{scaling_factor} / &Slic3r::SCALING_FACTOR;
sub points_to_pixel {
my ($self, $points) = @_;
return [ map $self->point_to_pixel($_), @$points ];
}
sub _y {
my $self = shift;
my ($points) = @_;
my $height = $self->{canvas}->GetSize->GetHeight;
return [ map [ $_->[X], $height - $_->[Y] ], @$points ];
sub point_to_model_units {
my ($self, $point) = @_;
my $canvas_height = $self->{canvas}->GetSize->GetHeight;
return [
$point->[X] / $self->{scaling_factor},
$canvas_height - ($point->[X] / $self->{scaling_factor}),
];
}
package Slic3r::GUI::Plater::DropTarget;

2
lib/Slic3r/Model.pm
View file

@ -227,6 +227,8 @@ sub center_instances_around_point {
my ($self, $point) = @_;
my $bb = $self->bounding_box;
return if !defined $bb;
my $size = $bb->size;
my @shift = (
-$bb->x_min + $point->[X] - $size->[X]/2,