Module:Sandbox/Ypnypn/Review Explained

local p =

function p.review(frame) page = frame.args['page'] or frame.args[1] article = mw.title.new(page,) content = article:getContent result = issues = critique(content) if frame.args['plain'] then for issue, details in pairs(issues) do result = result..'# '..issue..' = '..details..'\n' end return result else for issue, details in pairs(issues) do result = result..text(issue, details) end if result

then result = 'The article is perfect!' else result = "The article "..page.." has some problems:\n"..result end return result endend

function critique(content) issues =

prose = content prose = string.gsub(prose, '

', ) prose = string.gsub(prose, '^[1] ', ) prose = string.gsub(prose, '%[%[Category:.-%]%]', ) prose = string.gsub(prose, '%[%[File:.-%]%]', ) prose = string.gsub(prose, '%b', )

--infobox if not string.match(content, '

') Then Issues['Infobox']:

'none' end

--categories if not string.match(content, '%[%[Category:') then issues['category'] = 'none' elseif not string.match(content, '%[%[Category:.+%[%[Category:') then issues['category'] = 'one' end

--length length = #prose if length > 100000 then issues['length'] = 'too long' elseif length < 10000 then issues['length'] = 'too short' end

return issuesend

function text(issue, details)

if issue

'infobox' and details

'none' then return '* There is no infobox.\n' end

if issue

'category' then if details

'none' then return '* There are no categories.\n' elseif details

'one' then return '* There is only one category.\n' end end

if issue

'length' then if details

'too long' then return '* The article is very long.\n' elseif details

'too short' then return '* The article is very short.\n' end end

return '

Error: text not found! '..issue..' = '..details..'\n'end

return p

Module:Sandbox/Ypnypn/Review Explained

then result = 'The article is perfect!' else result = "The article "..page.." has some problems:\n"..result end return result endend

'infobox' and details

'category' then if details

'one' then return '* There is only one category.\n' end end

'length' then if details

'too short' then return '* The article is very short.\n' end end

Notes and References