モジュール:Tesのソースを表示

-- Module:SMW
local p = {}

-- Return results
function p.main()
	
  local queryResult = mw.smw.getQueryResult( '[[作曲::+]]|?作曲|limit=5000' )
  
  if queryResult == nil then
    return "(no values)"
  end
  
  if type( queryResult ) == "table" then
  	
    local myResult = {}
    
    for k,v in pairs( queryResult.results ) do
      if   v["printouts"]["作曲"] then
        for k,v in pairs( v["printouts"]["作曲"] ) do
          if myResult[v] == nil then
            myResult[v]=1
          else
            myResult[v]=myResult[v]+1
          end
        end
      end
    end
    local root = mw.html.create( 'table' ):addClass('sortable wikitable')
    local th = root:tag('tr')
        th:tag('th'):wikitext("作曲")
        th:tag('th'):wikitext("回数")
    for k,v in pairs( myResult) do
        local tr = root:tag('tr')
        tr:tag('td'):wikitext(k)
        tr:tag('td'):wikitext(v)
    end
    return tostring(root)
  end
  return "(no values)"
end

return p