Module:th-headword

Hello, you have come here looking for the meaning of the word Module:th-headword. In DICTIOUS you will not only get to know all the dictionary meanings for the word Module:th-headword, but we will also tell you about its etymology, its characteristics and you will know how to say Module:th-headword in singular and plural. Everything you need to know about the word Module:th-headword you have here. The definition of the word Module:th-headword will help you to be more precise and correct when speaking or writing your texts. Knowing the definition ofModule:th-headword, as well as those of other words, enriches your vocabulary and provides you with more and better linguistic resources.
The following documentation is located at Module:th-headword/documentation.
Useful links: subpage list • links • transclusions • testcases • sandbox (diff)
This module needs documentation.
Please document this module by describing its purpose and usage on the documentation page. 

local export = {}
local pos_functions = {}

local lang = require("Module:languages").getByCode("th")
local script = require('Module:scripts').getByCode("Thai")
local PAGENAME = mw.title.getCurrentTitle().text
local pron = require("Module:th-pron")

function export.show(frame)

	local args = frame:getParent().args
	local poscat = frame.args or error("Part of speech has not been specified. Please pass parameter 1 to the module invocation.")
	
	local data = {lang = lang, sc = script, pos_category = poscat, categories = {}, heads = {args}, inflections = {}, sort_key = args}
	
	if args then
		table.insert(data.categories, "Thai " .. args)
	end
	if args then
		table.insert(data.categories, "Thai " .. args)
	end
	
	if pos_functions then
		pos_functions(args, data)
	end
	
	local content = mw.title.new(PAGENAME):getContent()
	if content then
		local phon
		local code = mw.ustring.match(content, '{{th%-pron*}}')
		local false_positive = mw.ustring.match(content, 'note=') or mw.ustring.match(content, 'obsolete spelling of') or mw.ustring.match(content, 'obsolete form of') or mw.ustring.match(content, 'alternative spelling of') or mw.ustring.match(content, 'archaic spelling of') or mw.ustring.match(PAGENAME, 'Unsupported')
	
		if not code then
			phon = args or args or "-"
			data.translits = {pron.translit(phon , "th", "Thai", "paiboon")}
			if not false_positive then
				table.insert(data.categories, "Thai terms without th-pron template")
			end
		else
			phon = args or args or mw.ustring.match(code, '|(+)') or PAGENAME -- detects only first one
			data.translits = {pron.translit(phon, "th", "Thai", "paiboon")}
		end
		
		local code2 = mw.ustring.match(content, '{{audio|th|*}}')
		if code2 then
			table.insert(data.categories, "Thai terms with redundant audio template")
		end
	end
	
	if mw.ustring.match(PAGENAME, '.-(รร)$') or mw.ustring.match(PAGENAME, '.-(รร).-') then
		if PAGENAME ~= 'วงจรรวม' and PAGENAME ~= 'สรรวง' then
			table.insert(data.categories, "Thai terms spelled with รร")
		end
	end
	
	local letter = true
	local specialLetter = mw.ustring.gmatch(PAGENAME, '.-(ๅ?).-')
	while true do
		letter = specialLetter()
		if (not letter) then break end
		table.insert(data.categories, "Thai terms spelled with " .. letter)
	end
	local specialLetter2 = mw.ustring.gmatch(PAGENAME, '.-().-')
	while true do
		letter = specialLetter2()
		if (not letter) then break end
		if letter == "๊" or letter == "๋" or letter == "็" then
			table.insert(data.categories, "Thai terms spelled with ◌" .. letter) -- add dotted circle for above/below marks
		else
			table.insert(data.categories, "Thai terms spelled with " .. letter)
		end
		if letter == "ๆ" and PAGENAME ~= "ๆ" then
			table.insert(data.categories, "Thai reduplications")
		end
	end
	--"Category:Thai terms spelled with ทร read as ซ" is detected in Module:th-pron
	local specialLetter3 = mw.ustring.gmatch(PAGENAME, '.-(์).-')  -- I or U + KARAN
	while true do
		letter = specialLetter3()
		if (not letter) then break end
		table.insert(data.categories, "Thai terms spelled with ◌" .. letter)
	end
	if mw.ustring.find(PAGENAME, '') then
		table.insert(data.categories, "Thai terms spelled with numbers")
	end

	return require("Module:headword").full_headword(data)

end

pos_functions = function(args, data)

	local classifiers = {label = "classifier"}

	if args then
		for _,par in ipairs(args) do
			if par == "*" then
				table.insert(classifiers, PAGENAME) -- shorthand
				table.insert(data.categories, "Thai classifiers")
				table.insert(data.categories, "Thai nouns classified by " .. PAGENAME)
			else
				table.insert(classifiers, par)
				table.insert(data.categories, "Thai nouns classified by " .. par)
			end
		end
		table.insert(data.inflections, classifiers)
	end

end

pos_functions = function(args, data)

	local par1 = args; if par1 == "" then par1 = nil end
	local par2 = args; if par2 == "" then par2 = nil end
	local par3 = args; if par3 == "" then par3 = nil end
	local abstract_forms = {label = "abstract noun", accel = {pos = "noun", form = "abstract-noun"}}

	if par1 ~= "-" then
		if not par1 then
			table.insert(abstract_forms, "การ" .. PAGENAME)
		else
			if par1 == "~" then
				table.insert(abstract_forms, "การ" .. PAGENAME)
				table.insert(abstract_forms, "ความ" .. PAGENAME)
			else
				table.insert(abstract_forms, par1)
				table.insert(abstract_forms, par2)
				table.insert(abstract_forms, par3)
			end
		end
		table.insert(data.inflections, abstract_forms)
	end

end

pos_functions = function(args, data)

	local par1 = args; if par1 == "" then par1 = nil end
	local par2 = args; if par2 == "" then par2 = nil end
	local par3 = args; if par3 == "" then par3 = nil end
	local abstract_forms = {label = "abstract noun", accel = {pos = "noun", form = "abstract-noun"}}

	if par1 ~= "-" then
		if not par1 then
			table.insert(abstract_forms, "ความ" .. PAGENAME)
		else
			table.insert(abstract_forms, par1)
			table.insert(abstract_forms, par2)
			table.insert(abstract_forms, par3)
		end
		table.insert(data.inflections, abstract_forms)
	end

end

-- same logic
pos_functions = pos_functions
-- same logic
pos_functions = pos_functions

return export
Wikious
Boobota
Sagapedia