--- a/hedgewars/uLand.pas Fri Nov 13 23:04:23 2009 +0000
+++ b/hedgewars/uLand.pas Sat Nov 14 02:53:04 2009 +0000
@@ -688,7 +688,7 @@
Land[cpY + y, cpX + x]:= 0
else if p^[x] = (AMask or RMask) then
Land[cpY + y, cpX + x]:= COLOR_INDESTRUCTIBLE
- else if p^[x] = (AMask or RMask or GMask or BMask) then
+ else if p^[x] = cWhiteColor then
Land[cpY + y, cpX + x]:= COLOR_LAND;
end;
@@ -788,7 +788,7 @@
if (y + w) mod 32 < 16 then
c:= AMask
else
- c:= AMask or RMask or GMask;
+ c:= AMask or RMask or GMask; // FF00FFFF
LandPixels[y, leftX + w]:= c;
LandPixels[y, rightX - w]:= c;
end;
@@ -799,7 +799,7 @@
if (x + w) mod 32 < 16 then
c:= AMask
else
- c:= AMask or RMask or GMask;
+ c:= AMask or RMask or GMask; // FF00FFFF
LandPixels[topY + w, x]:= c;
end;
end;