hedgewars/uLand.pas
changeset 10626 2562797ab3cf
parent 10603 bda5c7caf396
child 10661 0da243c01bde
equal deleted inserted replaced
10625:125e120165aa 10626:2562797ab3cf
   663                 LandPixels[y,x]:= w or (LandPixels[y div 2, x div 2] and AMask)
   663                 LandPixels[y,x]:= w or (LandPixels[y div 2, x div 2] and AMask)
   664                 end
   664                 end
   665     end;
   665     end;
   666 
   666 
   667 PrettifyLandAlpha();
   667 PrettifyLandAlpha();
       
   668 
       
   669 InitWorldEdges();
       
   670 
   668 end;
   671 end;
   669 
   672 
   670 procedure GenPreview(out Preview: TPreview);
   673 procedure GenPreview(out Preview: TPreview);
   671 var rh, rw, ox, oy, x, y, xx, yy, t, bit, cbit, lh, lw: LongInt;
   674 var rh, rw, ox, oy, x, y, xx, yy, t, bit, cbit, lh, lw: LongInt;
   672 begin
   675 begin