--- deliantra/Deliantra-Client/bin/deliantra 2009/11/26 07:19:12 1.97 +++ deliantra/Deliantra-Client/bin/deliantra 2009/12/21 03:30:23 1.98 @@ -136,6 +136,8 @@ my $MAX_FPS = 60; +our $DEFAULT_SERVER = "gameserver.deliantra.net"; + our $META_SERVER = "http://metaserver.schmorp.de/current.json"; our $LAST_REFRESH; @@ -832,12 +834,14 @@ sub start_game { status "logging in..."; + + my $server = $PROFILE->{host} || $DEFAULT_SERVER; + my ($host, $port) = AnyEvent::Socket::parse_hostport $server, "deliantra=13327" + or return status "$server: unable to parse server address, try an empty field."; $LOGIN_BUTTON->set_text ("Logout"); $SETUP_DIALOG->hide; - my ($host, $port) = AnyEvent::Socket::parse_hostport $PROFILE->{host}, "deliantra=13327"; - $MAP = new DC::Map; # hack to make SURE we find the IP address all right @@ -1029,6 +1033,16 @@ on_changed => sub { my ($self, $value) = @_; $CFG->{smooth_movement} = $value; 0 } ); + $table->add_at (0, $row, new DC::UI::Label align => 1, text => "Smooth Transitions"); + $table->add_at (1, $row++, new DC::UI::CheckBox + state => $CFG->{smooth_transitions}, + tooltip => "Smooth Transitions tries to blend the fog of war and lighting smoothly between updates. " + . "If you have a very slow system, non-accelerated drivers or plain dislike smooth scrolling, " + . "then disable this option. Requires Smooth Movement and OpenGL 1.4 or up. Changes take effect immdiately.", + on_changed => sub { my ($self, $value) = @_; $CFG->{smooth_transitions} = $value; 0 } + ); + + $table->add_at (0, $row, new DC::UI::Label align => 1, text => "Map Scale"); $table->add_at (1, $row++, new DC::UI::Slider range => [(log $CFG->{map_scale}) / (log 2), -3, 1, 0, 1], @@ -2711,6 +2725,7 @@ force_opengl11 => undef, disable_alpha => 0, smooth_movement => 1, + smooth_transitions => 1, texture_compression => 1, map_scale => 1, fow_enable => 1,