【进阶实战】马车货运：多站卸货的运力调度封装

local ROUTES = {
    { stops = { "比奇", "白日门" }, price = 5000, cap = 200 },
    { stops = { "比奇", "沃玛森林", "白日门" }, price = 9000, cap = 350 }
}
local function hireCart(actor, routeNo)
    local r = ROUTES[routeNo]
    if not r then
        sendmsg(actor, 1, "线路不存在。")
        return
    end
    if getplayvar(actor, 1, "CartRoute") then
        sendmsg(actor, 1, "已有马车在途。")
        return
    end
    takeitem(actor, "金币", r.price, 0, "雇马车")
    setplayvar(actor, 1, "CartRoute", routeNo, 0)
    sendmsg(actor, 1, "马车已雇，载重 " .. r.cap
        .. "，途经 " .. #r.stops .. " 站。")
end

local function arriveStop(actor, stopIdx)
    local goods = tostring(getplayvar(actor, 1,
        "CartGoods_" .. stopIdx) or "")
    if goods ~= "" then
        for item in string.gmatch(goods, "[^;]+") do
            giveitem(actor, item, 1, 0, "马车到站")
        end
        setplayvar(actor, 1, "CartGoods_" .. stopIdx, "", 0)
    end
    sendmsg(actor, 1, "马车已抵达第 " .. stopIdx .. " 站。")
end