Modulo:Sandbox/Daimona Eaytoy/Test2

local p={};
function p.main(frame)
	--Caricamento del sottomodulo del bio
	att = frame.args[1]
	naz = frame.args[2]
	res = frame.args[3]
--attività
	pluratt = mw.loadData("Modulo:Bio/Plurale attività")
    att = pluratt[att]
--nazionalità
	plurnaz = mw.loadData("Modulo:Bio/Plurale nazionalità")
    naz = plurnaz[naz]

cfr = att.." "..naz
if cfr==res then return else return "[[Categoria:"..res:gsub("^%l", string.upper).."]]\n" end
end--fine main

function p.sperimentale(frame)
	--Caricamento del sottomodulo del bio
	att = frame.args[1]
	naz = frame.args[2]
	epc = frame.args[3]
	epc2 = frame.args[4]
	ord = frame.args[5]
	res = frame.args[6]
--attività
	pluratt = mw.loadData("Modulo:Bio/Plurale attività")
    att = pluratt[att]
--nazionalità
	plurnaz = mw.loadData("Modulo:Bio/Plurale nazionalità")
    naz = plurnaz[naz]
--epoca 1 e 2
	cfg = mw.loadData("Modulo:Bio/Configurazione")
	if epc~=nil then epc = cfg.epoche[epc] end
	if epc2~=nil then epc2 = cfg.epoche[epc2] end

--Primo valore di confronto, semplice
cfr1 = att.." "..naz
--Secondo valore, con inclusa la dicitura dell'epoca
if epc~=nil then cfr2 = cfr1 .." " .. epc end
--Terzo valore, con epoca2
if epc2~=nil then cfr3 = cfr1 .." " .. epc2 end

--Concatenazione del valore di ritorno, con eventuale ordinamento
if ord=="" then ritorno="[[Categoria:"..res:gsub("^%l", string.upper).."]]\n" else ritorno="[[Categoria:"..res:gsub("^%l", string.upper).."|"..ord.."]]\n" end

--Triplo confronto (semplice, epc1 ed epc2) per stabilire se togliere o meno la categoria
if cfr1==res or cfr2==res or cfr3==res then return else return ritorno end
end--fine sperimentale

--================================================================================
--FINE GESTIONE BIO, INIZIO ARTISTA MUSICALE
--================================================================================

function p.musicale(frame)
	--Caricamento parametri
	gen = frame.args[1]
	naz = frame.args[2]
	ord = frame.args[3]
	res = frame.args[4]
--attività
	plurgen = mw.loadData("Modulo:Sandbox/Daimona Eaytoy/Test3")
    gen = plurgen[gen]
--nazionalità
	plurnaz = mw.loadData("Modulo:Bio/Plurale nazionalità")
    naz = plurnaz[naz]

--Valore di confronto
cfr = gen.." "..naz

--Concatenazione del valore di ritorno, con eventuale ordinamento
if ord=="" then ritorno="[[Categoria:"..res:gsub("^%l", string.upper).."]]\n" else ritorno="[[Categoria:"..res:gsub("^%l", string.upper).."|"..ord.."]]\n" end

--Confronto per stabilire se togliere o meno la categoria
if cfr==res then return else return ritorno end
end--fine musicale


return p


--[[

ELENCO DI NAZIONALITÀ PARTICOLARI CHE LA REGEX NON IDENTIFICA (RICHIEDONO UN CONTROLLO INUTILMENTE TROPPO COMPLICATO)

["macedone antica"] = "macedoni antichi",
["macedone antico"] = "macedoni antichi",
["delle Barbados"] = "barbadiani",
["burkiniana"] = "burkinabè",
["burkiniano"] = "burkinabè",
["congolese (Repubblica Democratica del Congo)"] = "congolesi (Rep. Dem. del Congo)",
["della Repubblica Democratica del Congo"] = "congolesi (Rep. Dem. del Congo)",
["congolese (Repubblica del Congo)"] = "congolesi (Repubblica del Congo)",
["della Repubblica del Congo"] = "congolesi (Repubblica del Congo)",
["della Guinea Equatoriale"] = "equatoguineani",
["di Timor Est"] = "est-timoresi",
["est timorese"] = "est-timoresi",
["di Kiribati"] = "gilbertesi",
["kiribatese"] = "gilbertesi",
["greca antica"] = "greci antichi",
["greco antico"] = "greci antichi",
["del Liechtenstein"] = "liechtensteinesi",
["malaysiana"] = "malesi",
["malaysiano"] = "malesi",
["nativa americana"] = "nativi americani",
["nativo americano"] = "nativi americani",
["di Saint Kitts e Nevis"] = "nevisiani",
["latina"] = "romani",
["latino"] = "romani",
["romena"] = "rumeni",
["romeno"] = "rumeni",
["saharawi"] = "sahrāwī",
["sanmarinese"] = "sammarinesi",
["samoana americana"] = "samoani americani",
["samoano americano"] = "samoani americani",
["alana"] = "sarmati",
["alano"] = "sarmati",
["iaziga"] = "sarmati",
["iazigo"] = "sarmati",
["cingalese"] = "singalesi",
["dello Sri Lanka"] = "singalesi",
["sveva"] = "suebi",
["svevo"] = "suebi",
["tedesca occidentale"] = "tedeschi",
["tedesca orientale"] = "tedeschi",
["tedesca-occidentale"] = "tedeschi",
["tedesca-orientale"] = "tedeschi",
["tedesco occidentale"] = "tedeschi",
["tedesco orientale"] = "tedeschi",
["tedesco-occidentale"] = "tedeschi",
["tedesco-orientale"] = "tedeschi",
["tailandese"] = "thailandesi",
["di Trinidad e Tobago"] = "trinidadiani",
["trinidegna"] = "trinidadiani",
["trinidegno"] = "trinidadiani"



ATTIVITÀ NON IDENTIFICATE DALLA REGEX (STESSO MOTIVO):
["disc jockey"] = "disc jockey",
["doge"] = "dogi",
["mimo"] = "mimi",
["top model"] = "modelli",
["papa"] = "papi",
["sci orientista"] = "sci orientisti",
["re"] = "sovrani"




TIPO ARTISTA MUSICALE NON SUPPORTATI (VEDI SOPRA)
|strumentista = Musicisti per nazionalità
|beatmaker = Disc jockey per nazionalità
|dj = Disc jockey per nazionalità
|disc jockey = Disc jockey per nazionalità
|deejay = Disc jockey per nazionalità
--]]