Modul:Auszeichnung: Unterschied zwischen den Versionen

Aus FürthWiki

Auszeichnungsspalten vorläufig deaktiviert
(+ Beruf)
(Auszeichnungsspalten vorläufig deaktiviert)
 
(20 dazwischenliegende Versionen desselben Benutzers werden nicht angezeigt)
Zeile 6: Zeile 6:


function p.AbfrageAuszeichnungen(frame)
function p.AbfrageAuszeichnungen(frame)
mw.log("AbfrageAuszeichnungen(frame)")
-- mw.log("AbfrageAuszeichnungen(frame)")
mw.logObject(frame, "frame")
-- mw.logObject(frame, "frame")
-- Konsolenzeile zum Debuggen:
-- Konsolenzeile zum Debuggen:
-- p.AbfrageAuszeichnungen{pargs={["Aufschlüsselung"]="Auszeichnungen"}}
-- p.AbfrageAuszeichnungen{pargs={["Aufschlüsselung"]="Auszeichnungen"}}
Zeile 28: Zeile 28:


-- Seiten-Selektoren für die Abfragen
-- Seiten-Selektoren für die Abfragen
local page_selector_basis, page_selector_ort,
local top_prefix, top_postfix, sub_prefix, sub_postfix
page_selector_ort_fuerth, page_selector_ort_nicht_fuerth,
page_selector_maennlich, page_selector_weiblich,
page_selector_divers, page_selector_geschlecht,
top_prefix, top_postfix, sub_prefix, sub_postfix =
"", "", "", "", "", "", "", ""
if attr["Aufschlüsselung"] == "Auszeichnungen" then
if attr["Aufschlüsselung"] == "Auszeichnungen" then
top_prefix, top_postfix = "[[-has subobject::<q>", "</q>]]" -- Abfrage aus Sicht der Auszeichnung-subobject-Ebene
top_prefix, top_postfix = "[[-has subobject::<q>", "</q>]]" -- Abfrage aus Sicht der Auszeichnung-subobject-Ebene
Zeile 42: Zeile 37:
end
end
-- Basis-Selektor
-- Basis-Selektor
page_selector_basis = top_prefix .. "[[:+]][[Kategorie:Personen]]" .. top_postfix
local page_selector_basis = top_prefix .. "[[:+]][[Kategorie:Personen]]" .. top_postfix
page_selector_basis = page_selector_basis .. sub_prefix .. "[[SubObjektTyp::Auszeichnung]]" .. sub_postfix
page_selector_basis = page_selector_basis .. sub_prefix .. "[[SubObjektTyp::Auszeichnung]]" .. sub_postfix
if attr["Auszeichnung"] ~= nil then
if attr["Auszeichnung"] ~= nil then
Zeile 66: Zeile 61:
page_selector_basis = page_selector_basis .. top_prefix .. "[[Beruf::" .. beruf .. "]]" .. top_postfix
page_selector_basis = page_selector_basis .. top_prefix .. "[[Beruf::" .. beruf .. "]]" .. top_postfix
end
end
mw.logObject(page_selector_basis, "page_selector_basis")
-- Geburtsort-Selektoren
-- Geburtsort-Selektoren
page_selector_ort_fuerth = top_prefix .. "[[Geburtsort::Fürth]]" .. top_postfix
local page_selector_fuerth = top_prefix .. "[[GeburtsortHeuteFürth::wahr]]" .. top_postfix
local page_selector_ausserhalb = top_prefix .. "[[GeburtsortHeuteFürth::falsch]]" .. top_postfix
local page_selector_ort = ""
if attr["Geburtsort"] == "Fürth" then
if attr["Geburtsort"] == "Fürth" then
page_selector_ort = page_selector_ort_fuerth
page_selector_ort = page_selector_fuerth
end
end
if attr["Geburtsort"] == "außerhalb" then
if attr["Geburtsort"] == "außerhalb" then
page_selector_ort = top_prefix .. "[[Geburtsort::!Fürth]]" .. top_postfix
page_selector_ort = page_selector_ausserhalb
end
end
mw.logObject(page_selector_ort_fuerth, "page_selector_ort_fuerth")
mw.logObject(page_selector_ort, "page_selector_ort")
-- Geschlecht-Selektoren
-- Geschlecht-Selektoren
page_selector_maennlich = top_prefix .. "[[Geschlecht::männlich]]" .. top_postfix
local page_selector_maennlich = top_prefix .. "[[Geschlecht::männlich]]" .. top_postfix
page_selector_weiblich = top_prefix .. "[[Geschlecht::weiblich]]" .. top_postfix
local page_selector_weiblich = top_prefix .. "[[Geschlecht::weiblich]]" .. top_postfix
page_selector_divers = top_prefix .. "[[Geschlecht::divers]]" .. top_postfix
local page_selector_divers = top_prefix .. "[[Geschlecht::divers]]" .. top_postfix
local page_selector_geschlecht = ""
if attr["Geschlecht"] ~= nil then
if attr["Geschlecht"] ~= nil then
page_selector_geschlecht = top_prefix .. "[[Geschlecht::" .. attr["Geschlecht"] .. "]]" .. top_postfix
page_selector_geschlecht = top_prefix .. "[[Geschlecht::" .. attr["Geschlecht"] .. "]]" .. top_postfix
end
end
mw.logObject(page_selector_maennlich, "page_selector_maennlich")
mw.logObject(page_selector_weiblich, "page_selector_weiblich")
mw.logObject(page_selector_divers, "page_selector_divers")
mw.logObject(page_selector_geschlecht, "page_selector_geschlecht")


-- Statistik
-- Statistik
t = t .. "<br>'''{{#ask: " .. page_selector_basis .. page_selector_ort .. page_selector_geschlecht .. "| format=count | limit=10000 }} "
local n_basis_ort_geschlecht = mw.smw.ask(page_selector_basis .. page_selector_ort .. page_selector_geschlecht .. "| format=count | limit=10000")
t = t .. "<br>'''".. n_basis_ort_geschlecht .. " "
if attr["Aufschlüsselung"] == "Personen" then
if attr["Aufschlüsselung"] == "Personen" then
t = t .. "Personen mit "
t = t .. "Person(en) mit "
end
end
t = t .. "Auszeichnungen gefunden"
t = t .. "Auszeichnung(en) gefunden"
if attr["Geschlecht"] == nil then
if attr["Geschlecht"] == nil then
t = t .. "; davon {{#ask: " .. page_selector_basis .. page_selector_ort .. page_selector_weiblich .. "| format=count | limit=10000 }} Frauen"
local n_basis_ort_weiblich = mw.smw.ask(page_selector_basis .. page_selector_ort .. page_selector_weiblich .. "| format=count | limit=10000")
t = t .. ", {{#ask: " .. page_selector_basis .. page_selector_ort .. page_selector_maennlich .. "| format=count | limit=10000 }} Männer"
local n_basis_ort_maennlich = mw.smw.ask(page_selector_basis .. page_selector_ort .. page_selector_maennlich .. "| format=count | limit=10000")
t = t .. " und {{#ask: " .. page_selector_basis .. page_selector_ort .. page_selector_divers .. "| format=count | limit=10000 }} Divers '''(ggf. Rest nicht angegeben)'''"
local n_basis_ort_divers = mw.smw.ask(page_selector_basis .. page_selector_ort .. page_selector_divers .. "| format=count | limit=10000")
local n_basis_ort_unbekannt = n_basis_ort_geschlecht - n_basis_ort_weiblich - n_basis_ort_maennlich - n_basis_ort_divers
local p_basis_ort_weiblich = math.floor(n_basis_ort_weiblich / n_basis_ort_geschlecht * 100 + 0.5)
local p_basis_ort_maennlich = math.floor(n_basis_ort_maennlich / n_basis_ort_geschlecht * 100 + 0.5)
local p_basis_ort_divers = math.floor(n_basis_ort_divers / n_basis_ort_geschlecht * 100 + 0.5)
local p_basis_ort_unbekannt = math.floor(n_basis_ort_unbekannt / n_basis_ort_geschlecht * 100 + 0.5)
t = t .. "<br>&rarr; davon " .. n_basis_ort_weiblich .. " (&#8776; " .. p_basis_ort_weiblich.. " %) Frauen"
t = t .. ", " .. n_basis_ort_maennlich .. " (&#8776; " .. p_basis_ort_maennlich.. " %) Männer"
t = t .. " und " .. n_basis_ort_divers .. " (&#8776; " .. p_basis_ort_divers.. " %) Diverse"
if n_basis_ort_unbekannt > 0 then
t = t .. ", '''bei " .. n_basis_ort_unbekannt .. " (&#8776; " .. p_basis_ort_unbekannt.. " %)  Person(en) nicht bekannt'''"
end
end
end
if attr["Geburtsort"] == nil then
if attr["Geburtsort"] == nil then
t = t .. "; davon {{#ask: " .. page_selector_basis .. page_selector_ort_fuerth .. page_selector_geschlecht .. "| format=count | limit=10000 }} gebürtige Fürther"
local n_basis_fuerth_geschlecht = mw.smw.ask(page_selector_basis .. page_selector_fuerth .. page_selector_geschlecht .. "| format=count | limit=10000")
local n_basis_ausserhalb_geschlecht = mw.smw.ask(page_selector_basis .. page_selector_ausserhalb .. page_selector_geschlecht .. "| format=count | limit=10000")
local n_basis_unbekannt_geschlecht = n_basis_ort_geschlecht - n_basis_fuerth_geschlecht - n_basis_ausserhalb_geschlecht
local p_basis_fuerth_geschlecht = math.floor(n_basis_fuerth_geschlecht / n_basis_ort_geschlecht * 100 + 0.5)
local p_basis_ausserhalb_geschlecht = math.floor(n_basis_ausserhalb_geschlecht / n_basis_ort_geschlecht * 100 + 0.5)
local p_basis_unbekannt_geschlecht = math.floor(n_basis_unbekannt_geschlecht / n_basis_ort_geschlecht * 100 + 0.5)
t = t .. "<br>&rarr; davon " .. n_basis_fuerth_geschlecht .. " (&#8776; " .. p_basis_fuerth_geschlecht.. " %) gebürtige Fürther"
t = t .. " und " .. n_basis_ausserhalb_geschlecht .. " (&#8776; " .. p_basis_ausserhalb_geschlecht.. " %) außerhalb Fürths geboren"
if n_basis_unbekannt_geschlecht > 0 then
t = t .. ", '''bei " .. n_basis_unbekannt_geschlecht .. " (&#8776; " .. p_basis_unbekannt_geschlecht.. " %)  Person(en) nicht bekannt'''"
end
end
end
t = t .. "<br>'''"
t = t .. "<br>'''"
Zeile 110: Zeile 123:
t = t .. "|mainlabel=-"
t = t .. "|mainlabel=-"
t = t .. "|?-has subobject.Seite=Person"
t = t .. "|?-has subobject.Seite=Person"
t = t .. "|?-has subobject.Geburtsdatum"
-- t = t .. "|?-has subobject.Geburtsdatum"
t = t .. "|?-has subobject.Geburtsort"
-- t = t .. "|?-has subobject.Geburtsort"
t = t .. "|?-has subobject.Geschlecht"
-- t = t .. "|?-has subobject.Geschlecht"
t = t .. "|?-has subobject.Beruf"
-- t = t .. "|?-has subobject.Beruf"
t = t .. "|?Auszeichnung"
t = t .. "|?Auszeichnung"
t = t .. "|?VerleihungAm=Verleihung"
t = t .. "|?VerleihungAm=Verleihung"