fix(flows): én læssemarkør pr. læssestation (mælk OG gylle på samme stald), naturlig navnesortering af bygninger (v1.13.1.0)

tests/test_adBuildings.lua

@@ -46,8 +46,9 @@ end
 -- verden: kostald med mælketank (load) og foder (unload), sukkerfabrik (unload + pallespawner), to siloer i række, objektlager, salgssted
 local barn = placeable("barn1", "Kostald 1", 0, 0, {getHusbandryFillLevel = function() return 0 end})
 local milkStation = {owningPlaceable = barn, loadTriggers = {{triggerNode = {x = 20, z = 0}}}}
+local slurryStation = {owningPlaceable = barn, loadTriggers = {{triggerNode = {x = 0, z = 30}}}}
 local barnUnload = {owningPlaceable = barn, unloadTriggers = {{exactFillRootNode = {x = -20, z = 0}}}}
-table.insert(loadStations, milkStation); table.insert(unloadStations, barnUnload)
+table.insert(loadStations, milkStation); table.insert(loadStations, slurryStation); table.insert(unloadStations, barnUnload)
 local mill = placeable("mill", "Sukkerfabrik", 500, 0, {spec_productionPoint = {productionPoint = {productions = {}, storage = {}, palletSpawner = {spawnPlaces = {{startNode = {x = 520, z = 0}}}}, unloadingStation = nil}}})
 local millUnload = {owningPlaceable = mill, unloadTriggers = {{exactFillRootNode = {x = 480, z = 0}}}, isa = function() return true end, isSellingPoint = true}
 table.insert(unloadStations, millUnload)
@@ -67,6 +68,7 @@ local other = placeable("otherfarm", "Naboens", 4000, 0, {spec_silo = {}, ownerF
 addMarker(1, "cow 1 milk", "Milk", 25, 0)          -- 5 m fra mælketriggeren
 addMarker(2, "Cow 1 food", "Cow food", -30, 0)     -- 10 m fra fodertriggeren
 addMarker(3, "cow wait 1", "cow wait", 22, 0)      -- Wait: må ALDRIG vælges (tættere end mælkemarkøren)
+addMarker(11, "Cow 1 Slurry", "Slurry", 0, 33)     -- 3 m fra gylletriggeren
 addMarker(4, "Suger Load", "Pickup", 525, 0)       -- 5 m fra pallespawneren
 addMarker(5, "sugar offload", "production", 470, 0)
 addMarker(6, "silo 1", "silo", 1000, 12)           -- strengt: silo1
@@ -83,6 +85,11 @@ for _, b in ipairs(list) do byId[b.id] = b end
 check("B1 antal (naboens silo udeladt)", #list, 6)
 check("B1 stald", byId.barn1.kind, "husbandry")
 check("B1 stald læssemarkør = mælk (ikke Wait, som er tættere)", byId.barn1.loadMarker.id, 1)
+-- én markør pr. læssestation (mælketank OG gyllebeholder), sorteret på markørnavn
+check("B1 stald har to læssemarkører", #byId.barn1.loadMarkers, 2)
+check("B1 første = cow 1 milk (navnesorteret, uanset store/små)", byId.barn1.loadMarkers[1].id, 1)
+check("B1 anden = Cow 1 Slurry", byId.barn1.loadMarkers[2].name, "Cow 1 Slurry")
+check("B1 gyllemarkør -> stald via byMarker", ADBuildings.byMarker(adEnv, 1, 11, "load").id, "barn1")
 check("B1 stald aflæsningsmarkør = foder", byId.barn1.unloadMarker.id, 2)
 check("B1 stald afstand", byId.barn1.loadMarker.distance, 5)
 check("B1 fabrik læssemarkør via pallespawner", byId.mill.loadMarker.id, 4)
@@ -120,10 +127,13 @@ check("B5 cachet", ADBuildings.list(adEnv, 1) == first, true)
 ADBuildings.invalidate()
 check("B5 ny efter invalidate", ADBuildings.list(adEnv, 1) ~= first, true)
 
--- B6: sortering: fabrik, stald, objektlager, silo, salg; navn inden for slags
+-- B6: sortering efter NAVN (naturlig talrækkefølge), dernæst første markørnavn — ikke efter slags
 local order = {}
-for _, b in ipairs(ADBuildings.list(adEnv, 1)) do table.insert(order, b.kind) end
-check("B6 rækkefølge", table.concat(order, ","), "factory,husbandry,objectStorage,silo,silo,sell")
+for _, b in ipairs(ADBuildings.list(adEnv, 1)) do table.insert(order, b.name) end
+check("B6 rækkefølge", table.concat(order, ","), "Kostald 1,Mejeri,Palleskur,Silo 1,Silo 2,Sukkerfabrik")
+check("B6 naturlig sortering", ADBuildings.naturalLess("Silo 9", "Silo 10"), true)
+check("B6 naturlig sortering, tal før tekst-lighed", ADBuildings.naturalLess("25 Silo Storage", "26 Silo Storage"), true)
+check("B6 naturlig sortering ens navn -> markørnavn", ADBuildings.compare({name = "Farma", loadMarkers = {{name = "30 Silo"}}}, {name = "Farma", loadMarkers = {{name = "4 Silo"}}}), false)
 
 print(failures == 0 and "\nALLE TESTS OK" or ("\n" .. failures .. " FEJL"))
 os.exit(failures == 0 and 0 or 1)

tests/test_adRunsController.lua

@@ -586,14 +586,22 @@ ADUnloadWait = nil; ADOutbound = nil; ADSources = nil
 
 -- C-flow: bygninger -> markører (resolveMarkers), migration af gamle markør-runs, noMarker, flow-rækker
 local buildings = {
-    {id = "barn1", name = "Kostald 1", kind = "husbandry", loadMarker = {id = 10, name = "cow 1 milk", distance = 5}, unloadMarker = {id = 94, name = "Cow 1 Food", distance = 8}, canBeSource = true, canBeTarget = true, canSell = false},
+    {id = "barn1", name = "Kostald 1", kind = "husbandry", loadMarker = {id = 10, name = "cow 1 milk", distance = 5}, loadMarkers = {{id = 10, name = "cow 1 milk", distance = 5}, {id = 11, name = "cow 1 slurry", distance = 3}}, unloadMarker = {id = 94, name = "Cow 1 Food", distance = 8}, canBeSource = true, canBeTarget = true, canSell = false},
     {id = "shed", name = "Palleskur", kind = "objectStorage", loadMarker = nil, unloadMarker = nil, canBeSource = true, canBeTarget = false, canSell = false},
     {id = "mill", name = "Sukkerfabrik", kind = "factory", loadMarker = {id = 12694, name = "Suger Load", distance = 3}, unloadMarker = {id = 77, name = "sugar offload", distance = 4}, canBeSource = true, canBeTarget = true, canSell = false},
 }
 ADBuildings = {
     list = function() return buildings end,
     find = function(_, _, id) for _, b in ipairs(buildings) do if b.id == id then return b end end end,
-    byMarker = function(_, _, wayPointId, role) for _, b in ipairs(buildings) do local m = role == "unload" and b.unloadMarker or b.loadMarker if m ~= nil and m.id == wayPointId then return b end end end,
+    byMarker = function(_, _, wayPointId, role)
+        for _, b in ipairs(buildings) do
+            if role == "unload" then
+                if b.unloadMarker ~= nil and b.unloadMarker.id == wayPointId then return b end
+            else
+                for _, m in ipairs(b.loadMarkers or {b.loadMarker}) do if m ~= nil and m.id == wayPointId then return b end end
+            end
+        end
+    end,
 }
 ADSources = {identify = function(_, id) return (id == 10 or id == 12694 or id == 555) and {kind = "x", wayPointId = id, name = "k"} or nil end, getProducts = function() return {} end, getSellMarkers = function() return {} end, stationAccepts = function() return false end, getSourcePlaceables = function() return {} end}
 ADOutbound = {isOutboundVehicle = function() return false end, getRunStatus = function() return {reasons = {"SUGAR 78 % af top"}} end, getHoldFor = function() return nil end, getTripFor = function() return nil end, releaseInactive = function() end}
@@ -605,12 +613,12 @@ addMarker(77, "sugar offload", "production", 950, 0); unloadAt[77] = {accepts =
 local flowOut = ADRunsController.createRun("Milk", "outbound")
 ADRunsController.updateRun(flowOut.id, {sourceBuildingIds = {"barn1", "shed"}, sourceWayPointIds = {555}})
 local resolved = ADRunsController.resolveMarkers(adEnv, ADRuns.getRun(ADRunsController.store, flowOut.id))
-check("CF1 kildemarkører = bygningens + rå", table.concat(ADRuns.getRun(ADRunsController.store, flowOut.id).sourceWayPointIds, ","), "10,555")
+check("CF1 kildemarkører = ALLE bygningens læssemarkører + rå", table.concat(ADRuns.getRun(ADRunsController.store, flowOut.id).sourceWayPointIds, ","), "10,11,555")
 check("CF1 manglende markør", resolved.missing[1], "Palleskur")
 -- en markør der HØRER til en bygning som ikke længere er valgt, fjernes (den er ikke rå)
 ADRunsController.updateRun(flowOut.id, {sourceWayPointIds = {12694, 555}})
 ADRunsController.resolveMarkers(adEnv, ADRuns.getRun(ADRunsController.store, flowOut.id))
-check("CF1 fravalgt bygnings markør fjernes", table.concat(ADRuns.getRun(ADRunsController.store, flowOut.id).sourceWayPointIds, ","), "10,555")
+check("CF1 fravalgt bygnings markør fjernes", table.concat(ADRuns.getRun(ADRunsController.store, flowOut.id).sourceWayPointIds, ","), "10,11,555")
 -- CF2: forsyning: mål-bygninger -> targetWayPointIds + targetWayPointId
 local flowIn = ADRunsController.createRun("Foder", "supply")
 ADRunsController.updateRun(flowIn.id, {targetBuildingIds = {"barn1", "mill"}})