anchor.diff:          begin
             Dec(FI.Count);
             FI.Forests[K] := FI.Forests[ FI.Count ];
  -          break;
  +          Break;
           end;
     end;
   
  
positive.code:   LoadStream.Read(fFields.UpdateIdx);
    SetLength(fFields.Farms,fFields.Count);
    if (fFields.Count > 0) then
      LoadStream.Read(fFields.Farms[0],SizeOf(fFields.Farms[0]) * fFields.Count);
  
    for HT := HOUSE_MIN to HOUSE_MAX do
    begin
  
negative.code:   for HT := HOUSE_MIN to HOUSE_MAX do
      for K := 0 to fPlannedHouses[HT].Count - 1 do
        with fPlannedHouses[HT].Plans[K] do
          House := gHands.GetHouseByUID(Cardinal(House));
  end;
  
  
  