モジュール:Episode table

-- This module implements  and .
local HTMLcolor = mw.loadData( 'Module:Color contrast/colors' )
--------------------------------------------------------------------------------
-- EpisodeTable class
-- The main class.
--------------------------------------------------------------------------------
local contrast_ratio = require('Module:Color contrast')._ratio
local EpisodeTable = {}
function EpisodeTable.cell(background, width, text, reference)
	local cell = mw.html.create('th')
	
	-- Width
	local cell_width
	if width == 'auto' then
		cell_width = 'auto'
	elseif tonumber(width) ~= nil then
		cell_width = width .. '%'
	else
		cell_width = nil
	end
	
	-- Cell
	cell:attr('scope','col')
		:css('background',background or '#CCCCFF')
		:css('width',cell_width)
		:wikitext(text)
	
	-- Reference
	if reference and reference ~=  then
		cell:wikitext(" " .. EpisodeTable.reference(reference, background))
	end
	
	return cell
end
function EpisodeTable.reference(reference, background)
	local link1_cr = contrast_ratio{'#0645AD', background or '#CCCCFF', 'error' = 0}
	local link2_cr = contrast_ratio{'#0B0080', background or '#CCCCFF', 'error' = 0}
	
	local refspan = mw.html.create('span')
		:wikitext(reference)
	
	if link1_cr  white_cr and 'black' or 'white')
		:wikitext("" .. displaytext .. "" .. (args.r and " " .. EpisodeTable.reference(args.r, args.c) or ))
	
	return tostring(row)
end
function EpisodeTable.new(frame,args)
	args = args or {}
	local categories = 
	local background = (args.background and args.background ~=  and args.background ~= '#') and args.background or nil
	
	-- Add # to background if necessary
	if background ~= nil and HTMLcolorbackground == nil then
		background = '#'..(mw.ustring.match(background, '^%s#*(a-fA-F0-9*)%s*$') or )
	end
	
	-- Default widths noted by local consensus
	local defaultwidths = {};
	defaultwidths.overall = 5;
	defaultwidths.overall2 = 5;
	defaultwidths.season = 5;
	defaultwidths.series = 5;
	defaultwidths.prodcode = 7;
	defaultwidths.viewers = 10;
	
	-- Create episode table
	local root = mw.html.create('table')
	
	-- Table width
	local table_width = string.gsub(args.total_width or ,'%%',)
	if args.total_width == 'auto' or args.total_width ==  then
		table_width = 'auto'
	elseif tonumber(table_width) ~= nil then
		table_width = table_width .. '%'
	else
		table_width = '100%'
	end
	
	root
		:addClass('wikitable')
		:addClass('plainrowheaders')
		:addClass('wikiepisodetable')
		:css('width', table_width)
	
	-- Caption
	if args.show_caption then
		-- Visible caption option, with a tracking category
		root:tag('caption'):wikitext(args.caption)
		categories = categories .. 
	elseif args.caption then
		-- If a visible caption isn't defined, then default to the screenreader-only caption
		root:tag('caption'):wikitext(frame:expandTemplate{title='Screen reader-only',args={args.caption}})
	end
	
	-- Colour contrast; add to category only if it's in the mainspace
	local title = mw.title.getCurrentTitle()
	local black_cr = contrast_ratio{background, 'black', 'error' = 0}
	local white_cr = contrast_ratio{'white', background, 'error' = 0}
	
	if title.namespace == 0 and (args.background and args.background ~=  and args.background ~= '#') and black_cr  white_cr and 'black' or 'white') or 'black')
		:css('text-align', 'center')
	
	-- Cells
	do
		local used_season = false
		local country = args.country ~=  and args.country ~= nil
		local viewers = (country and args.country or ) ..  .. (country and  or ) .. '視聴者数' ..
			((not args.viewers_type or args.viewers_type ~= ) and '(' .. (args.viewers_type or '百万人') .. ')' or )
		
		local cellNames = {
			{'overall','EpisodeNumber',EpisodeTable.abbr(,) ..
				((args.season or args.series or args.EpisodeNumber2 or args.EpisodeNumber2Series or args.forceoverall) and '通算話数' or '通算話数')},
			{'season','EpisodeNumber2',EpisodeTable.abbr(,) .. 'シーズン話数'},
			{'series','EpisodeNumber2Series',EpisodeTable.abbr(,) .. 'シリーズ話数'},
			{'title','Title','タイトル'},
			{'aux1','Aux1',},
			{'director','DirectedBy','監督'},
			{'writer','WrittenBy','脚本'},
			{'aux2','Aux2',},
			{'aux3','Aux3',},
			{'airdate','OriginalAirDate', .. (args.released and '公開' or '放送') .. '日'},
			{'altdate','AltDate',},
			{'guests','Guests','ゲスト'},
			{'musicalguests','MusicalGuests','ミュージカル/エンタメゲスト'},
			{'prodcode','ProdCode',EpisodeTable.abbr(,) .. '製作番号'},
			{'viewers','Viewers',viewers},
			{'aux4','Aux4',}
		}
	
		for k,v in pairs(cellNames) do
			local thisCell = argsv1 or argsv2
			if thisCell and (v1 ~= 'series' or (v1 == 'series' and used_season == false)) then
				if v1 == 'season' then used_season = true end
				if (k ", "") or tostring(root)) .. categories
end
--------------------------------------------------------------------------------
-- Exports
--------------------------------------------------------------------------------
local p = {}
function p.main(frame)
	local args = require('Module:Arguments').getArgs(frame, {
		removeBlanks = false,
		wrappers = 'Template:Episode table'
	})
	return EpisodeTable.new(frame,args)
end
function p.part(frame)
	local args = require('Module:Arguments').getArgs(frame, {
		removeBlanks = false,
		wrappers = 'Template:Episode table/part'
	})
	return EpisodeTable.part(frame,args)
end
function p.ref(frame)
	local args = require('Module:Arguments').getArgs(frame, {
		removeBlanks = false,
	})
	return EpisodeTable.reference(args.r,args.b)
end
return p