Anonimo

Modulo:DTSpecific: differenze tra le versioni

Da Wikitrek.

Modulo:DTSpecific (visualizza wikitesto)

Versione delle 17:47, 11 giu 2023

9 390 byte aggiunti ,  11 giu 2023
nessun oggetto della modifica
m (Test)
Nessun oggetto della modifica
(66 versioni intermedie di uno stesso utente non sono mostrate)
Riga 8: Riga 8:
local concat
local concat
local print
local print
local QFromP = require('Modulo:DTGenerico').QFromP
local SeasonsQty = require('Modulo:DTSem').SeasonsQty
local LabelOrLink = require('Modulo:DTBase').LabelOrLink
--local PropertiesOnTree = require('Modulo:DTFunzioniComuni').PropertiesOnTree
local SeriesTree = require('Modulo:DTFunzioniComuni').SeriesTree
--- generates a list of backlink using SMW query.
--- generates a list of backlink using SMW query.
--  
--  
-- @frame Info from MW session
-- @frame Info from MW session
-- @return A bullet list of appearances
-- @return A bullet list of appearances
function p.ListAppearances(frame)
function p.ListAppearancesOLD(frame)
-- See example
-- See example
--[=[
--[=[
Riga 65: Riga 71:
--local QueryResult = mw.smw.getQueryResult('[[Interprete::' .. mw.title.getCurrentTitle().text .. ']]|?DataTrek ID')
--local QueryResult = mw.smw.getQueryResult('[[Interprete::' .. mw.title.getCurrentTitle().text .. ']]|?DataTrek ID')
local Actor = mw.title.getCurrentTitle().text
local Actor = mw.title.getCurrentTitle().text
local QueryResult = mw.smw.getQueryResult('[[Interprete::' .. Actor .. ']]|?' .. Actor .. '|sort=Numero di produzione|order=asc')
local QueryResult = mw.smw.getQueryResult('[[Interprete::' .. Actor .. ']]|?' .. Actor .. '|sort=Numero di produzione|order=asc')[1]
if QueryResult == nil then
if QueryResult == nil then
Riga 77: Riga 83:
         -- v.fulltext represents EPISODE
         -- v.fulltext represents EPISODE
         -- v.printouts[Actor][1].fulltext represents CHARACTER
         -- v.printouts[Actor][1].fulltext represents CHARACTER
        
         --[=[
         AllAppearances[#AllAppearances + 1] = "* TEST - " .. v.printouts[Actor][1].fulltext
        if #v.printouts[Actor] == 1 then
        
        AllAppearances[#AllAppearances + 1] = "* TEST - " .. v.printouts[Actor][1].fulltext
         else
        AllAppearances[#AllAppearances + 1] = "* TEST - " .. v.printouts[Actor][1].fulltext .. v.printouts[Actor][2].fulltext
         end
    ]=]
   
             --[=[if  v.fulltext and v.fullurl then
             --[=[if  v.fulltext and v.fullurl then
                 myResult = myResult .. k .. " | " .. v.fulltext .. " " .. v.fullurl .. " | " .. "<br/>"
                 myResult = myResult .. k .. " | " .. v.fulltext .. " " .. v.fullurl .. " | " .. "<br/>"
Riga 102: Riga 113:
             ]=]
             ]=]
              
              
             if CurrChar == nil or CurrChar == "" or CurrChar ~= v.printouts[Actor][1].fulltext then
             if CurrChar == nil or CurrChar == "" then --or CurrChar ~= v.printouts[Actor][1].fulltext then
             if Episodes ~= nil and CurrChar ~= nil then
             if Episodes ~= nil and CurrChar ~= nil then
             -- episodes list contains data to print out, print it
             -- episodes list contains data to print out, print it
Riga 109: Riga 120:
             end
             end
        
        
         CurrChar = v.printouts[Actor][1].fulltext
         if v.printouts[Actor][1] == nil then
        CurrChar = "''Senza pagina''"
        else
        CurrChar = v.printouts[Actor][1].fulltext
        end
   
             end
             end
     Episodes[#Episodes + 1] = v.fulltext
     Episodes[#Episodes + 1] = v.fulltext
Riga 141: Riga 157:
     return queryResult
     return queryResult
end
end
--- generates a list of backlink using SMW query.
--
-- @frame Info from MW session
-- @return A bullet list of appearances
function p.ListAppearances(frame)
local FinalArray = {}
local FinalString = ""
local Actor = mw.title.getCurrentTitle().text
local QueryResult = mw.smw.getQueryResult('[[Interprete::' .. Actor .. ']]|?' .. Actor .. '|limit=500|sort=Numero di produzione|order=asc')
if QueryResult == nil then
        return "''Nessun risultato''"
    end
    if type(QueryResult) == "table" then
    for k, v in pairs(QueryResult.results) do
        -- v.fulltext represents EPISODE
        -- v.printouts[Actor][1].fulltext represents CHARACTER
        local Episode = v.fulltext
        local Character
       
        if v.printouts[Actor][1] == nil then
        Character = "''Senza pagina''"
        else
for _, CurrChar in pairs(v.printouts[Actor]) do
Character = CurrChar.fulltext
if FinalArray[Character] == nil then
FinalArray[Character] = {}
end
    table.insert(FinalArray[Character], Episode)
end
        end
       
    end
    else
    return "''Il risultato non è una TABLE''"
    end
for ID, Group in pairs(FinalArray) do
FinalString = FinalString .. "* '''[[" .. ID .. "]]''': [[" .. table.concat(Group, "]], [[") .. "]]" .. string.char(10)
end
return FinalString
end
--- Content of a generic secondary box
--
-- @frame Info from MW session
-- @return Wikitext to inject in template
function p.SecBoxBuilder(frame)
local TemplateName
local BoxTitle = ""
local BoxContent = ""
local SeriesQ
local Short
local CategoryNames = {}
local UL
local LI
local Quantity
local Categories
local Seasons
local Series
local Preposizione
local Others
local Separator ="<hr />"
local FullOutput = true
local Output = {}
-- Get page name and clean to get the name
TemplateName = string.gsub(frame:getParent():getTitle(), "Template:", "")
if TemplateName == "BoxSecEpisodio" then
if mw.wikibase.getEntity().claims["P162"] ~= nil then
BoxContent = BoxContent .. "<span class='titoletto'>Presentazione</span>"
BoxContent = BoxContent .. "<p>" ..  mw.wikibase.getEntity().claims["P162"][1].mainsnak.datavalue.value .. "</p>"
end
Series = SeriesTree(frame)
BoxContent = BoxContent .. "<span class='titoletto'>Serie</span>"
BoxContent = BoxContent .. Series
BoxTitle = "Titolo BoxSecEpisodio"
--BoxContent = "Contenuto BoxSecEpisodio<br />" .. Series
else
--Series
if frame.args[1] ~= nil then
--Function is called from unliked page
Series = mw.wikibase.getEntity(frame.args[1])
Separator = " | "
FullOutput = false
elseif mw.wikibase.getEntity().claims["P14"][1].mainsnak.datavalue.value.id == "Q13" then
-- Page is instance of Series
Series = mw.wikibase.getEntity()
elseif  mw.wikibase.getEntity().claims["P16"] ~= nil then
Series = mw.wikibase.getEntity(QFromP("P16"))
else
-- Fall back to Short Treks
Series = mw.wikibase.getEntity("Q8537")
end
BoxTitle = "Titolo " .. TemplateName
BoxContent = "Contenuto " .. TemplateName
end
--[=[
Output example
{{BoxSecondario
|Titolo= Serie {{#if: {{#statements:P16}} | {{#statements:P16}} | ''No P16<!--{{#statements:P24}}-->'' }}
|Contenuto={{#invoke:DTSpecific|SecBoxSeries|Q66}}
|Nome=BoxSecEpisodio
}}
--]=]
return frame:expandTemplate{title = 'BoxSecondario', args = {Titolo = BoxTitle,  Contenuto = BoxContent, Nome = TemplateName}}
end
--- Content of secondary box
--
-- @frame Info from MW session
-- @return Wikitext to inject in template
function p.SecBoxSeries(frame)
local SeriesQ
local Series = ""
local Short = ""
local CategoryNames = {}
local UL
local LI
local Quantity
local Categories
local Seasons
local Series
local Preposizione
local Others
local Separator ="<hr />"
local FullOutput = true
local Output = {}
--Series
if frame.args[1] ~= nil then
--Function is called from unliked page
Series = mw.wikibase.getEntity(frame.args[1])
Separator = " | "
FullOutput = false
elseif mw.wikibase.getEntity().claims["P14"][1].mainsnak.datavalue.value.id == "Q13" then
--Instance of the item is "Series"
Series = mw.wikibase.getEntity()
elseif mw.wikibase.getEntity().claims["P16"] ~= nil then
Series = mw.wikibase.getEntity(QFromP("P16"))
else
--Episode
Series = mw.wikibase.getEntity(mw.wikibase.getEntity(QFromP("P14")).claims["P16"][1].mainsnak.datavalue.value.id)
end
--Short name of the series
--Short  = mw.wikibase.getEntity(SeriesQ).claims['P24'][1].mainsnak.datavalue['value']
Short  = Series.claims['P24'][1].mainsnak.datavalue['value']
if Short == "Serie Classica" or Short == "Serie Animata" then
Preposizione = "della"
else
Preposizione = "di"
end
CategoryNames = {"SHORT|Serie", "Personaggi PREPOSIZIONE SHORT|Personaggi", "Episodi PREPOSIZIONE SHORT|Episodi", "SHORT - Ordine di produzione|Ordine di produzione", "SHORT - Titoli italiani|Titoli italiani"}
UL = mw.html.create('ul')
UL
:attr('class', "compactul")
:attr('title', "Categorie")
for _, Name in ipairs(CategoryNames) do
local Item
Name = string.gsub(Name, "PREPOSIZIONE", Preposizione)
Item = "[[:Categoria:" .. string.gsub(Name, "SHORT", Short) .. "]]"
LI =  mw.html.create('li')
LI:wikitext(Item)
UL:node(LI)
end
Categories = tostring(UL)
table.insert(Output, Categories)
Quantity = SeasonsQty(Short)
--mw.smw.set("Numero di stagioni = " .. Short)
if Quantity < 1 then
Seasons = "Errore: <1"
else
UL = mw.html.create('ul')
UL
:attr('class', "compactul")
:attr('title', "Episodi")
for Item = 0, Quantity, 1 do
LI =  mw.html.create('li')
if Item == 0 then
LI:wikitext("[[Episodi " .. Preposizione .. " " .. Short .. "|Tutti]]")
elseif Item == 1 then
LI:wikitext("Stagioni: [[Stagione " .. Item .. " "  .. Preposizione .. " " .. Short .. "|" .. Item .. "]]")
else
LI:wikitext("[[Stagione " .. Item .. " "  .. Preposizione .. " " .. Short .. "|" .. Item .. "]]")
end
UL:node(LI)
end
Seasons = tostring(UL)
table.insert(Output, Seasons)
end
if FullOutput then
--Other pages
UL = mw.html.create('ul')
UL
:attr('class', "compactul")
:attr('title', "Altre pagine")
LI =  mw.html.create('li')
LI:wikitext("[[Personaggi ricorrenti " .. Preposizione .. " " .. Short .. "]]")
UL:node(LI)
Others = tostring(UL)
table.insert(Output, Others)
end
if FullOutput then
--All Series
local SeriesQuery = mw.smw.getQueryResult('[[Istanza::Serie]]|?Abbreviazione|sort=Ordinale|order=asc')
if SeriesQuery == nil then
        Series = "''Nessun risultato''"
    end
    if type(SeriesQuery) == "table" then
    UL = mw.html.create('ul')
UL
:attr('class', "compactul")
:attr('title', "Tutte le serie")
    for _, CurrSeries in ipairs(SeriesQuery.results) do
    --In the output, example:
    --"fulltext": "Star Trek: Strange New Worlds",
    LI =  mw.html.create('li')
        LI:wikitext("[[" .. (CurrSeries.fulltext or "NullFulltext") .. "|" .. (CurrSeries.printouts.Abbreviazione[1] or "NullAbbreviazione") .. "]]")
       
        UL:node(LI)
    end
    Series = tostring(UL)
    else
    Series = "''Il risultato non è una TABLE''"
    end
    table.insert(Output, Series)
end
--return Categories .. "<hr />" .. Seasons .. "<hr />" .. Others .. "<hr />" .. Series
return table.concat(Output, Separator)
--[==[
<strong>Categorie</strong>
<ul class="compactul">
<li>[[:Categoria:Strange New Worlds|Serie]]</li>
<li>[[:Categoria:Personaggi di Strange New Worlds|Personaggi]]</li>
<li>[[:Categoria:Episodi di Strange New Worlds|Episodi]]</li>
<li>[[:Categoria:Strange New Worlds - Ordine di produzione|Ordine di produzione]]</li>
<li>[[:Categoria:Strange New Worlds - Titoli italiani|Titoli italiani]]</li>
</ul>
<hr />
]==]
end
--- Listo of "motto" sentences (P104) for Template:BoxAvvisi
--
-- @frame Info from MW session
-- @return Wikitext to inject in template
function p.MottoBoxes(frame)
local Subject
local Boxes = {}
--Series
if frame.args[1] ~= nil then
--Function is called from unliked page
Subject = mw.wikibase.getEntity(frame.args[1])
else
Subject = mw.wikibase.getEntity()
end
for _, Motto in ipairs(Subject.claims["P104"]) do
local Sentence
local Author
local Reference
Sentence = Motto.mainsnak.datavalue.value
Author = LabelOrLink(Motto.qualifiers["P47"][1].datavalue.value.id)
Reference =LabelOrLink(Motto.qualifiers["P58"][1].datavalue.value.id)
table.insert(Boxes, frame:expandTemplate{ title = 'quote', args = {text = Sentence, sign = Author, source = Reference} })
end
return table.concat(Boxes, string.char(10))
end
--- This dumps the variable (converts it into a string representation of itself)
--- This dumps the variable (converts it into a string representation of itself)
--
--
Estratto da "https://wikitrek.org/wiki/Speciale:DiffMobile/34855...48956"