跳转到内容

模組:电子游戏主题/优良条目

维基百科,自由的百科全书

这是本页的一个历史版本,由Jeffchu2014留言 | 贡献2020年8月29日 (六) 11:01 (// Edit via Wikiplus)编辑。这可能和当前版本存在着巨大的差异。

require('Module:No globals')

local list = {
	-- 請按「{ '<条目名>', '首页展示存档页面名' },」的語法加入新項目
	-- 儘管列表是按標題漢語拼音排列的,但新項目插入位置可以隨意
	
	-- 典范条目
	{ '洞窟物語', '特色条目/2013年第15周'},
	{ '反重力赛车3', '优良条目/反重力赛车3'},
	{ '古墓丽影 (2013年游戏)', '特色条目/2013年第23周'},
	{ '露營者日記', '特色条目/2009年第33周'},
	{ '世紀帝國系列', '特色条目/2009年第25周'},
	{ '心灵杀手', '特色条目/2014年10月14日'},
	{ '战神:背叛', '特色条目/2015年11月28日'},
	{ '超级肉肉男孩', '典范条目/超级肉肉男孩'},
	{ '任天堂DSi', '典范条目/任天堂DSi'},
	{ '世嘉土星', '典范条目/世嘉土星'},
	{ 'Game Gear', '典范条目/Game Gear'},
	{ 'Dreamcast', '典范条目/Dreamcast'},

	-- 优良条目
	{ '镜之边缘', '优良条目/镜之边缘'},
	{ '薩爾達傳說 時之笛', '优良条目/薩爾達傳說 時之笛'},
        { '压缩空间', '优良条目/压缩空间'},
        { '薩爾達傳說 穆修拉的假面', '优良条目/薩爾達傳說 穆修拉的假面'},
        { '黃金太陽 開啟的封印', '优良条目/黃金太陽 開啟的封印'},
        { '失落的星球:极限状态', '优良条目/失落的星球:极限状态'},
        { '逆轉裁判3', '优良条目/逆转裁判3'},
        { '逆轉裁判4', '优良条目/逆轉裁判4'},
        { '精靈寶可夢 紅寶石·藍寶石', '优良条目/精靈寶可夢 紅寶石·藍寶石'},
        { 'Cross Days', '优良条目/Cross Days'},
        { '黃金太陽系列', '优良条目/黃金太陽系列'},
        { '摩爾莊園', '优良条目/摩尔庄园'},
        { '风之旅人', '优良条目/旅途'},
        { '偶像大師2', '优良条目/偶像大師2'},
        { '德軍總部:新秩序', '优良条目/德軍總部:新秩序'},
        { '偶像大師 深情之星', '优良条目/偶像大師 為你而唱!'},
        { '孤岛惊魂4', '优良条目/孤岛惊魂4'},
        { '偶像大師 閃耀祭典', '优良条目/偶像大師 閃耀祭典'},
        { '末日之戰3', '优良条目/末日之戰3'},
        { '善待动物组织的讽刺网页游戏', '优良条目/善待动物组织的讽刺网页游戏'},
        { '见证者', '优良条目/见证者'},
        { '看火人', '优良条目/看火人'},
        { '巫师3:狂猎', '优良条目/巫師3:狂獵'},
        { '女神異聞錄5', '优良条目/女神異聞錄5'},
        { '孤兒院的劫掠', '优良条目/孤兒院的劫掠'},
        { '雷霆归来 最终幻想XIII', '优良条目/雷霆歸來 最終幻想XIII'},
        { 'SEGA Channel', '优良条目/SEGA Channel'},
        { '特技摩托賽HD', '优良条目/特技摩托賽HD'},
        { '对侠盗猎车手IV的争议', '优良条目/對俠盜獵車手IV的爭議'},
        { '质量效应 (游戏)', '优良条目/质量效应 (游戏)'},
        { '质量效应2', '优良条目/质量效应2'},
        { '质量效应3', '优良条目/质量效应3'},
        { '寂静岭 (游戏)', '优良条目/寂静岭 (游戏)'},
        { '戰慄時空2首部曲:浩劫重生', '优良条目/戰慄時空2首部曲:浩劫重生'},
        { '碧绿丘陵地带', '优良条目/碧绿丘陵地带'},
        { 'SEGA Meganet', '优良条目/SEGA Meganet'},
        { '奥托的历险', '优良条目/奥托的历险'},
        { 'Genesis Nomad', '优良条目/Genesis Nomad'},
        { '戰都天鷹', '优良条目/戰都天鷹'},
        { '极限脱出ADV 善人死亡', '优良条目/极限脱出ADV 善人死亡'},
        { 'SG-1000', '优良条目/SG-1000'},
        { '失蹤行李', '优良条目/失蹤行李'},
        { '古墓丽影 (2013年游戏)', '优良条目/古墓丽影 (2013年游戏)'},
        { 'Kinect 運動大會', '优良条目/Kinect 運動大會'},
        { 'WonderSwan', '优良条目/WonderSwan'},
        { 'Deactivators', '优良条目/Deactivators'},
        { '星際之刃 藍星行動', '优良条目/星際之刃 藍星行動'},
        { '百事侵略者', '优良条目/百事侵略者'},
        { 'Dontnod Entertainment', '优良条目/Dontnod Entertainment'},
        { '生化危机2 重制版', '优良条目/生化危机2 重制版'},
        { 'Kids Computer PICO', '优良条目/Kids Computer PICO'},
        { '櫻花大戰 (遊戲)', '优良条目/櫻花大戰 (遊戲)'},
        { '2016年Dota 2国际邀请赛', '优良条目/2016年Dota 2国际邀请赛'},
        { '生化危機7 惡靈古堡', '优良条目/生化危機7 惡靈古堡'},
        { '異塵餘生:庇護所', '优良条目/異塵餘生:庇護所'},
        { '通往黑暗之路', '优良条目/通往黑暗之路'},
        { '英雄联盟2016赛季全球总决赛', '优良条目/英雄联盟2016赛季全球总决赛'},
        { '星风血雨', '优良条目/星风血雨'},
        { 'T&E虚拟高尔夫', '优良条目/T&E虚拟高尔夫'},
        { "Girl's Garden", "优良条目/Girl's Garden"},
        { '刺激賽車', '优良条目/刺激賽車'},
        { 'Crispy Gamer', '优良条目/Crispy Gamer'},
        { '火焰之紋章 新·紋章之謎 ~光與影的英雄~', '优良条目/火焰之紋章 新·紋章之謎 ~光與影的英雄~'},
}

local getArgs = require('Module:Arguments').getArgs
local rand = require('Module:Random').item
local function getPage(page)
	return mw.getCurrentFrame():expandTemplate{ title = 'Wikipedia:' .. page }
end

local p = {}

function p.random()
	return getPage(rand(list)[2])
end

function p.all()
	local function heading(sect, editlink)
		local i = sect .. '<span class="mw-editsection plainlinks">&#91;[' .. 
			tostring( mw.uri.fullUrl( 'Wikipedia:' .. editlink, 'action=edit' ) ) ..
			' 编辑展示页]&#93;</span>'
		return mw.getCurrentFrame():expandTemplate{ title = 'Fake heading', args = { i, sub = '3' } }
	end
		
	local ret = '<table class="wikitable" style="width: 100%;">'
	for i, v in ipairs(list) do
		if i % 2 == 1 then
			ret = ret .. '<tr style="vertical-align: top;"><td style="width: 49%;">' .. heading(v[1], v[2]) .. getPage(v[2]) .. '</td>'
		else
			ret = ret .. '<td style="width: 49%;">' .. heading(v[1], v[2]) .. getPage(v[2]) .. '</td></tr>'
		end
	end
	if #list % 2 ~= 0 then
		ret = ret .. '<td style="width: 49%;"></td></tr>'
	end
	return ret .. '</table>'
end

return p