模块: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 stationIndex = 1
	while args["Sta" .. stationIndex] 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
	
	    stationIndex = stationIndex + 1
	end
	
	return tostring(output)
end

return p