589                 by:= ty div 2; bx:= tx div 2;

   589                 by:= ty div 2; bx:= tx div 2;

   590                 end;

   590                 end;

   591             if ((Land[ty, tx] and lfBasic) <> 0) and (((LandPixels[by,bx] and AMask) shr AShift) = 255) and not disableLandBack then

   591             if ((Land[ty, tx] and lfBasic) <> 0) and (((LandPixels[by,bx] and AMask) shr AShift) = 255) and not disableLandBack then

   592                 LandPixels[by, bx]:= LandBackPixel(tx, ty)

   592                 LandPixels[by, bx]:= LandBackPixel(tx, ty)

   593             else if ((Land[ty, tx] and lfObject) <> 0) or (((LandPixels[by,bx] and AMask) shr AShift) < 255) then

   593             else if ((Land[ty, tx] and lfObject) <> 0) or (((LandPixels[by,bx] and AMask) shr AShift) < 255) then

   595             end

   596             end

   596         end;

   597         end;

   597     for t:= 0 to 7 do

   598     for t:= 0 to 7 do

   598     begin

   599     begin

   599     X:= X + dX;

   600     X:= X + dX;