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.34 by elmex, Sat Apr 8 18:18:09 2006 UTC vs.
Revision 1.35 by root, Sat Apr 8 18:48:35 2006 UTC

… …
71 $ALT_ENTER_MESSAGE->move (0, $HEIGHT - ($ALT_ENTER_MESSAGE->size_request)[1]); 71 $ALT_ENTER_MESSAGE->move (0, $HEIGHT - ($ALT_ENTER_MESSAGE->size_request)[1]);
72 $ALT_ENTER_MESSAGE->activate; 72 $ALT_ENTER_MESSAGE->activate;
73 73
74 # Test code #d# 74 # Test code #d#
75 $tw = new Crossfire::Client::Widget::Window; 75 $tw = new Crossfire::Client::Widget::Window;
76 $tw->add (my $lbl = new Crossfire::Client::Widget::Label 0, $HEIGHT - $HEIGHT / 40, 10, $UIFONT, "Foo in the garden!"); 76 $tw->add (my $lbl = new Crossfire::Client::Widget::Label 0, 0, 10, $UIFONT, "Foo in the garden!");
77# $tw = new Crossfire::Client::Widget::Label 0, $HEIGHT - $HEIGHT / 40, 10, $UIFONT, "Foo in the garden!"; 77# $tw = new Crossfire::Client::Widget::Label 0, $HEIGHT - $HEIGHT / 40, 10, $UIFONT, "Foo in the garden!";
78 78
79 $tw->move (0, $HEIGHT - 50); 79 $tw->move (0, 0);
80 $tw->activate; 80 $tw->activate;
81 # Test code end #d# 81 # Test code end #d#
82 82
83 glClearColor 0, 0, 0, 0; 83 glClearColor 0, 0, 0, 0;
84 84
85 glEnable GL_TEXTURE_2D; 85 glEnable GL_TEXTURE_2D;
86 glShadeModel GL_FLAT; 86 glShadeModel GL_FLAT;
87 glDisable GL_DEPTH_TEST; 87 glDisable GL_DEPTH_TEST;
88 glBlendFunc GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA; 88 glBlendFunc GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA;
89
90 glMatrixMode GL_PROJECTION;
91 glLoadIdentity;
92 glOrtho 0, $WIDTH, $HEIGHT, 0, -100 , 100;
93
94 glMatrixMode GL_MODELVIEW;
95 89
96 $_->() for @GL_INIT; 90 $_->() for @GL_INIT;
97} 91}
98 92
99sub start_game { 93sub start_game {
… …
125} 119}
126 120
127 121
128sub force_refresh { 122sub force_refresh {
129 glViewport 0, 0, $WIDTH, $HEIGHT; 123 glViewport 0, 0, $WIDTH, $HEIGHT;
124
125 glMatrixMode GL_PROJECTION;
126 glLoadIdentity;
127 glOrtho 0, $WIDTH, $HEIGHT, 0, -100 , 100;
128 glMatrixMode GL_MODELVIEW;
129
130 glClear GL_COLOR_BUFFER_BIT; 130 glClear GL_COLOR_BUFFER_BIT;
131 131
132 $_->draw for @Crossfire::Client::Widget::ACTIVE_WIDGETS; 132 $_->draw for @Crossfire::Client::Widget::ACTIVE_WIDGETS;
133 133
134 SDL::GLSwapBuffers; 134 SDL::GLSwapBuffers;

Diff Legend

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