模块:LineList

---

--
-- 柠檬写的 230909
-- For 临东定制
--

local p = {}

function p.infobox(frame)
	local args = frame:getParent().args
	local lineName = args.Name
	local lineColor = args.Color
	local company = args.Company
	local ticket = args.Ticket
	local firstTrain = args.FirstTrain
	local lastTrain = args.LastTrain
	
	local output = mw.html.create("div")
	output:addClass("infobox-card")
	
	if args.Clear ~= nil then
		output:cssText('clear: unset;')
	end
	
	local header = output:tag("div"):addClass("header")
	header:tag("div"):addClass("line-name"):wikitext(lineName)
	
	local detail = header:tag("div"):addClass("detail")
	detail:tag("div"):addClass("company"):wikitext(company)
	
	local time = header:tag("div"):addClass("time")
	time:tag("div"):addClass("first-train"):wikitext(firstTrain)
	time:tag("div"):addClass("last-train"):wikitext(lastTrain)
	time:tag("div"):addClass("ticket"):wikitext(ticket)
	
	local stationList = output:tag("ul"):addClass("station-list")
	if args.Direction then
		local direction = args.Direction
		stationList:tag("div"):addClass("direction"):wikitext(direction)
	end
	stationList:wikitext("<div class='line' style='background-color:" .. lineColor .. ";'></div>")
	
    local maxStationIndex = 0
    for key, _ in pairs(args) do
        local stationIndex = tonumber(key:match("^Sta(%d+)$"))
        if stationIndex and stationIndex > maxStationIndex then
            maxStationIndex = stationIndex
        end
    end

    for stationIndex = 1, maxStationIndex do
        local stationInfo = args["Sta" .. stationIndex]
        if stationInfo then
            local li = stationList:tag("li")
            local stationDiv = li:tag("div"):addClass("name")
            local stationDivCircle = stationDiv:tag("div"):addClass("circle"):cssText('border: 4px solid ' .. lineColor .. ';')
            local expandedText = frame:preprocess(stationInfo)
            stationDiv:wikitext(expandedText)

            if args["Sta" .. stationIndex .. "Unopen"] then
                stationDiv:cssText('color: var(--color-base--subtle);')
                stationDivCircle:cssText('border: 4px solid var(--color-surface-4);')
            end
        end
    end
	
	return tostring(output)
end

return p