ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/Deliantra-Client/bin/pclient
(Generate patch)

Comparing deliantra/Deliantra-Client/bin/pclient (file contents):
Revision 1.36 by elmex, Sat Apr 8 22:23:57 2006 UTC vs.
Revision 1.38 by root, Sun Apr 9 00:06:10 2006 UTC

… …
62 %GL_EXT = map +($_ => 1), split /\s+/, Crossfire::Client::gl_extensions; 62 %GL_EXT = map +($_ => 1), split /\s+/, Crossfire::Client::gl_extensions;
63 63
64 $GL_EXT{GL_ARB_texture_non_power_of_two} 64 $GL_EXT{GL_ARB_texture_non_power_of_two}
65 or warn "WARNING: non-power-of-two opengl extension required"; 65 or warn "WARNING: non-power-of-two opengl extension required";
66 66
67 $UIFONT = SDL::TTFOpenFont Crossfire::Client::find_rcfile "uifont.ttf", $HEIGHT / 40
68 or die "TTFOpenFont: $!";
69
70 $ALT_ENTER_MESSAGE = new Crossfire::Client::Widget::Label 0, $HEIGHT - $HEIGHT / 40, 10, $UIFONT, "Alt-Enter toggles fullscreen mode"; 67 $ALT_ENTER_MESSAGE = new Crossfire::Client::Widget::Label 0, $HEIGHT - $HEIGHT / 40, 10, $UIFONT, "Alt-Enter toggles fullscreen mode";
71 $ALT_ENTER_MESSAGE->move (0, $HEIGHT - ($ALT_ENTER_MESSAGE->size_request)[1]); 68 $ALT_ENTER_MESSAGE->move (0, $HEIGHT - ($ALT_ENTER_MESSAGE->size_request)[1]);
72 $ALT_ENTER_MESSAGE->activate; 69 $ALT_ENTER_MESSAGE->activate;
73 70
74 # Test code #d# 71 # Test code #d#
… …
108 105
109 $CONN = new conn 106 $CONN = new conn
110 host => $CFG->{host}, 107 host => $CFG->{host},
111 port => $CFG->{port}, 108 port => $CFG->{port},
112 user => $CFG->{user}, 109 user => $CFG->{user},
113 pass => $CFG->{password}; 110 pass => $CFG->{password},
111 mapw => 50,
112 maph => 37,
113 ;
114} 114}
115 115
116sub stop_game { 116sub stop_game {
117 remove Glib::Source $SDL_TIMER; 117 remove Glib::Source $SDL_TIMER;
118 118
… …
314 314
315 315
316############################################################################# 316#############################################################################
317 317
318SDL::Init SDL_INIT_EVERYTHING; 318SDL::Init SDL_INIT_EVERYTHING;
319SDL::TTFInit;
320 319
321my $mapwidget = Crossfire::Client::Widget::MapWidget->new; 320my $mapwidget = Crossfire::Client::Widget::MapWidget->new;
322 321
323$mapwidget->activate; 322$mapwidget->activate;
324$mapwidget->focus_in; 323$mapwidget->focus_in;

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines