Modul:Vorlage:Infobox Sendeanlage/VorlageDokumentation
| Vorlagenprogrammierung | Diskussionen | Lua | Test | Unterseiten | ||
| Modul | Deutsch
|
Modul: | Dokumentation | |||
Diese Seite enthält Code in der Programmiersprache Lua. Einbindungszahl Cirrus
-- Weitere Parameter zur Aufzaelung
local WeitereAufzaehlung = {
ZUGANG = { -- Werte fuer 'Zugaenglichkeit', 'ZUGANG'
ja = { { "ja" }, { "Sendeanlage öffentlich zugänglich" }, KatAnzeige = false },
jein = { { "jein" }, { "Sendeanlage nur nach Voranmeldung zugänglich" }, KatAnzeige = false },
nein = { { "nein" }, { "Sendeanlage nicht öffentlich zugänglich" }, KatAnzeige = false }
},
SONDER = { -- Werte fuer 'Alternative Anzeige', 'SONDER'
Nebenbox = { { "Nebenbox" }, { "Die Infobox wird als Nebenbox angezeigt. Dadurch entfallen die Kategorie-Sortierung und die Lagekarte. Die Koordinaten werden in einer Zeile der Infobox angezeigt anstatt im Artikelkopf." }, KatAnzeige = false },
Weiterleitung = { { "Weiterleitung" }, { "Es wird der Link zu den Koordinaten mittels der [[Vorlage:Coordinate]] im Kopf einer Weiterleitung erzeugt. Des Weiteren erfolgt die Kategorie-Sortierung entsprechend derer der Infobox." }, KatAnzeige = false }
}
}
local Ersatz = {
{
"das Bauwerk",
Sendeanlage = "die Sendeanlage",
Sendeturm = "der Sendeturm",
Sendemast = "der Sendemast",
Aussichtsturm = "der Aussichtsturm",
Fernsehturm = "der Fernsehturm"
},
{
"des Bauwerkes",
Sendeanlage = "der Sendeanlage",
Sendeturm = "des Sendeturmes",
Sendemast = "des Sendemastes",
Aussichtsturm = "des Aussichtsturmes",
Fernsehturm = "des Fernsehturmes"
},
{
"dem Bauwerk",
Sendeanlage = "der Sendeanlage",
Sendeturm = "dem Sendeturm",
Sendemast = "dem Sendemast",
Aussichtsturm = "dem Aussichtsturm",
Fernsehturm = "dem Fernsehturm"
},
{
"das Bauwerk",
Sendeanlage = "die Sendeanlage",
Sendeturm = "den Sendeturm",
Sendemast = "den Sendemast",
Aussichtsturm = "den Aussichtsturm",
Fernsehturm = "den Fernsehturm"
},
EZ = {
"Bauwerk",
Sendeanlage = "Sendeanlage",
Sendeturm = "Sendeturm",
Sendemast = "Sendemast",
Aussichtsturm = "Aussichtsturm",
Fernsehturm = "Fernsehturm"
},
MZ = {
"Bauwerke",
Sendeanlage = "Sendeanlagen",
Sendeturm = "Sendetürme",
Sendemast = "Sendemasten",
Aussichtsturm = "Aussichtstürme",
Fernsehturm = "Fernsehtürme"
}
}
-- Anker
function Anker( Text, ID1, ID2, ID3 )
local AnkerID = { tostring( ID1 ), tostring( ID2 ), ID3, Text = Text }
AnkerID.Text = AnkerID.Text or "(Text fehlt)"
AnkerID[3] = AnkerID[3] or ""
AnkerID.div = mw.html.create( "div" )
:attr( "id", AnkerID[1] .. AnkerID[2] .. AnkerID[3] )
:wikitext( tostring( AnkerID.Text ) )
return tostring( AnkerID.div )
end
local p = { }
-- Zusammenstellung Dokumentation
function p.DokuVorlage( DSZusatz, DatenX, frame )
local Daten = DatenX
local JSON = mw.getCurrentFrame():getParent().args.JSON or frame.args.JSON or ""
local TEMP = {
Typ = frame.args[1] or string.sub( DSZusatz.SR, 9 ),
Ersatz = { }
}
if TEMP.Typ == "" then TEMP.Typ = "unbekannt" end
if not Ersatz[1][TEMP.Typ] then TEMP.Typ = 1 end
-- Ersatz für $
for ErsatzK, ErsatzV in pairs( Ersatz ) do
TEMP.Ersatz[ErsatzK] = ErsatzV[TEMP.Typ]
end
TEMP.Ersatz.Name = DSZusatz.SR
for SEk, SEv in pairs( TEMP.Ersatz ) do
TEMP.ETX = "$" .. tostring( SEk )
JSON = string.gsub( JSON, TEMP.ETX, SEv )
end
-- Ausgabe TemplateData
local Doku = ""
if JSON ~= "" then Doku = frame:expandTemplate{ title = "TemplateData", args = { JSON = JSON } } end
-- Datenauswertung
TEMP.Status = false
if JSON ~= "" then TEMP.Status = pcall( mw.text.jsonDecode, JSON ) end
if TEMP.Status == false then
TEMP.Fehlertext = mw.html.create( "span" )
:attr( "id", "Fehler_Meldung" )
:attr( "class", "error" )
:css( "font-weight", "bold" )
:css( "font-size", "120%" )
:wikitext( "Aufgrund eines Fehlers, augenscheinlich bei der Dateneingabe in der [[Vorlage:Infobox Sendeanlage/Doku]], können die daraus generierten Daten zur Vorlagendokumentation nicht angezeigt werden!" )
Doku = Doku .. "\n\n" .. frame:expandTemplate{ title = "Achtung", args = { tostring( TEMP.Fehlertext ), Textausrichtung = "center", Hintergrund = "#fffbee" } }
else
-- Einzelzuweisung
table.insert( Daten, { Name = "CAT_TYP" } )
table.insert( Daten, { Name = "CAT_NAME" } )
table.insert( Daten, { Name = "CAT_STADT" } )
for WAk, WAv in pairs( WeitereAufzaehlung ) do
DSZusatz.Aufzaehlung[WAk] = WAv
end
DSZusatz.Aufzaehlung.CAT_TYP = { }
for CT1k, CT1v in pairs( DSZusatz.Bezeichner ) do
if type( CT1k ) == "string" then
DSZusatz.Aufzaehlung.CAT_TYP[CT1k] = { { CT1k }, { tostring( CT1v ) }, { tostring( DSZusatz.Geo[1][1][1][1] ) }, Geo = DSZusatz.Geo[1][1][1][2] }
if DSZusatz.Geo[CT1k] then
DSZusatz.Geo[CT1k][1] = DSZusatz.Geo[CT1k][1] or { }
DSZusatz.Geo[CT1k][1][1] = DSZusatz.Geo[CT1k][1][1] or { }
if (DSZusatz.Geo[CT1k][1][1][1] ~= nil and DSZusatz.Geo[CT1k][1][1][1] ~= "") then
DSZusatz.Aufzaehlung.CAT_TYP[CT1k][3][1] = tostring( DSZusatz.Geo[CT1k][1][1][1] )
DSZusatz.Aufzaehlung.CAT_TYP[CT1k]["Geo"] = DSZusatz.Geo[CT1k][1][1][2]
if DSZusatz.Geo[CT1k][1][1][3] == false then DSZusatz.Aufzaehlung.CAT_TYP[CT1k]["Geo"] = nil end
end
end
end
end
-- Zuordnung 'JSONDaten' zu 'LokalDaten'
local JSONDaten = mw.text.jsonDecode( JSON )
local LokalDaten = { }
for LDk, LDv in pairs( Daten ) do
for LPk, LPv in pairs( JSONDaten.params ) do
if LDv.Name == LPk then
table.insert( LokalDaten, LPv )
LokalDaten[#LokalDaten]["Name"] = LDv.Name
LokalDaten[#LokalDaten]["Layout"] = { true }
for LO1k, LO1v in pairs( DSZusatz.Layout ) do
if type( LO1k ) == "string" then
for LO2k, LO2v in pairs( LO1v ) do
if LO2v == LokalDaten[#LokalDaten]["Name"] then LokalDaten[#LokalDaten]["Layout"][DSZusatz.Bezeichner[LO1k]] = false end
end
end
end
end
end
end
-- Kopiervorlagen
TEMP.KV = { TEMP.Typ }
if TEMP.KV[1] == 1 then TEMP.KV[1] = "Sendeanlage" end
if TEMP.KV[1] == "Sendeanlage" then
TEMP.KV[2] = "Sendeturm"
TEMP.KV[3] = "Sendemast"
TEMP.KV[4] = "Fernsehturm"
end
TEMP.keine = {
Sendemast = { "T_HOCH_AUS", "T_HOCH_RES", "T_A_STILL" }
}
Doku = Doku .. "\n\n== Kopiervorlage"
if #TEMP.KV > 1 then Doku = Doku .. "n" end
Doku = Doku .. " ==\n"
for KVk, KVv in pairs( TEMP.KV ) do
-- Zuordnung 'LokalDaten' zu 'EinzelDaten' (Kopiervorlage)
TEMP.EinzelDaten = { }
for EVk, EVv in pairs( LokalDaten ) do
if (EVv.Layout[KVv] ~= false or EVv.Name == "NS" or EVv.Name == "EW") then
table.insert( TEMP.EinzelDaten, EVv )
end
end
-- Zusammenstellung Daten Kopiervorlagen
TEMP.KText = "\n{{Infobox " .. tostring( TEMP.KV[1] )
for EVEk, EVEv in pairs( TEMP.EinzelDaten ) do
TEMP.kA = false
if TEMP.keine[KVv] then
for keineK, keineV in pairs( TEMP.keine[KVv] ) do
if keineV == EVEv.Name then TEMP.kA = true end
end
end
if (TEMP.kA == false and (EVEv.suggested == true or EVEv.required == true)) then
TEMP.KText = TEMP.KText .. "\n| " .. tostring( EVEv.Name )
for iVk = string.len( EVEv.Name ), 9, 1 do
TEMP.KText = TEMP.KText .. " "
end
TEMP.KText = TEMP.KText .. " = "
if EVEv.autovalue then
if (KVv == "Fernsehturm" and EVEv.Name == "VERW") then TEMP.KText = TEMP.KText .. "Fernsehturm/" end
TEMP.KText = TEMP.KText .. "<!-- " .. tostring( EVEv.autovalue ) .. " -->"
end
if EVEv.Name == "CAT_TYP" then
for CTk, CTv in pairs( DSZusatz.Bezeichner ) do
if CTv == KVv then TEMP.KText = TEMP.KText .. tostring( CTk ) end
end
end
end
end
TEMP.KText = TEMP.KText .. "\n}}\n"
-- Darstellung Daten Kopiervorlagen
TEMP.pre = mw.html.create( "pre" )
:css( "white-space", "pre-wrap" )
:css( "overflow", "auto" )
:wikitext( TEMP.KText )
if #TEMP.KV > 1 then
TEMP.div = mw.html.create( "div" )
:css( "float", "left" )
:css( "width", "46%" )
:css( "margin-right", "1em" )
:wikitext( "\n\n=== Kopiervorlage " .. tostring( KVv ) .. " ===\n" .. tostring( TEMP.pre ) )
else
TEMP.div = "\n\n=== Kopiervorlage " .. tostring( KVv ) .. " ===\n" .. tostring( TEMP.pre )
end
Doku = Doku .. tostring( TEMP.div )
end
TEMP.div = mw.html.create( "div" )
:css( "clear", "left" )
if #TEMP.KV > 1 then Doku = Doku .. tostring( TEMP.div ) end
TEMP.pre = mw.html.create( "pre" )
:css( "white-space", "pre-wrap" )
:css( "overflow", "auto" )
:wikitext( "{{Infobox " .. tostring( TEMP.KV[1] ) .. "| SONDER = Weiterleitung| ZIEL = \'\'Ziel der Weiterleitung\'\' }}" )
Doku = Doku .. "\n\n=== Vorlage als Weiterleitung ===\n" .. tostring( TEMP.pre )
-- Datenverarbeitung Parameter-Details
TEMP.EDaten = { }
if (TEMP.Typ == 1 or TEMP.Typ == "Sendeanlage") then
TEMP.EDaten = LokalDaten
else
for DVEk, DVEv in pairs( LokalDaten ) do
if DVEv.Layout[TEMP.Typ] ~= false then
table.insert( TEMP.EDaten, DVEv )
end
end
end
TEMP.EinzelDaten = { }
for DVPDk, DVPDv in pairs( TEMP.EDaten ) do
for DVAk, DVAv in pairs( DSZusatz.Aufzaehlung ) do
if (DVPDv.Name == DVAk and DVPDv.deprecated ~= true) then table.insert( TEMP.EinzelDaten, DVPDv ) end
end
end
TEMP.Liste = { }
for EDLIk, EDLIv in pairs( TEMP.EinzelDaten ) do
TEMP.Sort = { }
for LISOk, LISOv in pairs( DSZusatz.Aufzaehlung[EDLIv.Name] ) do
TEMP.tf = true
LISOv[1] = LISOv[1] or { }
for LISxK, LISxV in pairs( LISOv[1] ) do
if type( LISxK ) == "string" then
if (DSZusatz.Bezeichner[LISxK] == TEMP.Typ and LISxV == false) then TEMP.tf = false end
end
end
if TEMP.tf == true then table.insert( TEMP.Sort, LISOk ) end
end
table.sort( TEMP.Sort )
TEMP.Liste[EDLIk] = {
Name = tostring( EDLIv.Name ),
Label = tostring( EDLIv.label ),
Sortierung = TEMP.Sort,
args = { }
}
for LIA1k, LIA1v in pairs( TEMP.Sort ) do
DSZusatz.Aufzaehlung[EDLIv.Name][LIA1v][2] = DSZusatz.Aufzaehlung[EDLIv.Name][LIA1v][2] or { }
DSZusatz.Aufzaehlung[EDLIv.Name][LIA1v][3] = DSZusatz.Aufzaehlung[EDLIv.Name][LIA1v][3] or { }
TEMP.Liste[EDLIk]["args"][LIA1k] = {
Name = LIA1v,
Label = DSZusatz.Aufzaehlung[EDLIv.Name][LIA1v][2][1] or "",
Kategorie = DSZusatz.Aufzaehlung[EDLIv.Name][LIA1v][3][1] or "",
KatAnzeige = DSZusatz.Aufzaehlung[EDLIv.Name][LIA1v]["KatAnzeige"]
}
for LIXk, LIXv in pairs( DSZusatz.Bezeichner ) do
if (type( TEMP.Typ ) == "string" and TEMP.Typ == LIXv ) then
TEMP.Liste[EDLIk]["args"][LIA1k]["Label"] = DSZusatz.Aufzaehlung[EDLIv.Name][LIA1v][2][LIXk] or TEMP.Liste[EDLIk]["args"][LIA1k]["Label"]
TEMP.Liste[EDLIk]["args"][LIA1k]["Kategorie"] = DSZusatz.Aufzaehlung[EDLIv.Name][LIA1v][3][LIXk] or TEMP.Liste[EDLIk]["args"][LIA1k]["Kategorie"]
end
end
if TEMP.Liste[EDLIk]["args"][LIA1k]["Kategorie"] ~= "" then TEMP.Liste[EDLIk]["args"][LIA1k]["Kategorie"] = "[[:Kategorie:" .. TEMP.Liste[EDLIk]["args"][LIA1k]["Kategorie"] .. "]]" end
if (type( TEMP.Typ ) == "number" or TEMP.Typ == "Sendeanlage" ) then
TEMP.LIZ = { }
for LIA2k, LIA2v in pairs( DSZusatz.Aufzaehlung[EDLIv.Name][LIA1v][2] ) do
if type( LIA2k ) == "string" then table.insert( TEMP.LIZ, LIA2k ) end
end
if #TEMP.LIZ > 1 then
TEMP.Liste[EDLIk]["args"][LIA1k]["Label"] = "\n{|\n|-\n| style=\"padding-right:.25em;\" | \'\'Voreinstellung\'\':\n| " .. tostring( DSZusatz.Aufzaehlung[EDLIv.Name][LIA1v][2][1] )
for LIA3k, LIA3v in pairs( TEMP.LIZ ) do
TEMP.Liste[EDLIk]["args"][LIA1k]["Label"] = TEMP.Liste[EDLIk]["args"][LIA1k]["Label"] .. "\n|-\n| style=\"padding-right:.25em;\" | " .. tostring( DSZusatz.Bezeichner[LIA3v] ) .. ":\n| " .. tostring( DSZusatz.Aufzaehlung[EDLIv.Name][LIA1v][2][LIA3v] )
end
TEMP.Liste[EDLIk]["args"][LIA1k]["Label"] = TEMP.Liste[EDLIk]["args"][LIA1k]["Label"] .. "\n|}"
end
TEMP.LIZ = { }
for LIA4k, LIA4v in pairs( DSZusatz.Aufzaehlung[EDLIv.Name][LIA1v][3] ) do
if type( LIA4k ) == "string" then table.insert( TEMP.LIZ, LIA4k ) end
end
if #TEMP.LIZ > 1 then
TEMP.Liste[EDLIk]["args"][LIA1k]["Kategorie"] = "\n{|\n|-\n| style=\"padding-right:.25em;\" | \'\'Voreinstellung\'\':\n| [[:Kategorie:" .. tostring( DSZusatz.Aufzaehlung[EDLIv.Name][LIA1v][3][1] ) .. "]]"
for LIA5k, LIA5v in pairs( TEMP.LIZ ) do
TEMP.Liste[EDLIk]["args"][LIA1k]["Kategorie"] = TEMP.Liste[EDLIk]["args"][LIA1k]["Kategorie"] .. "\n|-\n| style=\"padding-right:.25em;\" | " .. tostring( DSZusatz.Bezeichner[LIA5v] ) .. ":\n| [[:Kategorie:" .. tostring( DSZusatz.Aufzaehlung[EDLIv.Name][LIA1v][3][LIA5v] ) .. "]]"
end
TEMP.Liste[EDLIk]["args"][LIA1k]["Kategorie"] = TEMP.Liste[EDLIk]["args"][LIA1k]["Kategorie"] .. "\n|}"
end
end
if (DSZusatz.Aufzaehlung[EDLIv.Name][LIA1v]["Geo"] == "GeoC" or DSZusatz.Aufzaehlung[EDLIv.Name][LIA1v]["Geo"] == "GeoN") then
TEMP.Liste[EDLIk]["args"][LIA1k]["Kategorie"] = TEMP.Liste[EDLIk]["args"][LIA1k]["Kategorie"] .. " mit räumlicher Zuordnung durch den Parameter <code>REGION-ISO</code>"
end
end
end
-- Anzeige Parameter-Details
Doku = Doku .. "\n\n== Parameter-Details ==\n: \'\'Hinweis: Die zugrundeliegenden Daten können unter [[" .. DSZusatz.ModulStamm .. "/Auflistung]] bearbeitet werden.\'\'\n{| class=\"wikitable centered\"\n! Wert !! Anzeige!! Kategorie"
for DL1k, DL1v in pairs( TEMP.Liste ) do
Doku = Doku .. "\n|-\n| colspan=\"3\" style=\"font-weight:bold; font-size:120%; text-align:center; background:#fff4d5;\" | " .. Anker( DL1v.Label .. " <small>(" .. tostring( DL1v.Name ) .. ")</small>", "PD_", DL1v.Name )
for DL2k, DL2v in pairs( DL1v.args ) do
Doku = Doku .. "\n|-"
Doku = Doku .. "\n| " .. Anker( DL2v.Name, "PD_", DL1v.Name, DL2v.Name )
Doku = Doku .. "\n| "
if DL2v.KatAnzeige == false then Doku = Doku .. "colspan=\"2\" | " end
Doku = Doku .. tostring( DL2v.Label )
if DL2v.KatAnzeige ~= false then Doku = Doku .. "\n| " .. tostring( DL2v.Kategorie ) end
end
end
Doku = Doku .. "\n|}"
-- Datenquelle, nicht im Artikelnamensraum
if (DSZusatz.SR == "Spielwiese" or DSZusatz.SU == "Spielwiese") then
Doku = Doku .. "\n\n=== Datenquelle ===\n{| class=\"wikitable\"\n! Parameter !! Inhalt „AZv“"
for AZk, AZv in pairs( TEMP.EinzelDaten ) do
Doku = Doku .. "\n|-\n| <code>" .. tostring( AZk ) .. "</code>\n\| "
if type(AZv) == "table" then
Doku = Doku .. "\n{| class=\"wikitable\"\n! Parameter !! Inhalt „AZ2v“"
for AZ2k, AZ2v in pairs( AZv ) do
Doku = Doku .. "\n|-\n| <code>" .. tostring( AZ2k ) .. "</code>\n\| "
if type(AZ2v) == "table" then
Doku = Doku .. "\n{| class=\"wikitable\"\n! Parameter !! Inhalt „AZ3v“"
for AZ3k, AZ3v in pairs( AZ2v ) do
Doku = Doku .. "\n|-\n| <code>" .. tostring( AZ3k ) .. "</code>\n\| "
if type(AZ3v) == "table" then
Doku = Doku .. "\n{| class=\"wikitable\"\n! Parameter !! Inhalt „AZ4v“"
for AZ4k, AZ4v in pairs( AZ3v ) do
Doku = Doku .. "\n|-\n| <code>" .. tostring( AZ4k ) .. "</code>\n\| "
Doku = Doku .. "<code>" .. tostring( AZ4v ) .. "</code>"
if type(AZ4v) ~= "string" then Doku = Doku .. " (" .. type(AZ4v) .. ")" end
end
Doku = Doku .. "\n|}"
else
Doku = Doku .. "<code>" .. tostring( AZ3v ) .. "</code>"
if type(AZ3v) ~= "string" then Doku = Doku .. " (" .. type(AZ3v) .. ")" end
end
end
Doku = Doku .. "\n|}"
else
Doku = Doku .. "<code>" .. tostring( AZ2v ) .. "</code>"
if type(AZ2v) ~= "string" then Doku = Doku .. " (" .. type(AZ2v) .. ")" end
end
end
Doku = Doku .. "\n|}"
else
Doku = Doku .. "<code>" .. tostring( AZv ) .. "</code>"
if type(AZv) ~= "string" then Doku = Doku .. " (" .. type(AZv) .. ")" end
end
end
Doku = Doku .. "\n|}"
end
end
return Doku
end
-- Zusammenstellung DatenDokumentation
function p.DokuDaten( DSZusatz, DatenX, frame )
local Daten = DatenX
local ListeParameter = { }
local TabelleParameter = { }
local istvorhanden = { }
local TEMP = { }
local Doku = ""
-- Auslesung Daten
for LD1k, LD1v in pairs( Daten ) do
for LD2k, LD2v in pairs( LD1v ) do
if (istvorhanden[tostring( LD2k )] ~= true) then
table.insert( ListeParameter, tostring( LD2k ) )
istvorhanden[tostring( LD2k )] = true
end
end
end
table.sort( ListeParameter )
-- Parameterliste
for LP1k, LP1v in pairs( ListeParameter ) do
TabelleParameter[LP1k] = { Name = tostring( LP1v ) }
TEMP.Inhalt = mw.getCurrentFrame():getParent().args[tostring( LP1v )] or frame.args[tostring( LP1v )] or "—"
TEMP.Inhalt = string.gsub( TEMP.Inhalt, "$TabelleAnfang", "\n{| class =\"wikitable\"\n! Parameter !! Bemerkung" )
TEMP.Inhalt = string.gsub( TEMP.Inhalt, "$TabelleEnde", "\n|}" )
TEMP.Split = mw.text.split( TEMP.Inhalt, "/" )
if #TEMP.Split > 1 then
TEMP.Inhalt = "\n{| class =\"wikitable\"\n! Parameter !! Bemerkung\n|-\n|"
for LP2k, LP2v in pairs( TEMP.Split ) do
if LP2k == 1 then
TEMP.Inhalt = TEMP.Inhalt .. " <code>" .. LP2v .. "</code>"
else
TEMP.Inhalt = TEMP.Inhalt .. "\n|"
if LP2v ~= "-" then TEMP.Inhalt = TEMP.Inhalt .. " " end
if TEMP.Split[LP2k-1] == "-" then
TEMP.Inhalt = TEMP.Inhalt .. "<code>" .. LP2v .. "</code>"
else
TEMP.Inhalt = TEMP.Inhalt .. LP2v
end
end
end
TEMP.Inhalt = TEMP.Inhalt .. "\n|}"
end
TabelleParameter[LP1k]["Inhalt"] = tostring( TEMP.Inhalt )
end
-- Anzeige Parameter
Doku = Doku .. "\n{| class =\"wikitable\"\n! Parameter !! Bemerkung\n|-"
for AZP1k, AZP1v in pairs( TabelleParameter ) do
if AZP1v.Inhalt ~= "kein" then
if string.find( AZP1v.Inhalt, "$org" ) then
AZP1v.Inhalt = string.gsub( AZP1v.Inhalt, "$org", "" )
TEMP.Farbe = "efe"
elseif AZP1v.Inhalt == "—" then
TEMP.Farbe = "fee"
else
TEMP.Farbe = "ffe"
end
Doku = Doku .. "\n|-\n| style=\"background-color:#" .. tostring( TEMP.Farbe ) .. ";\" | <code>" .. AZP1v.Name .. "</code>\n| style=\"background-color:#" .. tostring( TEMP.Farbe )
if AZP1v.Inhalt == "—" then Doku = Doku .. "; text-align:center" end
Doku = Doku .. ";\" | " .. AZP1v.Inhalt
end
end
Doku = Doku .. "\n|-\n| colspan=\"2\" | <div style=\"width:32px; height:18px; border:black 1px solid; background-color:#efe; float:left; margin-right:1em;\"></div> Parameter kann im [[" .. DSZusatz.ModulStamm .. "/Label]] angepasst werden."
Doku = Doku .. "\n|-\n| colspan=\"2\" | <div style=\"width:32px; height:18px; border:black 1px solid; background-color:#ffe; float:left; margin-right:1em;\"></div> Parameter wird innerhalb des Moduls generiert."
Doku = Doku .. "\n|-\n| colspan=\"2\" | <div style=\"width:32px; height:18px; border:black 1px solid; background-color:#fee; float:left; margin-right:1em;\"></div> Status nicht definiert"
Doku = Doku .. "\n|}"
return Doku
end
-- Zusammenstellung Tsbelle DokuZusatz
function p.DokuZusatz( DSZusatz, Daten, frame )
local Doku, Sortierung, Beschreibung = "", { }, { }
for DSSk, DSSv in pairs( DSZusatz ) do
table.insert( Sortierung, tostring( DSSk ) )
end
table.sort( Sortierung )
for DSVk, DSVv in pairs( Sortierung ) do
Beschreibung[DSVk] = { Name = DSVv, Farbe = "" }
Beschreibung[DSVk]["Label"] = mw.getCurrentFrame():getParent().args[DSVv] or frame.args[DSVv] or ""
if Beschreibung[DSVk]["Label"] == "" then Beschreibung[DSVk]["Farbe"] = "style=\"background-color:#fee; | " end
end
Doku = Doku .. "\n{| class =\"wikitable\"\n! Parameter !! Beschreibung"
for DSk, DSv in pairs( Beschreibung ) do
Doku = Doku .. "\n|-\n| " .. DSv.Farbe .. "<code>" .. DSv.Name .. "</code>"
Doku = Doku .. "\n| " .. DSv.Farbe .. DSv.Label
end
Doku = Doku .. "\n|}"
return Doku
end
return p