fix(forsyning): mindst fyldte kilde først kun blandt kilder med >= 25 % af et læs (ellers fyldeste) — foder-traktorer hentede 2-10k l i en gæringssilo der fyldes løbende; knappen viser Start for et flow der aldrig kom i gang, selv med vogn på (v1.57.0.0)

FS25_ADSmartPickup/adSmartPickup.lua

@@ -372,18 +372,26 @@ end
 -- Bedste kilde der har varen: mindst fyldte først for lagervarer, fyldeste først for
 -- varer hvis tanke løber fulde (ADSupplyPlanner). Siloer med varen i EGET lager går
 -- altid forud for dem der kun kan låne fra naboer. Returnerer et valg eller nil.
-local function findBestSource(markerStations, fillTypes, farmId)
+local getLoadCapacity -- defineret længere nede (læs-kapacitet til kildevalget)
+
+local function findBestSource(markerStations, fillTypes, farmId, loadCapacity)
     local prefersFullest = ADSupplyPlanner.prefersFullestSource(getFillTypeNames(fillTypes))
+    local ample = ADSupplyPlanner.ampleLevel(loadCapacity)
     local best = {[true] = {}, [false] = {}}
     for _, entry in ipairs(markerStations) do
         local level, isOwn = getStationFillLevel(entry.station, fillTypes, farmId)
         if level >= ADSmartPickup.MIN_USEFUL_LITERS and not isProtectedProductionInput(entry.station, fillTypes)
-            and ADSupplyPlanner.isBetterSource(level, best[isOwn].level, prefersFullest) then
+            and ADSupplyPlanner.isBetterSource(level, best[isOwn].level, prefersFullest, ample) then
             best[isOwn] = {level = level, marker = entry.marker, station = entry.station, isOwn = isOwn}
         end
     end
 
-    local choice = best[true].marker ~= nil and best[true] or best[false]
+    -- eget lager går forud — men ikke en næsten tom egen tank frem for et rigeligt nabolager
+    local own, other = best[true], best[false]
+    local choice = own
+    if own.marker == nil or (not prefersFullest and other.marker ~= nil and own.level < ample and other.level >= ample) then
+        choice = other
+    end
     if choice.marker == nil then
         return nil
     end
@@ -412,7 +420,7 @@ function ADSmartPickup.findLeastFilledPickup(adEnv, driver)
         return nil
     end
     local groupMarkers = adEnv.ADGraphManager:getMapMarkersInGroup(firstMarker.group)
-    return findBestSource(collectMarkerStations(adEnv, groupMarkers, farmId, nil), fillTypes, farmId)
+    return findBestSource(collectMarkerStations(adEnv, groupMarkers, farmId, nil), fillTypes, farmId, getLoadCapacity(adEnv, driver))
 end
 
 -- Lagrene bag aflæsningsstationen; produktionspunkter uden targetStorages læses direkte.
@@ -719,7 +727,7 @@ function ADSmartPickup.getTargetNeedsRanked(station, fillTypes, farmId, pending)
 end
 
 -- Vognens samlede kapacitet (liter); nil hvis AutoDrive ikke kan opgøre den.
-local function getLoadCapacity(adEnv, driver)
+getLoadCapacity = function(adEnv, driver)
     if adEnv.AutoDrive.getAllUnits == nil or adEnv.AutoDrive.getAllFillLevels == nil then
         return nil
     end
@@ -787,7 +795,7 @@ function ADSmartPickup.findSupplyPickup(adEnv, driver, ingredients, targetWayPoi
     -- bedste foder først: lavere foder kun når truget er nødlidende (ADSupplyPlanner.isFoodAllowed)
     local bestFood = ADSupplyPlanner.bestFoodPriority ~= nil and ADSupplyPlanner.bestFoodPriority(ranked) or nil
     for _, need in ipairs(ranked) do
-        local choice = (ADSupplyPlanner.isFoodAllowed == nil or ADSupplyPlanner.isFoodAllowed(need, bestFood)) and findBestSource(markerStations, {need.fillType}, farmId) or nil
+        local choice = (ADSupplyPlanner.isFoodAllowed == nil or ADSupplyPlanner.isFoodAllowed(need, bestFood)) and findBestSource(markerStations, {need.fillType}, farmId, loadCapacity) or nil
         if choice ~= nil then
             return {
                 markerIndex = choice.markerIndex,