Lihat sumber bagi Modul:Video game release

require('Module:No globals')

local getArgs = require('Module:Arguments').getArgs
local cd = require('Module:CountryData')
local p = {}

local labels  = {
    ['NA'] = "[[Amerika Utara|NA]]",
    ['EU'] = "[[Eropah|EU]]",
    ['EUR'] = "[[Eropah|EU]]",
    ['AU'] = "[[Australasia|AU]]",
    ['AUS'] = "[[Australasia|AU]]",
    ['PAL'] = "[[Rantau PAL|PAL]]",
    ['SEA'] = "[[Asia Tenggara|SEA]]",
    ['AS'] = "[[Asia|AS]]",
    ['SA'] = "[[Amerika Selatan|SA]]",
    ['OC'] = "[[Oceania|OC]]",
    ['WW'] = "<abbr title=\"Seluruh dunia\">WW</abbr>",
    ['?'] = "<abbr title=\"Tidak diketahui\">?</abbr>"
}

local function getLocalLabel(alias)
	local label = labels[string.upper(alias)] 

	return label
end

local countryData = {}; -- Used to store country data to avoid the need of repeated calls to Module:CountryData. This saves a little time if the same abbreviation appears multiple times in the template.

local function getCountryData(frame, alias)
	local ualias = string.upper(alias)
	
	if(countryData[ualias] == nil) then
		local cdtable = cd.gettable(frame,alias,{})
		countryData[ualias] = cdtable['alias']
	end

	return countryData[ualias]
end

function p.main(frame)
	local args = getArgs(frame)
	local out = "<ul style=\"list-style: none none; line-height: inherit; margin: 0px;\">"
	
	-- Old syntax "Two parameter region" use case, where param 1 is an article, param 2 is a label, and param 3 is the date. We assume this case if argument 4 is nil.
	if(args[3] ~= nil and args[4] == nil) then
		out = out .. "<li><span style=\"font-size:95%;\">[["
		if(args[1] ~= nil) then
			out = out .. args[1]
		end
		out = out .. "|"
		if(args[2] ~= nil) then
			out = out .. args[2]
		end
		out = out .. "]]:</span> " .. args[3] .. "[[Category:Laman menggunakan keluaran permainan video dengan 2 parameter region]]</li>"
	-- Old syntax "Blank region" use case, where param 1 is empty, and param 2 is the date.
	elseif(args[1] == nil and args[2] ~= nil) then
		out = out .. "<li>" .. args[2] .. "[[Category:Laman menggunakan keluaran permainan video tanpa rantau]]</li>"
	-- Normal use cases, region/date pairs in 1/2, 3/4, 5/6, etc.
	else
		local i = 1
		local j = 2
	    while(args[i] and args[j]) do
    		local label = getLocalLabel(args[i]);
    	
	    	-- Didn't find a local label? Check for country data.
    		if(label == nil) then
    			label = getCountryData(frame, args[i])
    		
	    		-- Found something? Build a sitelink with it.
    			if(label ~= nil) then
    				label = "[[" .. label .. "|" .. args[i] .. "]]"
    			else
	    			label = args[i]
				end
			end

			out = out .. "<li><span style=\"font-size:95%;\">" .. label .. ":</span> " .. args[j] .. "</li>"
      
			i = i + 2
			j = j + 2
		end
    end

    out = out .. "</ul>"
    
    -- Check for named parameters
	local parameterMsg = "[[Category:Laman menggunakan keluaran permainan video dengan parameter diisi|_VALUE_]]"
	if(frame:preprocess( "{{REVISIONID}}" ) == "") then
		-- Preview?
		parameterMsg = "<div class=\"hatnote\" style=\"color:red\"><strong>Amaran:</strong> parameter \"_VALUE_\" yang tidak diketahui (mesej ini hanya terpapar semasa pralihat sahaja).</div>"
	end
	for k, v in pairs(args) do
		if(type(k) ~= 'number') then
			local msg = parameterMsg:gsub('_VALUE_', k)
			out = out .. msg
		end
	end

    return out
end

return p