FürthWiki

Modul:Chronik: Unterschied zwischen den Versionen

Modul Diskussion

Modul:Chronik (Quelltext anzeigen)

Version vom 5. November 2025, 17:58 Uhr

3.117 Bytes hinzugefügt ,  5 November
keine Bearbeitungszusammenfassung
Keine Bearbeitungszusammenfassung
Keine Bearbeitungszusammenfassung
 
(47 dazwischenliegende Versionen von 3 Benutzern werden nicht angezeigt)
Zeile 1: Zeile 1:
local p = {}
local p = {}
local c = require("Modul:Common")
local str = require("Modul:String")
local lf = require("Modul:LinkFormDatum")
local srf = require("Modul:Subrefs")
local ls = require("Modul:LinkSubformDatum")
local com = require("Modul:Common")
local lfd = require("Modul:LinkFormDatum")
local lsd = require("Modul:LinkSubformDatum")
 
function p.Abfrage(frame)
local title = mw.title.getCurrentTitle().text
local page = frame.args[1] or title
local t = p.abfrage(page)
return frame:preprocess(t)
end
 
function p.abfrage(page)
local results = mw.smw.ask(
'[[Startjahr::' .. page .. ']] ' ..
--'[[Artikel::!' .. page .. ']] ' ..
[[
|?Schlagzeile
|?Beschreibung
|?Startdatum
|?Starttag
|?Startjahr
|?Enddatum
|?Endtag
|?Endjahr
|?Artikel
|?Option
|?Thema
]])
local t = ''
for i, r in ipairs(results or {}) do
t = t .. '* ' .. r["Startdatum"] .. ' - '
t = t .. r["Beschreibung"]
t = t .. "\n"
end
return t
end
 
function p.AbfrageJahrestag(frame)
return p.abfrageJahrestag(frame.args[1])
end
 
function p.abfrageJahrestag(year_day)
return year_day
end
 
function p.AbfrageJahr(frame)
return p.abfrageJahr(frame.args[1])
end
 
function p.abfrageJahr(year)
return year
end


function p.Eintrag(frame)
function p.Eintrag(frame)
local args = frame.args
local title = mw.title.getCurrentTitle().text
local title = mw.title.getCurrentTitle()
local daterange = frame.args[1]
local titlename = title.text
local text = frame.args[2] or ""
local fulltitle = title.fullText
local option = frame.args[3]
local year
local thema = frame.args["Thema"] or "Ereignis"
local year = nil
if com.istJahreszahl(title) then
year = title
end
local data = p.dateParser(daterange, year)
local ds = ''
if not com.isEmpty(data['Starttag']) then
if data['Starttag']:match("^%d") then
ds = '[[' .. data['Starttag'] .. ']] '
else
ds = data['Starttag'] .. ' '
end
end
if not year then
ds = ds .. '[[' .. data['Startjahr'] .. ']]'
end
if data['Enddatum'] then
ds = ds .. "- [[" .. data['Endtag'] .. "]]"
if not year then
ds = ds .. "[[" .. data['Endjahr'] .. "]]"
end
end
data['Beschreibung'] = text
data['Option'] = option
data['Thema'] = thema
data['Artikel'] = title
mw.smw.subobject(data)
local t
if option == "nodate" then
t = srf.subrefs(text)
else
t = ds .. ': ' .. srf.subrefs(text)
end
return frame:preprocess(t)
end
 
function p.dateParser(s, year)
local start_date, end_date = p.splitDateString(s, year)
start_date, end_date = p.completeDates(start_date, end_date, year)
local sdf = lfd.humanToFormDate(start_date)
local data = {
local data = {
["Beschreibung"] = args[2],
['Startdatum'] = sdf,
["Thema"] = "Ereignis",
['Startjahr'] = lsd.getYear(sdf),
["Artikel"] = fulltitle
['Starttag'] = lsd.getMonthday(sdf)
}
}
if end_date then
-- Wenn das Lemma eine Jahreszahl ist, merken
local edf = lfd.humanToFormDate(end_date)
if istJahreszahl(titlename) then
data['Enddatum'] = edf
year = titlename
data['Endjahr'] = lsd.getYear(edf)
    end
data['Endtag'] = lsd.getMonthday(edf)
    local data_date = dateParsing(args[1], year)
end
    local all_data=merge_tables(data, data_date)
mw.logObject(data)
return data_date["Startdatum"] .. ": " .. args[2] .. '<br>' ..
return data
tableToString(all_data)
end
end


function dateParsing(s, year)
function p.completeDates(start_date, end_date, year)
-- Parses a date down where s is the datestring and year can be nil or string
--[[Jetzt müssen die gesplitteten Datum vervollständigt werden. Kann ja
local d=split(s, '-')
sein, daß etwas wie 6. - 10. Januar angegeben ist. Und das Jahr, wenn nicht
local sd=human_to_form_date(d[0])
gegeben, muß auch aus dem year entnommen werden können.]]
local data = {
--start_date = str.strip(start_date)
-- Erstmal das Startdatum schreiben
--end_date = str.strip(end_date)
["Startdatum"] = sd,
["Startjahr"] = get_year(sd),
["Starttag"] = get_monthday(sd),
["length"] = len(d),
["year"] = year,
}
local ed=nil
local sd = str.split(start_date, ' ')
if len(d) == 2 then
if not com.isEmpty(end_date) then
-- War eine Zeitspanne angegeben gibt es ein Endatum
-- Wenn ein Enddatum gegeben ist
ed=human_to_form_date(d[1])
local ed = str.split(end_date, ' ')
data["Enddatum"] = ed
mw.logObject(ed)
data["Endjahr"] = get_year(ed)
if com.len(ed) == 2 then
data["Endtag"] = get_monthday(ed)
-- Wenn das Enddatum kein Jahr enthält, füge es aus year hinzu
ed[3] = year
end_date = end_date .. " " .. ed[3]
end
if com.len(sd) == 2 then
-- Wenn das Startdatum kein Jahr enthält, hole es von Enddatum
start_date = start_date .. " " .. ed[3]
elseif com.len(sd) == 1 then
-- Startdatum enthält weder Monat noch Jahr, hole sie von Enddatum
start_date = start_date .. " " .. ed[2] .. " " .. ed[3]
end
else
-- Wenn nur ein Startdatum gegeben ist
if year == nil then
return start_date, end_date
end
if com.len(sd) == 2 then
-- Wenn das Startdatum kein Jahr enthält, hole es aus year
sd[3] = year
start_date = start_date .. " " .. sd[3]
elseif com.len(sd) == 1 then
sd[3] = year
start_date = start_date .. " " .. sd[3]
end
end
end
return data
return start_date, end_date
end
 
function p.splitDateString(s)
-- Teilt ein von/bis Datum in Start- und End-Datum auf.
local dates = str.split(s, "-")
-- Wenn splitten mit "-" nur ein Ergebnis bringt, splitte mit "bis"
if com.len(dates) == 1 then
dates = str.split(s, "bis")
end
-- Alle Leerzeichen links und rechts in den Ergebnissen entfernen
for i, v in ipairs(dates) do
dates[i] = str.strip(dates[i])
end
return dates[1], dates[2]
end
end


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