Module:Sandbox/Alex 21

local p = {}

function trimspaces(s)
  return string.gsub(s, "^%s*(.-)%s*$", "%1")
end

function trimtags(s)
  return string.gsub(s, "<([^>]-)>", "")
end

local function getTitle(...)
	local success, titleObj = pcall(mw.title.new, ...)
	if success then
		return titleObj
	else
		return nil
	end
end

function p.main(frame)
	local args = require('Module:Arguments').getArgs(frame, {frameOnly = true})
	
	local template = string.lower(args[2])
	local parameter = string.lower(args[4])
	
	local templateCount = 0
	local parameterCount = 0
	local templateMatch = tonumber(args[3])
	local parameterMatch = tonumber(args[5])
	
	local titleObj = getTitle(args[1])
	local articleContent = string.lower(string.gsub(titleObj:getContent() or "", "\n", ""))
	
	while templateCount ~= templateMatch do
		articleContent = string.match(articleContent, '%{%{' .. template .. "(.+)")
		templateCount = templateCount + 1
	end
	
	while parameterCount ~= parameterMatch do
		articleContent = string.match(articleContent, '%|%s*' .. parameter .. '%s*=(.+)')
		parameterCount = parameterCount + 1
	end
	
	return string.match(articleContent, '([^%|%}]+)')
end

return p