Modulo:Sandbox/Adert: differenze tra le versioni

Versione delle 02:22, 8 giu 2016

Versione attuale delle 22:00, 8 giu 2016

(16 versioni intermedie di uno stesso utente non sono mostrate)

Riga 1:

local mWikidata = require('Modulo:Wikidata')

local p = {}

local agenzia

function p.nomeagenzia(agenzia)

agenzia = string.gsub(agenzia,'Q42262', '[['.. mw.wikibase.sitelink('Q42262') ..'|ESA]]')

agenzia = string.gsub(agenzia,'Q392953', '[['.. mw.wikibase.sitelink('Q392953') ..'|ASI]]')

agenzia = string.gsub(agenzia,'Q23548', '[['.. mw.wikibase.sitelink('Q23548') ..'|NASA]]')

return agenzia

end

function p.equipaggio(ruoli, qualificatore, ruolo)

local idNome

local text =""

for _,v in pairs(ruoli) do

if v == qualificatore then

text = text .. '| ' ..ruolo.. ' || ' .. mWikidata._getProperty( { 'P1029', qualifier='P39', qualifiervalue=qualificatore } )

idNome = mWikidata._getProperty( { 'P1029', qualifier='P39', qualifiervalue=qualificatore,formatting='raw' } )

text = text .. ' ('.. mWikidata._getQualifier({'P450','P1545',n=mWikidata._indexOf({'P450','Q184201'mWikidata._getId(),from='Q111240'idNome}),from='Q111240'idNome}) .. ')'

if agenzia ~= mWikidata._getProperty({'P108',qualifier='P794',qualifiervalue='Q11631',from=idNome,formatting='raw'}) then

text = text .. ' - '.. p.nomeagenzia(mWikidata._getProperty({'P108',qualifier='P794',qualifiervalue='Q11631',from=idNome, formatting='raw',conjunction='/'}))

end

text = text .. '\n|-\n'

break

Line 17 ⟶ 34:

function p.main(frame)

local text ='{| class="wikitable"\n|-\n! GradoRuolo!!Equipaggio\n|-\n'

local equipaggio, membriequipaggio

Line 28 ⟶ 45:

ruoli[i]=mWikidata._getQualifier( { 'P1029', 'P39', n=i+1, formatting='raw' } )

end

agenzia = mWikidata._getProperty({'P137',formatting='raw'})

text = text .. mWikidata._getId()

text = text .. mWikidata._getQualifier({'P450','P1545',n=mWikidata._indexOf({'P450','Q184201',from='Q111240'}),from='Q111240'})

text = text .. '| Comandante || ' .. mWikidatap._getPropertyequipaggio( { 'P1029'ruoli, qualifier='P39Q20113945', qualifiervalue='Q20113945Comandante' } ) --comandante

text = text .. p.equipaggio(ruoli, 'Q20644849', '\n|-\nPilota')

text = text .. p.equipaggio(ruoli, 'Q20190803Q20114066', 'SpecialistaPilota del caricomodulo utiledi 3comando')

text = text .. p.equipaggio(ruoli, 'Q20644849Q20114009', 'Pilota del modulo lunare')

text = text .. p.equipaggio(ruoli, 'Q20114066Q20162978', 'Pilota') del modulo di comando') -- dello Space Shuttle

text = text .. p.equipaggio(ruoli, 'Q20114009Q20116202', 'PilotaSpecialista deldi modulomissione lunare1')

text = text .. p.equipaggio(ruoli, 'Q20162978Q20163477', 'Pilota')Specialista di missione -- dello Space Shuttle2')

text = text .. p.equipaggio(ruoli, 'Q20116202Q20163680', 'Specialista di missione 13')

text = text .. p.equipaggio(ruoli, 'Q20163477Q20199279', 'Specialista di missione 24')

text = text .. p.equipaggio(ruoli, 'Q20163680Q20199285', 'Specialista di missione 35')

text = text .. p.equipaggio(ruoli, 'Q20199279Q20203864', 'Specialista di missione 46')

text = text .. p.equipaggio(ruoli, 'Q20199285Q20443756', 'SpecialistaIngegnere di missionevolo 51')

text = text .. p.equipaggio(ruoli, 'Q20203864Q20443763', 'SpecialistaIngegnere di missionevolo 62')

text = text .. p.equipaggio(ruoli, 'Q20443756Q20163858', 'IngegnereSpecialista del dicarico voloutile 1')

text = text .. p.equipaggio(ruoli, 'Q20443763Q20163870', 'IngegnereSpecialista del dicarico voloutile 2')

text = text .. p.equipaggio(ruoli, 'Q20163858Q20190803', 'Specialista del carico utile 13')

text = text .. p.equipaggio(ruoli, 'Q20163870Q20623701', 'Specialista del carico utileTurista 2spaziale')

text = text .. p.equipaggio(ruoli, 'Q20190803', 'Specialista del carico utile 3')

text = text .. p.equipaggio(ruoli, 'Q20623701', 'Turista spaziale')

text = text .. '|}'

text = text .. "\n<small>Tra parentesi il numero di voli spaziali completati da ogni membro dell'equipaggio, inclusa questa missione.</small>"

return string.format('%s',text)

end