RzF

---

local p = {}

---Example: {{#invoke:RzF|getParagraph|{{PAGENAME}} }}
function p.getParagraph ( frame )
	local titel = mw.text.trim( frame.args[1] )
	local par = ''
	if string.match( titel, "§ %d+ %a ") then
	    par = mw.text.trim(string.match( titel, "§ %d+ %a "))
	    par = string.match( par, "%d+ %a")
	    return par
	end
	if string.match( titel, "§ %d+") then
	    par = string.match( titel, "§ %d+")
	    par = string.match( par, "%d+")
	    return par
	end
	if string.match( titel, "§%d+%a") then
	    par = string.match( titel, "§%d+%a")
	    par = string.match( par, "%d+%a+")
	    return par
	end
	if string.match( titel, "§%d+") then
	    par = string.match( titel, "§%d+")
	    par = string.match( par, "%d+")
	    return par
	end
	if string.match( titel, "§ %d+%a") then
	    par = string.match( titel, "§ %d+%a")
	    par = string.match( par, "%d+%a")
	    return par
	end
	if string.match( titel, "Paragraph %d+ %a ") then
	    par = mw.text.trim(string.match( titel, "Paragraph %d+ %a "))
	    par = string.match( par, "%d+ %a")
	    return par
	end
	if string.match( titel, "Paragraph %d+%a") then
	    par = string.match( titel, "Paragraph %d+%a")
	    par = string.match( par, "%d+%a")
	    return par
	end
	if string.match( titel, "Paragraph %d+") then
	    par = string.match( titel, "Paragraph %d+")
	    par = string.match( par, "%d+")
	    return par
	end
end

function p.getAbsatz ( frame )
	local titel = mw.text.trim( frame.args[1] )
	local abs = ''
	if string.match( titel, "Abs. %d+ %a ") then
	    abs = mw.text.trim(string.match( titel, "Abs. %d+ %a "))
	    abs = string.match( abs, "%d+ %a")
	    return abs
	end
	if string.match( titel, "Abs. %d+%a") then
	    abs = string.match( titel, "Abs. %d+%a")
	    abs = string.match( abs, "%d+%a")
	    return abs
	end
	if string.match( titel, "Abs. %d+") then
	    abs = string.match( titel, "Abs. %d+")
	    abs = string.match( abs, "%d+")
	    return abs
	end
	
	if string.match( titel, "Absatz %d+ %a ") then
	    abs = mw.text.trim(string.match( titel, "Absatz %d+ %a "))
	    abs = string.match( abs, "%d+ %a")
	    return abs
	end
	if string.match( titel, "Absatz %d+%a") then
	    abs = string.match( titel, "Absatz %d+%a")
	    abs = string.match( abs, "%d+%a")
	    return abs
	end
	if string.match( titel, "Absatz %d+") then
	    abs = string.match( titel, "Absatz %d+")
	    abs = string.match( abs, "%d+")
	    return abs
	end
	
	if string.match( titel, "Nr. %d+ %a ") then
	    abs = mw.text.trim(string.match( titel, "Nr. %d+ %a+ "))
	    abs = string.match( abs, "%d+ %a+")
	    return abs
	end
	if string.match( titel, "Nr. %d+%a") then
	    abs = string.match( titel, "Nr. %d+%a")
	    abs = string.match( abs, "%d+%a")
	    return abs
	end
	if string.match( titel, "Nr. %d+") then
	    abs = string.match( titel, "Nr. %d+")
	    abs = string.match( abs, "%d+")
	    return abs
	end
	if string.match( titel, "Nummer %d+ %a ") then
	    abs = mw.text.trim(string.match( titel, "Nummer %d+ %a+ "))
	    abs = string.match( abs, "%d+ %a+")
	    return abs
	end
	if string.match( titel, "Nummer %d+%a") then
	    abs = string.match( titel, "Nummer %d+%a")
	    abs = string.match( abs, "%d+%a")
	    return abs
	end
	if string.match( titel, "Nummer %d+") then
	    abs = string.match( titel, "Nummer %d+")
	    abs = string.match( abs, "%d+")
	    return abs
	end
end

function p.getSatz ( frame )
	local titel = mw.text.trim( frame.args[1] )
	local satz = ''
	if string.match( titel, "Satz %d+") then
	    satz = string.match( titel, "Satz %d+")
	    satz = string.match( satz, "%d+")
	    return satz
	end
end
---

--- Examples: "RzF - 1 - zu § 103a FlurbG", "RzF - 1 - zu § 10 Nr. 2 b FlurbG"
function p.sortierung ( frame )
	local paragraph = mw.text.trim( frame.args[1] ) -- "103a"
	local absatz = mw.text.trim( frame.args[2] ) -- "2 b"
	absatz = string.gsub( absatz, " ", "" ) -- "2b"
	local satz = mw.text.trim( frame.args[3] )
	local lfndNr = mw.text.trim( frame.args[4] )

	local chars = {
	'a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j', 'k', 'l',
	'm', 'n', 'o', 'p', 'q', 'r', 's', 't', 'u', 'v', 'w', 'x',
	'y', 'z'
	}
	local weight = 0;

	local paragraphEnd = string.sub( paragraph, -1 )
	local paragraphEndIndex = p.index_of( chars, paragraphEnd )
	if paragraphEndIndex > -1 then
	weight = weight + paragraphEndIndex / table.getn( chars )
	paragraph = string.sub( paragraph, 1, string.len( paragraph ) -1 )
	end
	local absatzEnd = string.sub( absatz, -1 )
	local absatzEndIndex = p.index_of( chars, absatzEnd )
	if absatzEndIndex > -1 then
	weight = weight + absatzEndIndex / table.getn( chars )
	absatz = string.sub( absatz, 1, string.len( absatz ) -1 )
	end

	local sort = 0
	sort =
		( paragraph * 1000000000 ) +
		( satz * 1000000 ) +
		( absatz * 1000 ) +
		lfndNr +
		weight
	sort = math.ceil( sort * 100 )
	return sort
end

function p.index_of ( tab, val )
	for index, value in ipairs(tab) do
		if value == val then
			return index
		end
	end

	return -1
end

-- RzF - {{SUBPAGENAME}} - zu {{BASEPAGENAME}} {{NAMESPACE}}
function p.anzeigename ( frame )
	local currentTitle = mw.title.getCurrentTitle()
	local subpagename = currentTitle.subpageText
	local paragraphAbsNrSatz = currentTitle.baseText
	local namespaceText = currentTitle.nsText

	return 'RzF - ' .. subpagename .. ' - zu ' .. paragraphAbsNrSatz .. ' ' .. namespaceText
end

-- {{#invoke:RzF|suchinfo|{{#var:displayTitle|}}|{{{paragraph|}}}|{{{absatz|}}}|{{{satz|}}}}}
function p.suchinfo ( frame )
	local displayTitle =  mw.text.trim( frame.args[1] )
	local paragraph =  mw.text.trim( frame.args[2] )
	local absatz =  mw.text.trim( frame.args[3] )
	local satz =  mw.text.trim( frame.args[4] )

	local paragraphPrefixes = { '§ ', '§', 'Par. ', 'Par.' }
	local absatzPrefixes = { 'Absatz ', 'Abs. ', 'Abs.' }
	local satzPrefixes = { 'Satz ', 'S. ', 'S.' }
	
	local currentBaseTitle = mw.title.getCurrentTitle().baseText
	if string.find( currentBaseTitle, "Nr" ) then
	   absatzPrefixes = { 'Nummer ', 'Nr. ', 'Nr ', 'Nr.' }
	end
	
	local text = ''
	for i, paragraphPrefix in ipairs(paragraphPrefixes) do
	  local paragraphText = ''
	  if not p.isempty(paragraph) then
	    paragraphText = paragraphPrefix .. paragraph .. ' '
	  end
	
	  for i, absatzPrefix in ipairs(absatzPrefixes) do
	    local absatzText = ''
	    if not p.isempty(absatz) then
	      absatzText = absatzPrefix .. absatz .. ' '
	    end
	
	    for i, satzPrefix in ipairs(satzPrefixes) do
	      local satzText = ''
	      if not p.isempty(satz) then
	        satzText = satzPrefix .. satz .. ' '
	      end
	      local allText = paragraphText .. absatzText .. satzText
	      if not string.find( text, allText ) then
			text = text .. allText
	      end
	    end
	  end
	end
	return text
end

function p.isempty( s )
  return s == nil or s == ''
end

return p

Rechtsprechung zur Flurbereinigung

Flurbereinigungsgesetz