equal
deleted
inserted
replaced
193 // Water |
193 // Water |
194 r.y:= WorldDy + cWaterLine + 32; |
194 r.y:= WorldDy + cWaterLine + 32; |
195 if r.y < cScreenHeight then |
195 if r.y < cScreenHeight then |
196 begin |
196 begin |
197 if r.y < 0 then r.y:= 0; |
197 if r.y < 0 then r.y:= 0; |
198 r.h:= cScreenHeight - r.y; |
198 |
199 r.x:= 0; |
199 glDisable(GL_TEXTURE_2D); |
200 r.w:= cScreenWidth; |
200 glBegin(GL_QUADS); |
201 // SDL_FillRect(Surface, @r, cWaterColor) |
201 glColor3ub(0, $5A, $CE); // water color |
|
202 glVertex2i(0, r.y); |
|
203 glVertex2i(cScreenWidth, r.y); |
|
204 glColor3ub(0, $40, $B3); // deep water color |
|
205 glVertex2i(cScreenWidth, cScreenHeight); |
|
206 glVertex2i(0, cScreenHeight); |
|
207 glEnd(); |
|
208 |
|
209 glColor4f(1, 1, 1, 1); // disable coloring |
|
210 glEnable(GL_TEXTURE_2D) |
202 end; |
211 end; |
203 |
212 |
204 DrawGears(Surface); |
213 DrawGears(Surface); |
205 |
214 |
206 // Waves |
215 // Waves |