Modul:Recenze herních sérií
|
Tento modul obsahuje kód pro šablonu {{Recenze herních sérií}}. Pro použití této šablony vizte instrukce na stránce Recenze herních sérií.
Modul byl převzat z anglické Wikipedie, dokumentaci vizte na Module:Video game series reviews.
require 'strict'
local getArgs = require('Module:Arguments').getArgs
local yesno = require('Module:Yesno')
--local Vgwd = require('Module:Video game wikidata')
local p = {}
local columns = {
['mc'] = nil,
['gr'] = nil,
['oc'] = nil,
['fam'] = nil,
['prodeje'] = nil,
['rok'] = nil,
}
local function sortByNumber(a,b)
return a['num'] < b['num']
end;
local function sortByPublicationDate(a,b)
local aP = a['pubDate'];
local bP = b['pubDate'];
if(aP ~= nil and bP ~= nil) then
return aP < bP;
end;
-- fallback sorting, let's assume the oldest wikidata entity is the oldest game
local aQ = a['qid'];
local bQ = b['qid'];
if(aQ ~= nil and bQ ~= nil) then
return aQ < bQ;
end;
-- still nothing? okay, let's just use the initial order
return a['num'] < b['num'];
end;
--local function getVGWD(frame, reviewer)
-- -- Obey local override on displaying this reviewer, don't bother trying to get Wikidata.
-- if(columns[reviewer] == false) then
-- return nil;
-- end;
--
-- local vgwdScore = Vgwd.setReviewer(reviewer);
-- if(vgwdScore ~= nil) then
-- return vgwdScore;
-- end;
--
-- -- Because a game with no platforms may disable show system, we have to reenable for each game.
-- Vgwd.setShowSystem(true);
--
-- return Vgwd.printReviewScores(frame);
--end;
local function checkColumn(game, column)
if(game[column] ~= nil and game[column] ~= "" and columns[column] ~= false) then
columns[column] = true;
end;
end;
local function buildGameEntry(args, num, qid)
local game = {}
game['num'] = num;
game['name'] = args["hra"..num];
game['mc'] = args["mc"..num];
game['gr'] = args["gr"..num];
game['oc'] = args["oc"..num];
game['fam'] = args["fam"..num];
game['prodeje'] = args["prodeje"..num];
game['rok'] = args["rok"..num];
if(qid ~= nil) then
-- If a qid was supplied, we are doing a series pull and won't check columns here.
game['qid'] = qid;
else
-- Pulling game data purely from arguments, so check columns.
game['qid'] = args["qid"..num];
checkColumn(game, 'mc');
checkColumn(game, 'gr');
checkColumn(game, 'oc');
checkColumn(game, 'fam');
checkColumn(game, 'rok');
checkColumn(game, 'prodeje');
end;
return game;
end;
--local function buildGameWikidata(frame, game)
-- if(game['qid'] ~= nil) then
-- local vgwdScore = Vgwd.setGame(game["qid"]);
-- if(vgwdScore == nil) then
-- game['updateLink'] = Vgwd.getUpdateLink();
-- if(game['mc'] == nil) then
-- game['mc'] = getVGWD(frame, 'mc')
-- end;
-- if(game['gr'] == nil and columns['gr']) then
-- game['gr'] = getVGWD(frame, 'gr')
-- end;
-- if(game['oc'] == nil and columns['oc']) then
-- game['oc'] = getVGWD(frame, 'oc')
-- end;
-- if(game['fam'] == nil and columns['fam']) then
-- game['fam'] = getVGWD(frame, 'fam')
-- end;
-- if(game['name'] == nil) then
-- local sitelink = Vgwd.getSitelink();
-- local label = Vgwd.getLabel();
-- if(sitelink ~= nil) then
-- if(sitelink ~= label) then
-- game['name'] = "[[" .. sitelink .. "|" .. label .. "]]";
-- else
-- game['name'] = "[[" .. sitelink .. "]]";
-- end;
-- else
-- game['name'] = label;
-- end;
-- end;
-- if(game['year'] == nil) then
-- local pubDate = Vgwd.getEarliestPublicationDate();
-- game['pubDate'] = pubDate;
-- if(pubDate ~= nil) then
-- game['year'] = pubDate.year;
-- end;
-- end;
-- else
-- -- Entity wasn't found... How to represent? TODO.
-- end;
-- end;
--
-- -- We don't check GR and FAM because they must be explicitly enabled by arguments.
-- checkColumn(game, 'mc');
-- checkColumn(game, 'oc');
-- checkColumn(game, 'year');
-- checkColumn(game, 'sales');
--
-- return game;
--end;
function p.main(frame)
local args = getArgs(frame)
return p._main(frame, args)
end
function p._main(frame, args)
-- Get specified values of column display parameters. Nil = Unspecified.
if(args["mc"]) then
columns['mc'] = yesno(args.mc);
end
if(args["gr"]) then
columns['gr'] = yesno(args.gr);
end
if(args["oc"]) then
columns['oc'] = yesno(args.oc);
end
if(args["fam"]) then
columns['fam'] = yesno(args.fam);
end
if(args["prodeje"]) then
columns['prodeje'] = yesno(args['prodeje'] or args.sales);
end
if(args["roky"]) then
columns['rok'] = yesno(args['roky'] or args.years);
end
local seriesQid = args["seriesQid"]; -- Should be nil, but for testing we have to be able to supply one.
-- Vgwd.setDateFormat(args["df"]);
-- Vgwd.setSystem(nil);
-- Vgwd.setGenerateReferences(true);
-- Vgwd.setShowUpdateLink(false);
-- Vgwd.setUpdateLinkStyle("pen");
local games = {};
local gameRead = {};
-- Look for locally provided gameN and qidN parameters first. Build a table containing all the arguments.
for k, v in pairs(args) do
if(string.find(k, "hra%d+") or string.find(k, "qid%d+")) then
local num = tonumber(string.match(k, "%d+"))
if(num ~= nil) then
if(gameRead[num] == nil) then
gameRead[num] = true;
table.insert(games, buildGameEntry(args,num));
end;
end;
end;
end;
-- Did we find any games specified on the arguments?
if(#games > 0) then
-- Sort by entry.
table.sort(games, sortByNumber);
-- Retrieve missing data with Wikidata if possible, for each entry.
-- for i, game in ipairs(games) do
-- games[i] = buildGameWikidata(frame,game);
-- end;
else
-- If we didn't get any games from the arguments, try to pull the parts of the series from Wikidata.
-- Reset vgwd to current page, presumably a series.
-- local vgwdScore = Vgwd.setGame(seriesQid);
-- if(vgwdScore == nil) then
-- local parts = Vgwd.getParts();
-- for i, qid in ipairs(parts) do
-- -- Build an entry.
-- local game = buildGameEntry({},i,qid)
--
-- -- Retrieve the data from Wikidata and store in the table.
-- table.insert(games, buildGameWikidata(frame,game));
-- end;
--
-- table.sort(games, sortByPublicationDate);
-- else
-- -- Entity wasn't found... How to represent? TODO.
-- end;
end;
local title = args['název'] or args.title
local float = args['zarovnání'] or args.float or 'right'
local ret = '{| class="wikitable plainrowheaders" style="font-size: 90%; margin:0.5em 0 0.5em 1em; '
.. 'float: ' .. float .. '; clear: ' .. float .. ';"\n'
ret = ret .."|+ style=\"font-size: 111.11%;\" | "
if args['název'] or args.title then
ret = ret .. title
elseif columns['prodeje'] then
if columns['fam'] then
ret = ret .. "Prodeje a hodnocení"
elseif columns['gr'] or columns['mc'] or columns['oc'] then
ret = ret .. "Prodeje a hodnocení podle agregátorů"
else
ret = ret .. "Prodeje"
end
elseif columns['fam'] then
if columns['gr'] or columns['mc'] or columns['oc'] then
ret = ret .. "Hodnocení podle japonských a západních webů"
else
ret = ret .. "Hodnocení podle Famicú"
end
else
ret = ret .. "Hodnocení podle agregátorů"
end
local updated = args['aktualizováno'] or args.updated
if args['aktualizováno'] or args.updated then
ret = ret .. "<br /><small>''Ke dni " .. updated ..".''</small>"
end
ret = ret .. " \n"
ret = ret .. "! scope=\"col\" | Hra \n"
if columns['rok'] then
ret = ret .. "! scope=\"col\" | Rok\n"
end
if columns['prodeje'] then
ret = ret .. "! scope=\"col\" | " .. (args['prodeje_název'] or args.sales_title or "Prodané kusy") .. " \n"
end
if columns['fam'] then
ret = ret .. "! scope=\"col\" | " .. (args['fam_název'] or args.fam_title or "''[[Famicú]]''") .. " \n"
end
if columns['gr'] then
ret = ret .. "! scope=\"col\" | " .. (args['gr_název'] or args.gr_title or "[[GameRankings]]") .. " \n"
end
if columns['mc'] then
ret = ret .. "! scope=\"col\" | " .. (args['mc_název'] or args.mc_title or "[[Metacritic]]") .. " \n"
end
if columns['oc'] then
ret = ret .. "! scope=\"col\" | " .. (args['oc_název'] or args.oc_title or "[[OpenCritic]]") .. " \n"
end
-- Print the reviews
for i,game in ipairs(games) do
ret = ret .. "|-\n"
ret = ret .. "! scope=\"row\" | ''" .. game['name'] .. "''"
if(game['updateLink']) then
ret = ret .. " " .. game['updateLink'];
end;
ret = ret .. "\n"
if columns['rok'] then
ret = ret .. "| style=\"text-align: center;\" | " .. (game['rok'] or '') .. " \n"
end
if columns['prodeje'] then
ret = ret .. "| style=\"text-align: center;\" | " .. (game['prodeje'] or '') .. " \n"
end
if columns['fam'] then
ret = ret .. "| style=\"text-align: center;\" | " .. (game['fam'] or '') .. " \n"
end
if columns['gr'] then
ret = ret .. "| style=\"text-align: center;\" | " .. (game['gr'] or '') .. " \n"
end
if columns['mc'] then
ret = ret .. "| style=\"text-align: center;\" | " .. (game['mc'] or '') .. " \n"
end
if columns['oc'] then
ret = ret .. "| style=\"text-align: center;\" | " .. (game['oc'] or '') .. " \n"
end
end;
ret = ret .. "|}"
return ret
end
return p