Redigerer Modul:Kildeløs

local p = {}

local forekomstAv = {
	[5] = "Artikler uten kilder – biografi",
	[515] = "Artikler uten kilder – geografi", -- by
	[532] = "Artikler uten kilder – geografi", -- landsby
	[4022] = "Artikler uten kilder – geografi", -- elv
	[8502] = "Artikler uten kilder – geografi", -- fjell
	[22698] = "Artikler uten kilder – geografi", -- park
	[23442] = "Artikler uten kilder – geografi", -- øy
	[34763] = "Artikler uten kilder – geografi", -- halvøy
	[45776] = "Artikler uten kilder – geografi", -- fjord
	[188509] = "Artikler uten kilder – geografi", -- forstad
	[215380] = "Artikler uten kilder – band",
	[234460] = "Artikler uten kilder – skriftlig verk",  -- tekst
	[379158] = "Artikler uten kilder – geografi", -- distrikt i Norge
	[482994] = "Artikler uten kilder – album",
	[486972] = "Artikler uten kilder – geografi", -- bosetning
	[618123] = "Artikler uten kilder – geografi",  -- geografisk objekt
	[7725634] = "Artikler uten kilder – skriftlig verk",  -- litterært verk
	[47461344] = "Artikler uten kilder – skriftlig verk"  -- skriftlig verk
}

-- Return kategori til artikkelen
function p.kategori(frame)
    if not mw.wikibase then
        return "Artikler uten kilder, mangler Wikidata"
    end
    local artikkel = mw.wikibase.getEntityObject()
    if not artikkel then
        return "Artikler uten kilder, mangler Wikidata"
    end
    local claims = artikkel.claims
    if not claims then
        return "Artikler uten kilder, mangler utsagn"
    end
    local kat = "Artikler uten kilder"
    local p31 = claims.P31
    local p279 = claims.P279
    if p31 then
        local forekomst = p31[1].mainsnak.datavalue.value["numeric-id"]
        kat = forekomstAv[forekomst] or kat
    else 
    	if not p279 then
    		return "Artikler uten kilder, mangler forekomst av"
    	end
    end
    local p570 = claims.P570
    if p570 then
    	kat = "Artikler uten kilder – biografi, avdød"
    end
    return kat
end	


return p