diff -r 7ffc2c9e7224 -r 2754a6a8c8f1 hedgewars/uLandObjects.pas --- a/hedgewars/uLandObjects.pas Fri Sep 12 14:57:42 2008 +0000 +++ b/hedgewars/uLandObjects.pas Fri Sep 12 18:00:49 2008 +0000 @@ -27,7 +27,7 @@ procedure AddOnLandObjects(Surface: PSDL_Surface); implementation -uses uLand, uStore, uConsts, uMisc, uConsole, uRandom, uVisualGears, uFloat, GL, uSound; +uses uLand, uStore, uConsts, uMisc, uConsole, uRandom, uVisualGears, uFloat, GL, uSound, uWorld; const MaxRects = 512; MAXOBJECTRECTS = 16; MAXTHEMEOBJECTS = 32; @@ -357,6 +357,9 @@ // read sky and explosion border colors Readln(f, c1.r, c1.g, c1. b); Readln(f, c2.r, c2.g, c2. b); +// read water gradient colors +Readln(f, WaterColor.r, WaterColor.g, WaterColor. b); +Readln(f, DeepWaterColor.r, DeepWaterColor.g, DeepWaterColor. b); glClearColor(c1.r / 255, c1.g / 255, c1.b / 255, 0.99); // sky color cExplosionBorderColor:= c2.value or $FF000000;