Modul:Zeit

Aus skandinavien-wiki.net

Die Dokumentation für dieses Modul kann unter Modul:Zeit/doc erstellt werden

local check = require('Modul:Check')
local params = mw.loadData('Modul:Zeit/Params')
local lang = mw.language.new ( 'de' );

local zeit = {}

function zeit.inhalt_monat ( frame )
	
   funcParams = params['inhalt_monat']
   args = frame:getParent().args
   
   local januar = args['jan'] or args['januar'] or args['std'] or args['standard'] or funcParams['jan']   
   local februar = args['feb'] or args['februar'] or args['std'] or args['standard'] or funcParams['feb']
   local maerz = args['mar'] or args['maerz'] or args['std'] or args['standard'] or funcParams['mar']   
   local april = args['apr'] or args['april'] or args['std'] or args['standard'] or funcParams['apr']   
   local mai = args['mai'] or args['std'] or args['standard'] or funcParams['mai']   
   local juni = args['jun'] or args['juni'] or args['std'] or args['standard'] or funcParams['jun']   
   local juli = args['jul'] or args['juli'] or args['std'] or args['standard'] or funcParams['jul']
   local august = args['aug'] or args['august'] or args['std'] or args['standard'] or funcParams['aug']
   local september = args['sep'] or args['september'] or args['std'] or args['standard'] or funcParams['sep']   
   local oktober = args['okt'] or args['oktober'] or args['std'] or args['standard'] or funcParams['okt']   
   local november = args['nov'] or args['november'] or args['std'] or args['standard'] or funcParams['nov']
   local dezember = args['dez'] or args['dezember'] or args['std'] or args['standard'] or funcParams['dez']
   
   local ausgabe = funcParams['st']
   local monat = lang:formatDate ( 'm' )
   
   if monat == '01' then ausgabe = januar end
   if monat == '02' then ausgabe = februar end
   if monat == '03' then ausgabe = maerz end
   if monat == '04' then ausgabe = april end
   if monat == '05' then ausgabe = mai end
   if monat == '06' then ausgabe = juni end
   if monat == '07' then ausgabe = juli end
   if monat == '08' then ausgabe = august end
   if monat == '09' then ausgabe = september end
   if monat == '10' then ausgabe = oktober end
   if monat == '11' then ausgabe = november end
   if monat == '12' then ausgabe = dezember end

   return check._testParams ( args, funcParams, 'Zeit' ) .. ausgabe
end

function zeit.inhalt_jahreszeit ( frame )
	
   funcParams = params['inhalt_jahreszeit']
   args = frame:getParent().args
   
   local paramsTypen = { astronomisch = 'astronomisch', meteorologisch = 'meteorologisch' }
   local errorStr = '';
   
   local fruehling = args['fr'] or args['fruehling'] or args['std'] or args['standard'] or funcParams['fr']   
   local sommer = args['so'] or args['sommer'] or args['std'] or args['standard'] or funcParams['so']   
   local herbst = args['he'] or args['herbst'] or args['std'] or args['standard'] or funcParams['he']
   local winter = args['wi'] or args['winter'] or args['std'] or args['standard'] or funcParams['wi']
   
   local typ = args['typ'] or funcParams['typ']
   
   local ausgabe = funcParams['std']
   
   if paramsTypen[typ] == nil then errorStr = check._error ('Falscher Wert für Parameter <em>typ</em>: <em>' .. typ .. '</em>', 'Zeit' ) end
   if typ == 'meteorologisch' then
      local monat = lang:formatDate ( 'm' )
      if monat == '01' then ausgabe = winter end
      if monat == '02' then ausgabe = winter end
      if monat == '03' then ausgabe = fruehling end
      if monat == '04' then ausgabe = fruehling end
      if monat == '05' then ausgabe = fruehling end
      if monat == '06' then ausgabe = sommer end
      if monat == '07' then ausgabe = sommer end
      if monat == '08' then ausgabe = sommer end
      if monat == '09' then ausgabe = herbst end
      if monat == '10' then ausgabe = herbst end
      if monat == '11' then ausgabe = herbst end
      if monat == '12' then ausgabe = winter end      
   end
   if typ == 'astronomisch' then
      local jahr = lang:formatDate ( 'Y' )
      local differenz = os.difftime ( os.time(), os.time ( { year = jahr, month = '01', day = '01' } ) )
      tage = math.floor ( differenz / 86400 +0.5 )
      if tage < 78 then ausgabe = winter
      else
         if tage < 178 then ausgabe = fruehling
         else
            if tage < 265 then ausgabe = sommer
            else
               if tage < 355 then ausgabe = herbst
               else
                  ausgabe = winter
               end
            end
         end
      end
      
   end
   return errorStr .. check._testParams ( args, funcParams, 'Zeit' ) .. ausgabe
end

function zeit.inhalt_saison ( frame )
	
   funcParams = params['inhalt_saison']
   args = frame:getParent().args
   
   local sommer = args['so'] or args['sommer'] or args['std'] or args['standard'] or funcParams['so']
   local winter = args['wi'] or args['winter'] or args['std'] or args['standard'] or funcParams['wi']
   
   local ausgabe = funcParams['std']
   
   local datum = os.date( '*t' )
   if datum['isdst'] then ausgabe = sommer else ausgabe = winter end
   
   return check._testParams ( args, funcParams, 'Zeit' ) .. ausgabe
end

function zeit.inhalt_zeitraum ( frame )
	
   local jahr = lang:formatDate ( 'Y' )
   funcParams = params['inhalt_zeitraum']
   args = frame:getParent().args
   
   local errorStr = '';
   
   local von_tag = args['von_tag'] or funcParams['von_tag']   
   local von_monat = args['von_monat'] or funcParams['von_monat']   
   local bis_monat = args['bis_monat'] or funcParams['bis_monat']
   
   local bis_tag = args['bis_tag']
   if bis_tag == nil then 
      bis_tag = funcParams['bis_tag'] 
      if bis_monat == '02' then 
         bis_tag = 28
         if jahr / 4 == math.floor ( jahr / 4 ) then bis_tag = 29 end
      end
      if bis_monat == '04' then bis_tag = 30 end
      if bis_monat == '06' then bis_tag = 30 end
      if bis_monat == '09' then bis_tag = 30 end
      if bis_monat == '11' then bis_tag = 30 end
   end
   
   local inhalt = args['inhalt']
   if inhalt == nil then
      inhalt = funcParams['inhalt']
      errorStr = check._error ('Kein Textinhalt für den Zeitraum angegeben.', 'Zeit' )
   end

   local standard = args['std'] or args['standard'] or funcParams['std']

   local ausgabe = standard

   local differenz = os.difftime ( os.time(), os.time ( { year = jahr, month = '01', day = '01' } ) )
   local heute = math.floor ( differenz / 86400 +0.5 )
   differenz = os.difftime ( os.time( { year = jahr, month = von_monat, day = von_tag } ), os.time ( { year = jahr, month = '01', day = '01' } ) )
   local von = math.floor ( differenz / 86400 +0.5 )
   differenz = os.difftime ( os.time( { year = jahr, month = bis_monat, day = bis_tag } ), os.time ( { year = jahr, month = '01', day = '01' } ) )
   local bis = math.floor ( differenz / 86400 +0.5 )
   if von > bis then
      if jahr / 4 == math.floor ( jahr / 4 ) then von = von - 357 else von = von - 356 end
   end
   
   if heute >= von and heute <= bis then ausgabe = inhalt end
   
   return errorStr .. check._testParams ( args, funcParams, 'Zeit' ) .. ausgabe
end

function zeit.addMonth ( frame )
	
	local funcParams = params['addMonth']
	local vArgs = frame.args
	local args = frame:getParent().args

	local anzahl = tonumber( vArgs['anzahlMonate'] or args['anzahlMonate'] or funcParams['anzahlMonate'] )
	local ausgabeFormat = vArgs['format'] or args['format'] or funcParams['format']
	local jahr = tonumber( vArgs['jahr'] or args['jahr'] or lang:formatDate ( 'Y' ) )
	local monat = tonumber( vArgs['monat'] or args['monat'] or lang:formatDate ( 'm' ) )
	local tag = vArgs['tag'] or args['tag'] or lang:formatDate ( 'd' )
	
	local monatStr = tostring ( monat + anzahl - ( math.floor ( anzahl/12 ) * 12 ) )
	if ( string.len(monatStr) == 1 ) then monatStr = '0'..monatStr end

	return lang:formatDate ( ausgabeFormat, tostring ( jahr + math.floor ( anzahl/12 ) )..monatStr..tag )
end

return zeit