Modulo:Sandbox/Adert: differenze tra le versioni

Versione delle 01:24, 8 giu 2016

Versione attuale delle 22:00, 8 giu 2016

(18 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 } )

text = text ..idNome '| Comandante || ' ..= mWikidata._getProperty( { 'P1029', qualifier='P39', qualifiervalue=qualificatore,formatting='Q20113945raw' } ) --comandante

text = text .. ' ('.. mWikidata._getQualifier({'P450','P1545',n=mWikidata._indexOf({'P450',mWikidata._getId(),from=idNome}),from=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 .. '| Comandante || ' .. mWikidata._getProperty( { 'P1029', qualifier='P39', qualifiervalue='Q20113945' } ) --comandante

text = text .. p.equipaggio(ruoli, 'Q20113945', '\n|-\nComandante')

text = text .. p.equipaggio(ruoli, 'Q20623701Q20644849', 'Turista spazialePilota')

text = text .. p.equipaggio(ruoli, 'Q20644849Q20114066', 'Pilota del modulo di comando')

text = text .. p.equipaggio(ruoli, 'Q20114066Q20114009', 'Pilota del modulo di comandolunare')

text = text .. p.equipaggio(ruoli, 'Q20114009Q20162978', 'Pilota') del modulo lunare') -- dello Space Shuttle

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

text = text .. p.equipaggio(ruoli, 'Q20116202Q20163477', 'Specialista di missione 12')

text = text .. p.equipaggio(ruoli, 'Q20163477Q20163680', 'Specialista di missione 23')

text = text .. p.equipaggio(ruoli, 'Q20163680Q20199279', 'Specialista di missione 34')

text = text .. p.equipaggio(ruoli, 'Q20199279Q20199285', 'Specialista di missione 45')

text = text .. p.equipaggio(ruoli, 'Q20199285Q20203864', 'Specialista di missione 56')

text = text .. p.equipaggio(ruoli, 'Q20203864Q20443756', 'SpecialistaIngegnere di missionevolo 61')

text = text .. p.equipaggio(ruoli, 'Q20443756Q20443763', 'Ingegnere di volo 12')

text = text .. p.equipaggio(ruoli, 'Q20443763Q20163858', 'IngegnereSpecialista del dicarico voloutile 21')

text = text .. p.equipaggio(ruoli, 'Q20163858Q20163870', 'Specialista del carico utile 12')

text = text .. p.equipaggio(ruoli, 'Q20163870Q20190803', 'Specialista del carico utile 23')

text = text .. p.equipaggio(ruoli, 'Q20190803Q20623701', 'Specialista del carico utileTurista 3spaziale')

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