Модуль:Votes — Википедия

 ---- Этот модуль подсчитывает голоса в секциях голосования local votes = {}  function votes.count(frame)     local new_args = votes._getParameters( frame.args, { 'page', 'level', 'support', 'oppose', 'neutral', 'namespace', 'format', 'template', 'unordered' } );     local page = mw.ustring.gsub(new_args['page'] or '', '_', ' ');     local namespace = new_args['namespace'] or '';     local level = new_args['level'] or 3;     local fmt =  new_args['format'] or 'row';     local template = new_args['template'] or '';     local unordered = new_args['unordered'] or false;     local sections = {         support = { name = new_args['support'] or 'За', count = 0},         oppose  = { name = new_args['oppose']  or 'Против', count = 0},         neutral = { name = new_args['neutral'] or 'Воздержались', count = 0}     }     local pagepointer;     local pattern = "\n#[^#*:][^\n]+"; -- подсчёт нумерованных списков     if page == '' then         pagepointer=mw.title.getCurrentTitle()         assert(pagepointer,"failed to access getCurrentTitle")     else         pagepointer=mw.title.new(page, namespace)         assert(pagepointer,"failed to access mw.title.new("..tostring(page)..")")     end     if type( unordered ) == 'string' and unordered ~= 'false' and unordered ~= 'no' and unordered ~= '0' then     	pattern = "\n%*[^#*:][^\n]+"; -- подсчёт ненумерованных списков     end      local text=pagepointer.getContent(pagepointer);     if text ~= nil then 	    text= mw.ustring.gsub( text, "<!%-%-.-%-%->", "" ); -- убираем HTML комментарии 	    local hpref = mw.ustring.rep("=", tonumber(level)); 	    for k, v in pairs(sections) do  	    	local name = mw.ustring.gsub( v.name, "([%(%)%.%%%+%-%*%?%[%^%$%]])", "%%%1" ); 	        local t = mw.ustring.match(text, "\n" .. hpref .. "[^=]-" .. name .. "[^=]-" .. hpref .."(\n.-)\n="); 	        if t ~= nil then 	            t, v.count = mw.ustring.gsub(t, pattern, ""); -- количество голосов 	        end 	    end 	end     local percent;     if sections.support.count == 0 then         percent = "0&nbsp;%"     else         percent = mw.ustring.format("%.2f&nbsp;%%", sections.support.count * 100 / (sections.support.count + sections.oppose.count))     end     if template ~= '' then     	local targs = {};     	local pframe = frame:getParent();     	if pframe ~= nil then     		for key, value in pairs(pframe.args) do     			targs[key] =  value;     		end     	end     	targs['за'] = tostring(sections.support.count);     	targs['против'] = tostring(sections.oppose.count);     	targs['воздержались'] = tostring(sections.neutral.count);     	targs['page'] = page;     	return frame:expandTemplate{ title = template, args = targs }     end	     if fmt == 'mini' then 		return sections.support.count .. '/' .. sections.oppose.count .. '/' .. sections.neutral.count .. '&nbsp;—&nbsp;' .. percent;     else 		return "\n<tr>" .. 	      "<td class=\"criteriaCheck-supportVotesCount\">" .. sections.support.count .. " </td>" .. 	      "<td class=\"criteriaCheck-opposeVotesCount\">" .. sections.oppose.count .. " </td>" .. 	      "<td class=\"criteriaCheck-neutralVotesCount\">" .. sections.neutral.count .. " </td>" .. 	      "<td class=\"criteriaCheck-supportPercent\">" .. percent .. " </td>" .. 	     "</tr>"; 	end end  -- Таблица параметров function votes._getParameters( frame_args, arg_list )     local new_args = {};     local index = 1;     local value;       for i,arg in ipairs( arg_list ) do         value = frame_args[arg]         if value == nil then             value = frame_args[index];             index = index + 1;         end         new_args[arg] = value;     end       return new_args; end    return votes