Module:hi

विक्षनरी से

"इस मॉड्यूल हेतु प्रलेख Module:hi/doc पर बनाया जा सकता है"

local export = {}

local lang = require("Module:languages").getByCode("hi")
local m_translit = require("Module:hi-translit")
local rsplit = mw.text.split
local gsub = mw.ustring.gsub
local sub = mw.ustring.sub

--From [[Module:th]]
function export.new(frame)
	local title = mw.title.getCurrentTitle().text
	local args = frame:getParent().args
	local pos = args[1] or ""
	local def = args[2] or "{{rfdef|hi}}"
	local pos2 = args[3] or (args[4] and "" or false)
	local def2 = args[4] or "{{rfdef|hi}}"
	local pos3 = args[5] or (args[6] and "" or false)
	local def3 = args[6] or "{{rfdef|hi}}"
	local etym = args["e"] or false
	local head = args["head"] or false
	local pron = args["pron"] or false
	local g = args["g"] or false
    local g2 = args["g2"] or false
    local g3 = args["g3"] or false
    local decl = args["decl"] or false
	local conj = args["conj"] or false -- conjugation stuff
    local t = args["t"] or false
    local c = args["c"] or args["cat"] or false
    local ref = args["ref"] or false
    local pp = args["pp"] or false --perfect participle

	local result = ""
	
	local function genTitle(text)
		local pos_title = {
			[""] = "संज्ञाएँ", ["n"] = "संज्ञाएँ", ["pn"] = "व्यक्तिवाचक संज्ञाएँ", ["propn"] = "व्यक्तिवाचक संज्ञाएँ", ["pron"] = "सर्वनाम",
			["v"] = "क्रियाएँ", ["a"] = "विशेषण", ["adj"] = "विशेषण", ["det"] = "डेटरमाइनर", ["adv"] = "क्रिया-विशेषण",
			["prep"] = "Preposition", ["postp"] = "Postposition", ["post"] = "Postposition", ["con"] = "Conjunction",
			["part"] = "Particle", ["suf"] = "Suffix", ["pref"] = "Prefix",
			["prov"] = "Proverb", ["id"] = "Idiom", ["ph"] = "Phrase", ["intj"] = "Interjection", ["interj"] = "Interjection",
			["num"] = "Numeral", ["abb"] = "Abbreviation", ["conj"] = "Conjunction",
            ["adj-form"] = "Adjective", ["verb-form"] = "Verb", ["noun-form"] = "Noun",
            ["pp"] = "Perfect participle",
		};
		return pos_title[text] or mw.ustring.upper(sub(text, 1, 1)) .. sub(text, 2, -1)
	end
	
	local function genHead(text)
		local pos_head = {
			[""] = "संज्ञाएँ", ["n"] = "संज्ञाएँ", ["pn"] = "व्यक्तिवाचक संज्ञाएँ", ["propn"] = "व्यक्तिवाचक संज्ञाएँ", ["v"] = "क्रियाएँ", ["a"] = "adj", ["adv"] = "adv",
			["postp"] = "post", ["prep"] = "prep", ["conj"] = "con", ["pron"] = "pron",
			["intj"] = "interj", ["pp"] = "perfect participle",
		};
		return pos_head[text] or text
	end
	
	local function other(class, title, args)
		local code = ""
		if args[class] then
			code = code .. "\n\n===" .. title .. "===\n* {{l|hi|" .. args[class] .. "}}"
			
			if args[class .. "2"] then
				code = code .. "\n* {{l|hi|" .. args[class .. "2"] .. "}}"
				
				if args[class .. "3"] then
					code = code .. "\n* {{l|hi|" .. args[class .. "3"] .. "}}"
					
					if args[class .. "4"] then
						code = code .. "\n* {{l|hi|" .. args[class .. "4"] .. "}}"
					end
				end
			end
		end
		return code
	end
	
	-- header
	result = result .. "==हिंदी=="
	
	-- Wikipedia
	if args["wp"] then result = result .. "\n{{wikipedia|lang=hi}}" end
	
	-- Alternative forms
	result = result .. other("alt", "अन्य वैकल्पिक रूप", args)
	
	-- Etymology
	if etym then etym = mw.ustring.gsub(etym, "^%<", "से") end
	if etym then result = result .. "\n\n===व्युत्पत्ति===\n" .. etym end
	
	-- Pronunciation
	if pron then
		result = result .. "\n\n===उच्चारण===\n* {{hi-IPA" .. ((pron ~= title and pron ~= "") and ("|" .. gsub(pron, ",", "|")) or "") .. "}}"
	else
		result = result .. "\n\n===उच्चारण===\n* {{hi-IPA}}"
	end
	result = result .. "\n\n===" .. genTitle(pos) .. "===\n{{hi-" .. genHead(pos) .. (head and ("|head=" .. head) or "") .. (g and ("|g=" .. g) or "") .. (t and ("|" .. t) or "") .. (pp and ("|" .. pp) or "") .. "}}\n\n# " .. def
    
    -- Morphology
    if decl and decl ~= "" then
    	if pos == "a" or pos == "adj" or pos == "det" then
    		result = result .. "\n\n====Declension====\n{{hi-adecl" .. ((decl == "1" or decl =="y" or decl == "yes") and "" or "|" .. decl) .. "}}"
    	else
    		result = result .. "\n\n====Declension====\n{{hi-ndecl|" .. decl .. "}}"
		end
	end
    if pos == "v" then
    	result = result .. "\n\n====Conjugation====\n{{hi-conj" .. (conj and "|" .. conj or "") .. "}}"
    end
	
	-- Other
	result = result .. other("syn", "=पर्यायवाची=", args)
	result = result .. other("ant", "=विपरीतार्थी=", args)
	result = result .. other("der", "=व्युत्पन्न टर्म=", args)
	result = result .. other("also", "=यह भी देखें=", args)
	
	-- Actual Entry
	if pos2 then
		result = result .. "\n\n===" .. genTitle(pos2) .. "===\n{{hi-" .. genHead(pos2) .. (head and ("|head=" .. head) or "") .. (g2 and ("|g=" .. g2) or "") .. "}}\n\n# " .. def2
	end
	
	if pos3 then
		result = result .. "\n\n===" .. genTitle(pos3) .. "===\n{{hi-" .. genHead(pos3) .. (head and ("|head=" .. head) or "")  .. (g3 and ("|g=" .. g3) or "") .. "}}\n\n# " .. def3
	end
    
    -- categories and references
    if ref and ref ~= "" then
    	result = result .. "\n\n===संदर्भ===\n* {{R:hi:McGregor" .. (ref and ("|" .. ref) or "") .."}}"
    elseif ref == "" then
    	result = result .. "\n\n===संदर्भ===\n* {{R:hi:McGregor}}"
    end
    
    if c then
    	result = result .. "\n\n{{topics|hi" .. ((c ~= title and c ~= "") and ("|" .. gsub(c, ",", "|")) or "") .. "}}"
    end
	
	return result
end


function export.usex(frame) --from [[Module:ne-utilities]] by [[User:Wyang]]
	local args = frame:getParent().args
	local params = {
		[1] = {required = true},
		[2] = {},
		["t"] = {alias_of = 2},
		["translation"] = {alias_of = 2},
		["tr"] = {},
		["transliteration"] = {alias_of = "tr"},
		["noinline"] = {type = "boolean"},
		["subst"] = {},
	}
	local args, restargs = require("Module:parameters").process(frame:getParent().args, params, "return unknown")
	local example = args[1]
	local translation = args[2]
	local subbed_example = require("Module:links").remove_links(example)
	if args.subst then
		local substs = rsplit(args.subst, ",")
		for _, subpair in ipairs(substs) do
			local subsplit = rsplit(subpair, subpair:find("//") and "//" or "/")
			subbed_example = gsub(subbed_example, subsplit[1], subsplit[2])
		end
	end
	local translit = args["tr"] or m_translit.tr(subbed_example, "hi", "Deva")
	local formatted = gsub(example, "'''(.-)'''", "<span style=\"background&#45;color:#FEF8EA\"><b>%1</b></span>")

	local template
	if mw.ustring.len(example) > 30 or args["noinline"] then
		template = "ux"
	else
		template = "uxi"
	end
	restargs[1] = "hi"
	restargs[2] = formatted
	restargs[3] = translation
	restargs["tr"] = translit
	return frame:expandTemplate{ title = template, args = restargs}
end

function export.hi_format(text)
	text = ('<span lang="hi" class="Deva">[[%s]]</span>'):format(text)
	return text
end

function export.wordify(text)
	local words, translits = {}, {}
	for word in mw.text.gsplit(text, ",") do
		table.insert(words, export.hi_format(word))
		word = gsub(word, "%]%] %[%[", " ")
		table.insert(translits, m_translit.tr(word, "hi", "Deva"))
	end
	text = table.concat(words, ", ") .. "<br><span style=\"color:#888\">" ..
		table.concat(translits, ", ") .. "</span>"
	return text
end

return export