mirror of
https://github.com/OrcaSlicer/OrcaSlicer.git
synced 2026-05-20 11:53:48 +00:00
Cooling and fan control. #110
This commit is contained in:
@@ -26,8 +26,9 @@ sub new {
|
||||
|
||||
foreach my $opt_key (@{$p{options}}) {
|
||||
my $opt = $Slic3r::Config::Options->{$opt_key};
|
||||
my $label = Wx::StaticText->new($parent, -1, "$opt->{label}:", Wx::wxDefaultPosition, [180,-1]);
|
||||
$label->Wrap(180); # needed to avoid Linux/GTK bug
|
||||
my $label = Wx::StaticText->new($parent, -1, "$opt->{label}:", Wx::wxDefaultPosition,
|
||||
[$p{label_width} || 180, -1]);
|
||||
$label->Wrap($p{label_width} || 180); # needed to avoid Linux/GTK bug
|
||||
|
||||
#set the bold font point size to the same size as all the other labels (for consistency)
|
||||
$bold_font->SetPointSize($label->GetFont()->GetPointSize());
|
||||
|
||||
@@ -47,6 +47,11 @@ sub new {
|
||||
title => 'Retraction',
|
||||
options => [qw(retract_length retract_lift retract_speed retract_restart_extra retract_before_travel)],
|
||||
},
|
||||
cooling => {
|
||||
title => 'Cooling',
|
||||
options => [qw(min_fan_speed max_fan_speed bridge_fan_speed fan_below_layer_time slowdown_below_layer_time min_print_speed disable_fan_first_layers)],
|
||||
label_width => 300,
|
||||
},
|
||||
skirt => {
|
||||
title => 'Skirt',
|
||||
options => [qw(skirts skirt_distance skirt_height)],
|
||||
@@ -101,6 +106,7 @@ sub new {
|
||||
|
||||
my @tabs = (
|
||||
$make_tab->([qw(transform accuracy skirt)], [qw(print retract)]),
|
||||
$make_tab->([qw(cooling)]),
|
||||
$make_tab->([qw(printer filament)], [qw(print_speed speed)]),
|
||||
$make_tab->([qw(gcode)]),
|
||||
$make_tab->([qw(notes)]),
|
||||
@@ -108,10 +114,11 @@ sub new {
|
||||
);
|
||||
|
||||
$tabpanel->AddPage($tabs[0], "Print Settings");
|
||||
$tabpanel->AddPage($tabs[1], "Printer and Filament");
|
||||
$tabpanel->AddPage($tabs[2], "Start/End GCODE");
|
||||
$tabpanel->AddPage($tabs[3], "Notes");
|
||||
$tabpanel->AddPage($tabs[4], "Advanced");
|
||||
$tabpanel->AddPage($tabs[1], "Cooling");
|
||||
$tabpanel->AddPage($tabs[2], "Printer and Filament");
|
||||
$tabpanel->AddPage($tabs[3], "Start/End GCODE");
|
||||
$tabpanel->AddPage($tabs[4], "Notes");
|
||||
$tabpanel->AddPage($tabs[5], "Advanced");
|
||||
|
||||
my $buttons_sizer;
|
||||
{
|
||||
|
||||
Reference in New Issue
Block a user