Modulo:DTGenerico: differenze tra le versioni

Da Wikitrek.
← Differenza precedente
mNessun oggetto della modifica
New loop to identify root class
 
(16 versioni intermedie di uno stesso utente non sono mostrate)
Riga 221: Riga 221:
InstanceQ = Item.claims[Property][1].mainsnak.datavalue.value.id
InstanceQ = Item.claims[Property][1].mainsnak.datavalue.value.id
RootInstanceQ = PropertiesOnTree("P14", 3, false, false, false)
--Initial setting to calculate the root class of the item
if #RootInstanceQ > 1 then
RootInstanceQ = InstanceQ
--Second to last resul, because last one should always be a Class, the topmost Instance possible
--Loop only if the element is not a Class itself
mw.smw.set("Radice=" .. RootInstanceQ[#RootInstanceQ - 1])
if RootInstanceQ ~= "Q47" then
else
--Set a reasonable number of iteration to avoid infinite loop
--Should be a Class
for i = 1, 15, 1 do
mw.smw.set("Radice=" .. RootInstanceQ[1])
local TempQ
TempQ = mw.wikibase.getEntity(RootInstanceQ).claims["P14"][1].mainsnak.datavalue.value.id
--If
if TempQ == "Q47" then
break
else
RootInstanceQ = TempQ
end
end
end
end
RootInstance = mw.wikibase.getLabelByLang(RootInstanceQ, 'it')
if InstanceQ == "Q876" or InstanceQ == "Q78" or InstanceQ == "Q890" then
mw.smw.set("Istanza radice=" .. RootInstance)
--If the item's root class is spaceship, then sets the name
if RootInstance == "Astronave" or RootInstance == "Spaceship" then
--if InstanceQ == "Q876" or InstanceQ == "Q78" or InstanceQ == "Q890" then
--Spaceship or starship
--Spaceship or starship
mw.smw.set("Nome=" .. ShipNameCore(PageName))
mw.smw.set("Nome=" .. ShipNameCore(PageName))
end
end
--[==[AllRows[#AllRows + 1] = {{"P40", "Affiliazione:"}, {AffiliationTree(frame)}}
AllRows[#AllRows + 1] = {{"P41", "Operatore:"}, {OperatorTree(frame)}}
AllRows[#AllRows + 1] = {{"P88", "Classe navale:"}, {table.concat(PropertiesOnTree("P88", 3, false))}}
if AddSemantic then
mw.smw.set("Affiliazione=" .. AffiliationTree(frame))
mw.smw.set("Operatore=" .. OperatorTree(frame))
end]==]
--mw.smw.set("OperatorName2=" .. OperatorName)
-- END specific property
else
else
-- START Unspecified Property
-- START Unspecified Property
Estratto da "https://wikitrek.org/wiki/Modulo:DTGenerico"