anchor.diff:      if aCalcKind = dckAccurate then
         Exit;
   
  +    // Just set it to non-tpNone value, which will mark this calculation as a valid
  +    aBidBasicCost.OfferToDemand.Pass := tpWalkRoad;
  +
       aBidBasicCost.OfferToDemand.Value := 7
         //Resource ratios are also considered
         + KaMRandom(65 - 13*gHands[aOwner].Stats.WareDistribution[dWT, fDemand[dWT,iD].Loc_House.HouseType],
  
positive.code:     begin
        bestImportance := fDemand[oldDWT,oldD].Importance;
        bid := TKMDeliveryBid.Create(bestImportance, aSerf, oWT, oldDWT, iO, oldD);
        if TryCalculateBid(dckFast, bid, aSerf) then
          fBestBidCandidates.Push(bid)
        else
          bid.Free;
  
negative.code:   if not IsValid then
      Exit(NOT_REACHABLE_DEST_VALUE);
  
    Result := Byte(SerfToOffer.IsValid) * SerfToOffer.Value
            + Byte(OfferToDemand.IsValid) * OfferToDemand.Value
            + Addition;
  end;
  
  