Module:jugs-noun-cell

From Linguifex
Jump to navigation Jump to search

Documentation for this module may be created at Module:jugs-noun-cell/doc

local export = {}

local accel_forms = {
	--NEUTRALS
	nsi = "nom|s",
	nsd = "def|nom|s",
	npi = "nom|p",
	npd = "def|nom|p",
	asi = "acc|s",
	asd = "def|acc|s",
	api = "acc|p",
	apd = "def|acc|p",
	dsi = "dat|s",
	dsd = "def|dat|s",
	dpi = "dat|p",
	dpd = "def|dat|p",
	gsi = "gen|s",
	gsd = "def|gen|s",
	gpi = "gen|p",
	gpd = "def|gen|p",
	
	--LAUDATIVES
	nsi_la = "nom|s|la",
	nsd_la = "def|nom|s|la",
	npi_la = "nom|p|la",
	npd_la = "def|nom|p|la",
	asi_la = "acc|s|la",
	as_lad = "def|acc|s|la",
	api_la = "acc|p|la",
	apd_la = "def|acc|p|la",
	dsi_la = "dat|s|la",
	dsd_la = "def|dat|s|la",
	dpi_la = "dat|p|la",
	dpd_la = "def|dat|p|la",
	gsi_la = "gen|s|la",
	gsd_la = "def|gen|s|la",
	gpi_la = "gen|p|la",
	gpd_la = "def|gen|p|la",
	
	--PEJORATIVES
	nsi_pej = "nom|s|pej",
	nsd_pej = "def|nom|s|pej",
	npi_pej = "nom|p|pej",
	npd_pej = "def|nom|p|pej",
	asi_pej = "acc||pej",
	asd_pej = "def|acc|s|pej",
	api_pej = "acc|p|pej",
	apd_pej = "def|acc|p|pej",
	dsi_pej = "dat|s|pej",
	dsd_pej = "def|dat|s|pej",
	dpi_pej = "dat|p|pej",
	dpd_pej = "def|dat|p|pej",
	gsi_pej = "gen|s|pej",
	gs_pejd = "def|gen|s|pej",
	gpi_pej = "gen|p|pej",
	gpd_pej = "def|gen|p|pej",
}

function export.create(frame)
	local args = frame:getParent().args
	local out = {}
	if not args[1] or args[1] == "" then
		return "―"
	else
		local accel_form = args[2]
		local accel
		if accel_form then
			local mode = args[3]
			if mode and mode_prefix[mode] then
				accel_form = mode_prefix[mode] .. accel_form
			end
			if accel_forms[accel_form] then
				if mode and mode_prepend[mode] then
					accel_form = mode_prepend[mode] .. accel_forms[accel_form]
				else
					accel_form = accel_forms[accel_form]
				end
			end
			accel = {form = accel_form}
		end
		local words = mw.text.split(args[1], "%s*,%s*")
		if words then
			for i,j in ipairs(words) do
				table.insert(out, args[1])
			end
		end
	end
	return table.concat(out, ", ")
end

return export