| … | |
… | |
| 254 | state => $CFG->{fow_smooth}, |
254 | state => $CFG->{fow_smooth}, |
| 255 | tooltip => "Smooth the Fog-of-War a bit to make it more realistic. Changes are instant.", |
255 | tooltip => "Smooth the Fog-of-War a bit to make it more realistic. Changes are instant.", |
| 256 | connect_changed => sub { |
256 | connect_changed => sub { |
| 257 | my ($self, $value) = @_; |
257 | my ($self, $value) = @_; |
| 258 | $CFG->{fow_smooth} = $value; |
258 | $CFG->{fow_smooth} = $value; |
| 259 | status "Fog of War smoothing requires OpenGL 1.2 or higher" if $CFClient::GL_VERSION < 1.2; |
259 | status "Fog of War smoothing requires OpenGL 1.2 or higher" if $CFClient::OpenGL::GL_VERSION < 1.2; |
| 260 | } |
260 | } |
| 261 | ); |
261 | ); |
| 262 | |
262 | |
| 263 | $table->add (0, $row, new CFClient::UI::Label valign => 0, align => 1, text => "GUI Fontsize"); |
263 | $table->add (0, $row, new CFClient::UI::Label valign => 0, align => 1, text => "GUI Fontsize"); |
| 264 | $table->add (1, $row++, new CFClient::UI::Slider |
264 | $table->add (1, $row++, new CFClient::UI::Slider |
| … | |
… | |
| 444 | tooltip => "The map you are currently on (if supported by the server)."); |
444 | tooltip => "The map you are currently on (if supported by the server)."); |
| 445 | |
445 | |
| 446 | $vb->add (my $hb0 = new CFClient::UI::HBox); |
446 | $vb->add (my $hb0 = new CFClient::UI::HBox); |
| 447 | $hb0->add ($STATWIDS->{weight} = new CFClient::UI::Label valign => 0, align => -1, text => "Weight:", expand => 1, |
447 | $hb0->add ($STATWIDS->{weight} = new CFClient::UI::Label valign => 0, align => -1, text => "Weight:", expand => 1, |
| 448 | can_hover => 1, can_events => 1, |
448 | can_hover => 1, can_events => 1, |
| 449 | tooltip => "This is the amount the Player weights."); |
449 | tooltip => "The weight of the player including all inventory items."); |
| 450 | $hb0->add ($STATWIDS->{m_weight} = new CFClient::UI::Label valign => 0, align => -1, text => "Max weight:", expand => 1, |
450 | $hb0->add ($STATWIDS->{m_weight} = new CFClient::UI::Label valign => 0, align => -1, text => "Max weight:", expand => 1, |
| 451 | can_hover => 1, can_events => 1, |
451 | can_hover => 1, can_events => 1, |
| 452 | tooltip => "The weight limit, you can't carry more than this."); |
452 | tooltip => "The weight limit: you cannot carry more than this."); |
| 453 | |
453 | |
| 454 | |
454 | |
| 455 | $vb->add (my $hb = new CFClient::UI::HBox expand => 1); |
455 | $vb->add (my $hb = new CFClient::UI::HBox expand => 1); |
| 456 | $hb->add (my $tbl = new CFClient::UI::Table expand => 1); |
456 | $hb->add (my $tbl = new CFClient::UI::Table expand => 1); |
| 457 | |
457 | |
