hedgewars/uWorld.pas
changeset 10276 89056c7254ef
parent 10275 6c91047f59b6
child 10277 b325e36f8e54
equal deleted inserted replaced
10275:6c91047f59b6 10276:89056c7254ef
   831         VertexBuffer[2].X:= lw;
   831         VertexBuffer[2].X:= lw;
   832         VertexBuffer[2].Y:= lh;
   832         VertexBuffer[2].Y:= lh;
   833         VertexBuffer[3].X:= -lw;
   833         VertexBuffer[3].X:= -lw;
   834         VertexBuffer[3].Y:= lh;
   834         VertexBuffer[3].Y:= lh;
   835 
   835 
   836         DrawWaterBody(@VertexBuffer[0], Length(VertexBuffer));
   836         DrawWaterBody(@VertexBuffer[0]);
   837 
   837 
   838 {$IFNDEF GL2}
   838 {$IFNDEF GL2}
   839         // must not be Tint() as color array seems to stay active and color reset is required
   839         // must not be Tint() as color array seems to stay active and color reset is required
   840         glColor4ub($FF, $FF, $FF, $FF);
   840         glColor4ub($FF, $FF, $FF, $FF);
   841 {$ENDIF}
   841 {$ENDIF}