Modul:Karte/Work: Unterschied zwischen den Versionen

Aus FürthWiki

Modul:Karte/Work (Quelltext anzeigen)

Version vom 12. Dezember 2025, 18:51 Uhr

806 Bytes hinzugefügt ,  Gestern um 18:51
keine Bearbeitungszusammenfassung
Keine Bearbeitungszusammenfassung
Keine Bearbeitungszusammenfassung
(24 dazwischenliegende Versionen desselben Benutzers werden nicht angezeigt)
Zeile 9: Zeile 9:
function p.Karte(frame)
function p.Karte(frame)
-- nur die benötigten Argumente übernehmen
-- nur die benötigten Argumente übernehmen
local argslist = {
local args = {
"lat", "lon", "location", "locationlist", "geojson", "geocode",
"lat", "lon", "location", "locationlist", "geojson", "geocode",
"zoom", "popuptitle", "popuptext",
"zoom", "popuptitle", "popuptext",
Zeile 15: Zeile 15:
"noattr", "form",
"noattr", "form",
"Work", "Debug"}
"Work", "Debug"}
-- local args = wik.getArgs(frame.args, argslist)
local args = wik.getArgs(frame.args, args)
local args = {} -- to do: diesen Block später rausschmeißen und obigen aktivieren, wenn fertig
for _, a in ipairs(argslist) do -- to do: diesen Block später rausschmeißen und obigen aktivieren, wenn fertig
if frame.args[a] ~= nil then -- to do: diesen Block später rausschmeißen und obigen aktivieren, wenn fertig
args[a] = frame.args[a] -- to do: diesen Block später rausschmeißen und obigen aktivieren, wenn fertig
end
end
return p.karte(frame, args)
return p.karte(frame, args)
end
end
Zeile 34: Zeile 28:
local geoobjects = {}
local geoobjects = {}
local kategorien = {}
local kategorien = {}
local attrlist = {}
local pagename = args["pagename"] or wik.pagename() -- nur zum Debuggen pagename vorgebbar
local pagename = args["pagename"] or wik.pagename() -- nur zum Debuggen pagename vorgebbar
-- defaults setzen
-- defaults setzen
-- args["box"] = args["box"] or "Ja"
args["box"] = args["box"] or "Ja"
if com.isEmpty(args["box"]) then -- to do: diesen Block später rausschmeißen und obigen aktivieren, wenn fertig
args["zoom"] = args["zoom"] or "16"
args["box"] = "Ja" -- to do: diesen Block später rausschmeißen und obigen aktivieren, wenn fertig
local geojson_pagename = args["geojson"] or pagename
end -- to do: diesen Block später rausschmeißen und obigen aktivieren, wenn fertig
local geojson_fullpagename = "GeoJson:" .. geojson_pagename
-- args["zoom"] = args["zoom"] or "16"
if com.isEmpty(args["zoom"]) then -- to do: diesen Block später rausschmeißen und obigen aktivieren, wenn fertig
args["zoom"] = "16" -- to do: diesen Block später rausschmeißen und obigen aktivieren, wenn fertig
end -- to do: diesen Block später rausschmeißen und obigen aktivieren, wenn fertig


if com.isEmpty(args["geojson"]) then -- to do: diesen Block später rausschmeißen und obigen aktivieren, wenn fertig
-- width/height
args["geojson_pagename"] = pagename -- to do: diesen Block später rausschmeißen und obigen aktivieren, wenn fertig
if com.isTrue(args["box"]) or args["width"] == "auto" then
else -- to do: diesen Block später rausschmeißen und obigen aktivieren, wenn fertig
args["width"] = nil -- ohne width passt sich Karte eigenständig in Box ein
args["geojson_pagename"] = args["geojson"] -- to do: diesen Block später rausschmeißen und obigen aktivieren, wenn fertig
elseif args["width"] == nil then
end -- to do: diesen Block später rausschmeißen und obigen aktivieren, wenn fertig
args["width"] = "50%" -- default bei keiner width-Angabe und keiner Box
end
if com.isTrue(args["box"]) or args["height"] == "auto" then
args["height"] = nil -- ohne height passt sich Karte eigenständig in Box ein
elseif args["height"] == nil then
args["height"] = "25%" -- default bei keiner height-Angabe und keiner Box
end


-- geocode location and locationlist
-- geocode location and locationlist
Zeile 76: Zeile 73:
else
else
-- location geocode
-- location geocode
local geocode = geocode(frame, location)
local geocode = "Geocoding failed" -- to do: diesen Block später rausschmeißen nach Aufbau nominatim.fuerthwiki.de
if com.isEmpty(args["lat"]) or com.isEmpty(args["lon"]) then -- to do: diesen Block später rausschmeißen nach Aufbau nominatim.fuerthwiki.de
geocode = getGeocode(frame, location) -- to do: nur diese Zeile bleibt übrig (mit local)
end -- to do: diesen Block später rausschmeißen nach Aufbau nominatim.fuerthwiki.de
if geocode ~= "Geocoding failed" then
if geocode ~= "Geocoding failed" then
geoobject_entry["Geokoordinate"] = geocode
geoobject_entry["Geokoordinate"] = geocode
Zeile 106: Zeile 106:
  not com.isEmpty(args["lat"]) and not com.isEmpty(args["lon"]) then
  not com.isEmpty(args["lat"]) and not com.isEmpty(args["lon"]) then
local geoobject_entry = {}
local geoobject_entry = {}
local geocode = geocode(frame, args["lat"] .. "," .. args["lon"])
-- local geocode = getGeocode(frame, args["lat"] .. "," .. args["lon"])
local geocode = args["lat"] .. "," .. args["lon"] -- to do: diesen Block später rausschmeißen und obigen aktivieren, wenn fertig
if geocode ~= "Geocoding failed" then
if geocode ~= "Geocoding failed" then
geoobject_entry["Geokoordinate"] = geocode
geoobject_entry["Geokoordinate"] = geocode
Zeile 119: Zeile 120:
-- Attribute setzen
-- Attribute setzen
if not com.isTrue(args["noattr"]) then
if not com.isTrue(args["noattr"]) then
 
-- Geolokation/Geokoordinate setzen
-- geoobjects setzen
for _, o in ipairs(geoobjects) do -- to do: obsolete, wenn sobobject genutzt
setAttr(attrlist, "Geolokation", o["Geolokation"]) -- to do: obsolete, wenn sobobject genutzt
setAttr(attrlist, "Geokoordinate", o["Geokoordinate"]) -- to do: obsolete, wenn sobobject genutzt
end -- to do: obsolete, wenn sobobject genutzt
-- GeoJson
if wik.pageExists(geojson_fullpagename) then
setAttr(attrlist, "GeoJson", geojson_fullpagename)
end
-- zoom
setAttr(attrlist, "Zoomlevel", args["zoom"])
-- normale Attribute setzen
mw.logObject(attrlist, "attrlist")
mw.smw.set(attrlist)
-- geoobjects als subobjects setzen
mw.logObject(geoobjects, "geoobjects")
mw.logObject(geoobjects, "geoobjects")
for _, o in ipairs(geoobjects) do
for _, o in ipairs(geoobjects) do
Zeile 127: Zeile 141:
mw.smw.subobject(o, id)
mw.smw.subobject(o, id)
end
end
end
-- zoom
 
t = t .. "{{#set:Zoomlevel=" .. args["zoom"] .. "}}"
-- Karte
local map_args = { -- gemeinsame settings
end --- if not com.isTrue(args["noattr"]) then
["width"] = args["width"], ["height"] = args["height"],
["zoom"] = args["zoom"],
["enablefullscreen"] = "yes", ["resizable"] = "yes"}
local display_map = false
if wik.pageExists(geojson_fullpagename) then
map_args["geojson"] = geojson_pagename
table.insert(map_args, "") -- dummy / keine location
display_map = true
end
if display_map then
mw.logObject(map_args, "map_args")
t = t .. frame:callParserFunction("#display_map", map_args)
end


-- bisherige Vorlagen-Karte
-- bisherige Vorlagen-Karte
local karte_vorlage = "Karte/Legacy"
if not display_map then
if com.isTrue(args["Work"]) then
local karte_vorlage = "Karte/Legacy"
karte_vorlage = karte_vorlage .. "/Work"
if com.isTrue(args["Work"]) then
-- args["Debug"] = "Ja"
karte_vorlage = karte_vorlage .. "/Work"
-- args["Debug"] = "Ja"
end
mw.logObject(args, "args zur Vorlage " .. karte_vorlage)
t = t .. frame:expandTemplate{title = karte_vorlage, args = args}
end
end
mw.logObject(args, "args zur Vorlage " .. karte_vorlage)
t = t .. frame:expandTemplate{title = karte_vorlage, args = args}


-- Box drum herum
-- Box drum herum
Zeile 175: Zeile 203:
end
end


function geocode(frame, location)
function getGeocode(frame, location)
return frame:callParserFunction(
return frame:callParserFunction(
"#geocode", {location, format="float", directional="no"})
"#geocode", {location, format="float", directional="no"})
Zeile 186: Zeile 214:
if not com.isEmpty(popuptext) then
if not com.isEmpty(popuptext) then
geoobject_entry["KartePopupText"] = popuptext
geoobject_entry["KartePopupText"] = popuptext
end
end
function setAttr(attrlist, attr, val)
if val ~= nil then
if attrlist[attr] == nil then
attrlist[attr] = {val}
else
table.insert(attrlist[attr], val)
end
end
end
end
end


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