hedgewars/uLandGraphics.pas
branchicegun
changeset 8585 da608f69d853
parent 8583 f2edd6d5f958
child 8586 191bd86ba000
equal deleted inserted replaced
8583:f2edd6d5f958 8585:da608f69d853
   288     pictureX, pictureY: LongInt;
   288     pictureX, pictureY: LongInt;
   289     w, c: LongWord;
   289     w, c: LongWord;
   290     weight: Longint;
   290     weight: Longint;
   291 begin
   291 begin
   292     weight := getPixelWeight(x, y);
   292     weight := getPixelWeight(x, y);
       
   293     if (land[y, x] and lfIce) <> 0 then
       
   294         exit;
   293     if isLandscape(weight) then
   295     if isLandscape(weight) then
   294         begin
   296         begin
   295         // So. 3 parameters here. Ice colour, Ice opacity, and a bias on the greyscaled pixel towards lightness
   297         // So. 3 parameters here. Ice colour, Ice opacity, and a bias on the greyscaled pixel towards lightness
   296         c:= $7dc1ccff;
   298         c:= $7dc1ccff;
   297         // FIXME should be a global value, not set every single pixel.  Just for test purposes
   299         // FIXME should be a global value, not set every single pixel.  Just for test purposes