# HG changeset patch
# User unc0rr
# Date 1393581801 -14400
# Node ID e84f9b928ad34fd957c92bbf8fb53ee0d284f27c
# Parent  0570d4b2218771e26627b42fffc4435f9080608c
Use all pixels, not only 8x8 areas

diff -r 0570d4b22187 -r e84f9b928ad3 hedgewars/uLand.pas
--- a/hedgewars/uLand.pas	Fri Feb 28 13:55:16 2014 +0400
+++ b/hedgewars/uLand.pas	Fri Feb 28 14:03:21 2014 +0400
@@ -902,13 +902,13 @@
             begin
             t:= 0;
 
-            for yy:= y * lh - oy to y * lh + 7 - oy do
-                for xx:= x * lw - ox to x * lw + 7 - ox do
+            for yy:= y * lh - oy to y * lh + lh - 1 - oy do
+                for xx:= x * lw - ox to x * lw + lw - 1 - ox do
                     if (yy and LAND_HEIGHT_MASK = 0) and (xx and LAND_WIDTH_MASK = 0)
                         and (Land[yy, xx] <> 0) then
                         inc(t);
 
-            Preview[y, x]:= t * 1023 div 256;
+            Preview[y, x]:= t * 255 div (lh * lw);
             end;
 end;