Modul:Fak wisen

Die Dokumentation für dieses Modul kann unter Modul:Fak wisen/Doku erstellt werden

local export = {}

local function kategorie_maken(args, kategorienaome)
	local kategorien = ""
	local i = 1
	
	while args[i] do
		kategorien = kategorien .. "[[Kategorie:" .. args[i] .. ":" .. kategorienaome .. "]]"
		i = i+1
	end
	return kategorien
end

function export.agr(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''(Anatomie)''" .. kategorie_maken(args, "Anatomie")

	return term
end

function export.agr(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''(Bueri)''" .. kategorie_maken(args, "Landweertschop")

	return term
end

function export.ana(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''(Anatomie)''" .. kategorie_maken(args, "Anatomie")

	return term
end

function export.ast(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''(Astronomie)''" .. kategorie_maken(args, "Astronomie")

	return term
end

function export.ber(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''(Beroop)''" .. kategorie_maken(args, "Beroop")

	return term
end

function export.bot(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''(Planten)''" .. kategorie_maken(args, "Planten")

	return term
end

function export.chem(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''(Chemie)''" .. kategorie_maken(args, "Chemie")

	return term
end

function export.chr(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''(Christendom)''" .. kategorie_maken(args, "Christendom")

	return term
end

function export.geo(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''(Geografie)''" .. kategorie_maken(args, "Geografie")

	return term
end

function export.gro(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''(Gröönworen)''" .. kategorie_maken(args, "Gröönworen")

	return term
end

function export.han(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''(Hannel)''" .. kategorie_maken(args, "Fakbegriëpe (Kauplüde)")

	return term
end

function export.jur(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''(Rächt)''" .. kategorie_maken(args, "Fackbegrepen (Juristeree)")

	return term
end

function export.kle(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''(Kledage)''" .. kategorie_maken(args, "Kledage")

	return term
end

function export.koek(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''(Köcke)''" .. kategorie_maken(args, "Köken")

	return term
end

function export.lin(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''(Spraokläre)''" .. kategorie_maken(args, "Fackbegrepen (Spraakwetenschop)")

	return term
end

function export.med(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''(Medsien)''" .. kategorie_maken(args, "Medizin")

	return term
end

function export.phy(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''(Füsik)''" .. kategorie_maken(args, "Physik")

	return term
end

function export.psy(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''(Psüchologie)''" .. kategorie_maken(args, "Psychologie")

	return term
end

function export.rel(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''(Reljon)''" .. kategorie_maken(args, "Religioon")

	return term
end

function export.spi(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''(Spiesen)''" .. kategorie_maken(args, "Spiesen")

	return term
end

function export.tek(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''(Teknik)''" .. kategorie_maken(args, "Technik")

	return term
end

function export.tem(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''(Tiet)''" .. kategorie_maken(args, "Tiet")

	return term
end

function export.war(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''(Warktüüch)''" .. kategorie_maken(args, "Warktüüch")

	return term
end

function export.zoo(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''(Zoologie)''" .. kategorie_maken(args, "Deerten")

	return term
end

-- nur hier angehängt, da im Prinzip selbe Funktion wie oben 

local function kategorie_maken_sproke_ausgeschrieben(args, kategorienaome)
	local kategorien = ""
	local i = 1
	
	while args[i] do
		kategorien = kategorien .. "[[Kategorie:" .. require("Modul:languages").getByCode(args[i]):getCanonicalName() .. " " .. kategorienaome .. "]]"
		i = i+1
	end
	return kategorien
end

function export.refl(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''reflexiv''" .. kategorie_maken_sproke_ausgeschrieben(args, "Reflexive Verben")

	return term

end

function export.tran(frame)
	local args = frame:getParent().args
	local lang = args[1]; if lang == "" then lang = nil end

	if not lang then
		if mw.title.getCurrentTitle().nsText == "Vörlaag" then
			lang = "und"
		else
			error("Du häs de Spraoke nich angiëwen.")
		end
	end

	local term = "''transitiv''" .. kategorie_maken_sproke_ausgeschrieben(args, "Transitive Verben")

	return term

end

return export