FürthWiki

Modul:Straße: Unterschied zwischen den Versionen

Modul Diskussion

Modul:Straße (Quelltext anzeigen)

Version vom 22. Januar 2026, 11:01 Uhr

4.057 Bytes hinzugefügt ,  11:01
- Kategorie:Straßen ohne Stadtteil
Keine Bearbeitungszusammenfassung
 
(49 dazwischenliegende Versionen von 2 Benutzern werden nicht angezeigt)
Zeile 1: Zeile 1:
local p = {} --p stands for package
local p = {}
local c = require( "Module:Common" )


function p.Faktenbox( frame )
local com = require("Modul:Common")
pf = frame:getParent()
local str = require("Modul:String")
args = pf.args
local geo = require("Modul:Geo")
local fab = require("Modul:Faktenbox")
-- Before you ask: No, you cant' use extensionTag here!
local kar = require("Modul:Karte")
tpl_bild = p.Bild( frame, args )
local wik = require("Modul:Wiki")
tab_bild=''
local smw = require("Modul:SMW")
if tpl_bild:gsub("%s+", "") ~= '' then
 
tab_bild='<tab name=Bild>' ..  
function p.Faktenbox(frame)
tpl_bild .. '</tab>'
-- mw.log("Faktenbox(frame)")
-- mw.logObject(frame, "frame")
-- Konsolenzeile zum Debuggen:
-- =p.Faktenbox{pargs={Stadtteil="Innenstadt;Ronhof",Ort="Buxtehude"}}
 
-- Basis-Faktenbox-Daten (Klasse/Kategorie/Formular)
local fbdata = fab.getFbdata(frame)
fbdata.klasse = {"Straße"}
fbdata.kategorie = {"Straßen"}
fbdata.formular = "Straße" -- ggf. "Straße/Work"
fbdata.positionscheck = true
 
-- Postleitzahl ermitteln
local stadtteile = str.splitAndStrip(fbdata.pargs["Stadtteil"], ";")
fbdata.plz = geo.stadtteil2PLZ(stadtteile)
 
-- Tabs einsammeln und zusammenfügen
local t = p.kartenTab(fbdata) .. -- Karten-Tab muss vor Tabs mit zeileGeoDaten() sein
fab.bildTab(fbdata) .. p.datenTab(fbdata) .. fab.benennungenTab(fbdata)
t = fab.factbox_header_footer(t)
 
-- Straßen-spezifische Kategorien usw.
if fbdata.pargs["Stadtteil"] == nil then
fab.addWartungsmeldung(fbdata, "Straßen ohne Stadtteil")
end
end
if fbdata.pargs["Ort"] == nil then
tpl_karte = p.Karte( frame, args )
smw.addAttrToList(fbdata.attr.list, "Ort", "Fürth")
tab_karte=''
if tpl_karte:gsub("%s+", "") ~= '' then
tab_karte='<tab name=Karte>' ..
tpl_karte .. '</tab>'
end
end
-- The tab "Daten" is visible everytime
tpl_daten = p.Daten( frame, args )
tab_daten='<tab name=Daten>' ..
tpl_daten .. '</tab>'
tpl_benennungen = p.Benennungen( frame, args )
tab_benennungen=''
if tpl_benennungen:gsub("%s+", "") ~= '' then
tab_benennungen='<tab name=Benennungen>' ..
tpl_benennungen .. '</tab>'
end
t ='<div class=factbox><tabs>' ..
  tab_karte ..
  tab_bild ..
  tab_daten ..
  tab_benennungen ..
  '</tabs></div>'
-- Use preprocess to render the factbox and all contens at once
return frame:preprocess(t)
end


function p.Bild( frame, args )
-- Sonstige gemeinsame Dinge anfügen (Klasse, Formular, Kategorien, Wartung, ...)
t = frame:expandTemplate{title = 'Bildertab', args={
t = t .. fab.postprocess(fbdata)
Bild=args.Bild}
-- Pre-Processing
}
-- mw.logObject(t, "t")
    return t
t = fbdata.frame:preprocess(t)
return t
end
end


function p.Karte( frame, args )
function p.datenTab(fbdata)
    args_ = c.shallowcopy(args)
-- mw.log("datenTab(fbdata)")
args_["streetlocation"] = frame:expandTemplate{title = 'Straße/Karte/Lokation', args=args}
-- mw.logObject(fbdata, "fbdata")
t = frame:expandTemplate{title = 'Straße/Karte', args=args_}
--[[ Konsolenzeile zum Debuggen:
    return t
fab=require("Modul:Faktenbox"); fbdata=fab.fbdata{pargs={Baujahr="1987",Stadtteil="Innenstadt;Ronhof",Ort="Buxtehude"}};
end
fbdata.klasse={"Straße"}; fbdata.kategorie={"Straßen"}; fbdata.fullpagename="Erlanger Straße"; fbdata.subpagename="Erlanger Straße";
print(p.datenTab(fbdata))
]]
local t = ""


function p.Daten( frame, args )
-- Zusammenbau
t = frame:expandTemplate{title = 'Straße/Daten', args=args}
t = t .. fab.zeileKategorieSeite(fbdata)
    return t
t = t .. fab.zeile{fbdata = fbdata, attr_name = "Baujahr", delimiter = ";"}
end
t = t .. fab.zeile{fbdata = fbdata, attr_name = "Stadtteil", delimiter = ";"}
t = t .. fab.zeile{fbdata = fbdata, attr_name = "PLZ", attr_val = fbdata.plz}
t = t .. fab.zeile{fbdata = fbdata, attr_name = "Ort", delimiter = ";"}
t = t .. fab.zeile{fbdata = fbdata, attr_name = "Ehemals"}
t = t .. fab.zeile{fbdata = fbdata, attr_name = "Abbruchjahr", delimiter = ";"}
t = t .. fab.zeileGeoDaten(fbdata)
t = fab.table_header_footer(t)
t = t .. fab.zeileSemantikBrowsenAbfrage(fbdata)


function p.Benennungen( frame, args )
-- Tab draus machen
t = frame:expandTemplate{title = 'Straße/Benennungen'}
t = fab.tab(t, "Daten")
-- mw.log("t = " .. t)
     return t
     return t
end
end


function p.HausnummerOhneBuchstaben( frame )
function p.kartenTab(fbdata)
return string.match( frame.args[1], "%d+" )
-- mw.log("kartenTab(fbdata)")
-- mw.logObject(fbdata, "fbdata")
-- Konsolenzeile zum Debuggen:
-- fbdata=require("Modul:Faktenbox").fbdata{pargs={Ehemals="ja";location="Bla"}}; fbdata.pagename="Erlanger Straße"; fbdata.plz={90765}; p.kartenTab(fbdata)
local t = ""
if string.find(fbdata.pagename, ";") ~= nil then
t = t .. "Semikolon im Artikel-/Seitennamen für korrekte Kartendarstellung nicht erlaubt!"
else
-- Karten-Argumente übernehmen und aufbereiten
local args = fab.getKartenArgs(fbdata, 16)
-- Straßen-Lokation ermitteln, sofern location nicht explizit angegeben
if args["location"] == nil and not com.isTrue(args["Ehemals"]) then
local _, strasse, _ = str.bracketSplitAndStrip(fbdata.pagename) -- Klammern abschneiden wie z. B. "(Straße)"
args["location"] = strasse .. "," .. (args["Ort"] or "Fürth")
if  #fbdata.plz > 0 then
args["location"] = args["location"] .. "," .. fbdata.plz[1]
end
args["location"] = args["location"] .. ",Bayern,Deutschland"
end
local karten_args_vorhanden = kar.kartenArgsVorhanden(args)
-- Gebäude-Selektor für Queries
local gebaeude_selector =
"[[:+]][[Kategorie:Gebäude]][[Straße::" .. fbdata.pagename .. "]] OR " ..
"[[:+]][[Kategorie:Gebäude]][[Straße2::" .. fbdata.pagename .. "]] OR " ..
"[[:+]][[Kategorie:Gebäude]][[Straße3::" .. fbdata.pagename .. "]]"
-- Gebäude-Artikel mit dieser Straße vorhanden?
local n_gebaeude = 0
if not karten_args_vorhanden then
local query = {gebaeude_selector, ["format"] = "count"}
n_gebaeude = mw.smw.ask(query)
end
-- Karte erstellen
if karten_args_vorhanden or n_gebaeude > 0 then
-- Karten-Query zusammensetzen
local query = gebaeude_selector
local geojson_pagename = args["geojson"] or fbdata.pagename
if not wik.pageExists("GeoJson:" .. geojson_pagename) then
query = query .. " OR [[" .. fbdata.pagename .. "]]"
geojson_pagename = ""
end
query = {
query,
["format"] = "leaflet", ["limit"] = "10000",
["zoom"] = args["zoom"],
["resizable"] = "yes", ["enablefullscreen"] = "yes",
["cluster"] = "yes", ["clustermaxzoom"] = "16",
["clusterspiderfy"] = "no"}
for _, q in ipairs{"Geokoordinate", "Objekt", "Architekt",
"Baujahr", "Baustil", "AktenNr=Akten-Nr.", "Bauherr"} do
table.insert(query, "?" .. q)
end
if geojson_pagename ~= "" then
query["geojson"] = geojson_pagename
elseif args["lat"] ~= nil and args["lon"] ~= nil then
query["centre"] = args["lat"] .. "," .. args["lon"]
-- else
-- query["centre"] = "49.476,10.989"
end
-- Karte per #ask rendern
local t_karte = fbdata.frame:callParserFunction("#ask", query)
-- kar.karte() hinterher schieben
if str.strip(t_karte or "") ~= "" then
t = t .. t_karte
args["nomap"] = "ja" -- kar.karte() rendert NICHT die Karte, sofern #ask-Karte erfolgreich
end
t_karte, fbdata.geoobjects = kar.karte(fbdata.frame, args) -- kar.karte() setzt Kategorien
t = t .. t_karte
end
end
-- Tab draus machen
-- mw.logObject(t, "t")
t = fab.tab(t, "Karte")
return t
end
end


return p
return p
Abgerufen von „https://www.fuerthwiki.de/wiki/index.php?title=Spezial:Mobiler_Unterschied/732953...780585“