feat(flows): stoppet flow tømmer vognen før den parkeres — først ved flowets mål, rest til nærmeste silo/egen fabrik der tager varen, så på plads og hjem (v1.51.4.0)

2026-09-29 00:24:18 +02:00
parent a390a05e8c
commit a5c52cee09
5 changed files with 157 additions and 14 deletions
@@ -1203,9 +1203,14 @@ function ADRunsController.stopAllAndPark(adEnv)
    if ADFieldSilos ~= nil and ADFieldSilos.stopAll ~= nil then pcall(ADFieldSilos.stopAll, adEnv) end
    if ADFieldJobs ~= nil and ADFieldJobs.setPaused ~= nil then ADFieldJobs.setPaused(true) end
    for _, vehicle in ipairs(toPark) do
-        -- flow-vogn/puljeredskab bag traktoren: sæt det af på sin plads og kør hjem
+        -- flow-traktor: tøm vognen, sæt den af på sin plads og kør hjem (ADFlowWagons klarer hele turen)
        local okHome, pooled = false, false
-        if ADHitch ~= nil then okHome, pooled = pcall(ADHitch.returnHome, adEnv, vehicle) end
+        if ADFlowWagons ~= nil and ADRunsController.getRunForVehicle(vehicle) ~= nil then
+            okHome = pcall(ADFlowWagons.homeVehicle, adEnv, vehicle)
+            pooled = okHome
+        elseif ADHitch ~= nil then
+            okHome, pooled = pcall(ADHitch.returnHome, adEnv, vehicle)
+        end
        local park = not (okHome and pooled) and ADFieldWork ~= nil and ADFieldWork.parkMarkerId ~= nil and ADFieldWork.parkMarkerId(adEnv, vehicle) or nil
        if okHome and pooled then
            summary.parked = summary.parked + 1