equal
deleted
inserted
replaced
294 inc(i, w) |
294 inc(i, w) |
295 until i > sw |
295 until i > sw |
296 end; |
296 end; |
297 |
297 |
298 begin |
298 begin |
|
299 if ZoomValue < zoom then |
|
300 begin |
|
301 zoom:= zoom - 0.001 * Lag; |
|
302 if zoom < ZoomValue then zoom:= ZoomValue |
|
303 end else |
|
304 if ZoomValue > zoom then |
|
305 begin |
|
306 zoom:= zoom + 0.001 * Lag; |
|
307 if zoom > ZoomValue then zoom:= ZoomValue |
|
308 end; |
|
309 |
299 // Sky |
310 // Sky |
300 glClear(GL_COLOR_BUFFER_BIT); |
311 glClear(GL_COLOR_BUFFER_BIT); |
301 glEnable(GL_BLEND); |
312 glEnable(GL_BLEND); |
302 glEnable(GL_TEXTURE_2D); |
313 glEnable(GL_TEXTURE_2D); |
303 //glPushMatrix; |
314 //glPushMatrix; |