모듈:High-use

-- 번역 미완료
local p = {}
-- _fetch looks at the "demo" argument.
local _fetch = require('Module:Transclusion_count').fetch
local yesno = require('Module:Yesno')
function p.num(frame, count)
	if count == nil then
		if yesno(frame.args'fetch') == false then
			if (frame.args1 or ) ~=  then count = tonumber(frame.args1) end
		else
			count = _fetch(frame)
		end
	end
	
	-- Build output string
	local return_value = ""
	if count == nil then
		if frame.args1 == "risk" or frame.args1 == "위험" then
			return_value = "아주 많은"
		else
			return_value = "많은"
		end
	else
		-- Use 2 significant figures for smaller numbers and 3 for larger ones
		local sigfig = 2
		if count >= 100000 then
			sigfig = 3
		end
		
		-- Prepare to round to appropriate number of sigfigs
		local f = math.floor(math.log10(count)) - sigfig + 1
		
		-- Round and insert "approximately" or "+" when appropriate
		if (frame.args2 == "yes") or (frame.args2 == "예") or (mw.ustring.sub(frame.args1,-1) == "+") then
			-- Round down
			return_value = string.format("%s+", mw.getContentLanguage():formatNum(math.floor( (count / 10^(f)) ) * (10^(f))) )
		else
			-- Round to nearest
			return_value = string.format("대략 %s개", mw.getContentLanguage():formatNum(math.floor( (count / 10^(f)) + 0.5) * (10^(f))) )
		end
		-- Insert percentage of pages if that is likely to be >= 1% and when |no-percent= not set to yes
		if count and count > 250000 and not yesno (frame:getParent().args'no-percent') then
			local percent = math.floor( ( (count/frame:callParserFunction('NUMBEROFPAGES', 'R') ) * 100) + 0.5)
			if percent >= 1 then
				return_value = string.format("%s pages, or roughly %s%% of all", return_value, percent)
			end
		end	
	end
	
	return return_value
end
-- Actions if there is a large (greater than or equal to 100,000) transclusion count
function p.risk(frame)
	local return_value = ""
	if frame.args1 == "위험" or frame.args1 == "risk" then
		return_value = "위험"
	else
		local count = _fetch(frame)
		if count and count >= 100000 then return_value = "위험" end
	end
	return return_value
end
function p.text(frame, count)
	-- Only show the information about how this template gets updated if someone
	-- is actually editing the page and maybe trying to update the count.
	local bot_text = (frame:preprocess("") == "") and "\n\n----\n미리 보기 메시지: Transclusion count updated automatically (see documentation)." or 
	
	if count == nil then
		if yesno(frame.args'fetch') == false then
			if (frame.args1 or ) ~=  then count = tonumber(frame.args1) end
		else
			count = _fetch(frame)
		end
	end
	local title = mw.title.getCurrentTitle()
	if title.subpageText == "설명문서" or title.subpageText == "연습장" then
		title = title.basePageTitle
	end
	
	local systemMessages = frame.args'system' or frame.args'시스템'
	if ( frame.args'system' ==  or frame.args'시스템' ==  ) then
		systemMessages = nil
	end
	
	-- This retrieves the project URL automatically to simplify localiation.
	local templateCount = (' %s 문서에서'):format(
		mw.title.getCurrentTitle():fullUrl():gsub('//(.-)/.*', '%1'),
		mw.uri.encode(title.fullText), p.num(frame, count))
	local used_on_text = "이 " .. (mw.title.getCurrentTitle().namespace == 828 and "루아 모듈" or "틀") .. '은 ';
	if systemMessages then
		used_on_text = used_on_text .. systemMessages ..
			((count and count > 2000) and (", and " .. templateCount) or (""))
	else
		used_on_text = used_on_text .. templateCount .. ""
	end
	used_on_text = used_on_text .. ' 사용 중인 틀입니다'
	
	
	local sandbox_text =  ("%s의 /연습장 또는 /시험장 하위 문서 또는 사용자의 %s. "):format(
		(mw.title.getCurrentTitle().namespace == 828 and "모듈" or "틀"),
		title.fullText, title.fullText,
		mw.title.getCurrentTitle().namespace == 828 and "모듈:연습장|모듈 연습장" or "위키백과:사용자 문서|사용자 하위 문서"
	)
	
	local infoArg = ( frame.args"info" ~= "" or frame.args"정보" ~= "" ) and frame.args"info" or frame.args"정보"
	if (systemMessages or frame.args1 == "risk" or frame.args1 == "위험" or (count and count >= 100000) ) then
		local info = systemMessages and '.변경 시 위키백과 사용자 인터페이스에 즉각 변화를 줄 수 있습니다.' or '.'
		if infoArg then
			info = info .. "" .. infoArg
		end
		sandbox_text = info .. ' 심각한 혼란 문제' ..
			(count and count >= 100000 and '와 중대한 서버의 부하 문제' or ) ..
			'를 막기 위해, any changes should be tested in the ' .. sandbox_text ..
			'The tested changes can be added to this page in a single edit. '
	else
		sandbox_text = (infoArg and ('.' .. infoArg .. ' C') or ' and c') ..
			'hanges may be widely noticed. Test changes in the ' .. sandbox_text
	end
	
	local discussion_text = systemMessages and 'Please discuss changes ' or 'Consider discussing changes '
	if frame.args"2" and frame.args"2" ~= "" and frame.args"2" ~= "yes" then
		discussion_text = string.format("%sat %s", discussion_text, frame.args"2")
	else
		discussion_text = string.format("%son the talk page", discussion_text, title.talkPageTitle.fullText )
	end
	
	return used_on_text .. sandbox_text .. discussion_text .. " before implementing them." .. bot_text
end
function p.main(frame)
	local count = nil
	if yesno(frame.args'fetch') == false then
		if (frame.args1 or ) ~=  then count = tonumber(frame.args1) end
	else
		count = _fetch(frame)
	end
	local image = "link="
	local type_param = "style"
	local epilogue = 
	if frame.args'system' and frame.args'system' ~=  then
		image = "link="
		type_param = "content"
		local nocat = frame:getParent().args'nocat' or frame.args'nocat'
		local categorise = (nocat ==  or not yesno(nocat))
		if categorise then
			epilogue = frame:preprocess()
		end
	elseif ( (frame.args1 == "risk" or frame.args1 == "위험") or (count and count >= 100000)) then
		image = "link="
		type_param = "content"
	end
	
	if frame.args"form" == "editnotice" then
		return frame:expandTemplate{
				title = 'editnotice',
				args = {
						"image" = image,
						"text" = p.text(frame, count),
						"expiry" = (frame.args"expiry" or "")
				}
		} .. epilogue
	else
		return require('Module:Message box').main('ombox', {
			type = type_param,
			image = image,
			text = p.text(frame, count),
			expiry = (frame.args"expiry" or "")
		}) .. epilogue
	end
end
return p