Editing Module:Sandbox/Dwu1011

--dwu1011  Google Code-in 2019, Introduction to Lua in Wikipedia
local p = {}

function p.hello( frame )
	return "Hello, world!"
end

p.Hi = function(frame)
	strName = frame.args.name or "Jimmy"
	return "Hello from Lua to my friend " .. strName .. ".<br>"
end

function p.converttemp(frame)
	cels = tonumber(frame.args.celsius) or 0
	fahr = cels*9/5+32
	msg = cels.." degrees Celsius is "
	msg = msg.. fahr.." degrees farenheit."
	if cels > 0 then msg = msg.." it is warm" else msg = msg.." it is cold"end
	return msg
end

--Task 4
function p.timestable(frame)
	local numb = tonumber( frame.args.numb ) or 2
	local out = numb.." Times table<br>"
	for i = 1, 12 do
		out = out..numb .. " times "..i.." is equal to "..i*numb.."<br>"
 	end
 	return out
end

function p.people(frame)
 	local friends = {"Agnetha", "Betty", "Carlos", "Davinder", "Eloise", "David","Sarah","Luke"}
 	local msg = ""
 	for i = 1,#friends do
 		msg = msg.."Hello " .. friends[i] .. "<br>"
 	end
 	return msg
 end
--task 5
function p.sent(frame)
 	local txt = frame.args.text or ""
 	local out = string.upper(string.sub(txt,1,1))..string.sub(txt, 2)
 	return out
 end
 
function p.unpack(frame)
 	local dmy = frame.args.dmydate or ""
 	local d, m, y = string.match(dmy, "(%d+) (%w+) (%d+)")
 	return "Year = " .. y .. "<br>Day = " .. d .. "<br>Month = " .. m
end
--task 6
function p.langs(frame)
  	local langslist = mw.language.fetchLanguageNames()
  	local out = ""
  	local count = 0
 	for k, v in pairs(langslist) do
 		out = out .. k .. " - " .. v .. "<br>"
 		count = count + 1
 	end
	return out .. "<br>= " .. count .. " languages"
 end
 
 function p.fallbacks(frame)
 	local langcode = frame.args.langcode
 	local fallbacklist =mw.language.getFallbacksFor( langcode )
 	local out = ""
 	for k, v in pairs(fallbacklist) do
 		out = out .. k .. " - " .. v .. "<br>"
 	end
 	return out
 end
 p.pgtitle = function( frame )
 	local title = frame.args.title
 	local ttlobj = mw.title.new( title )
 	local txt = ttlobj.text
 	return txt
 end
 
 p.pginfo = function(frame)
 	local titl = frame.args.title or "no"
 	local ttlobj = mw.title.new(titl)
 	msg = ""
 	if ttlobj.exists then msg = msg..titl.." does exist and " else msg = msg..titl .." does not exist and " end
 	if ttlobj.isRedirect then msg = msg .. titl .. " is a redirect" else msg = msg..titl.." is not a redirect" end
 	
 	
 	return msg
 end
 
 --get date
 p.getdate = function(frame)
 	local qid = frame.args.qid 
 	local prop = frame.args.prop
 	local valtbl = mw.wikibase.getBestStatements(qid, prop)
 	local timestamp = valtbl[1].mainsnak.datavalue.value.time
 	local date = string.sub(timestamp, 2,11)
 	return date
 end
 function p.getfulldate(frame)
 	local monthname = { "January", "February", "March", "April", "May", "June", "July", "August", "September", "October", "November", "December" }
 	local qid = frame.args.qid 
 	local prop = frame.args.prop
 	local valtbl = mw.wikibase.getBestStatements(qid, prop)
 	local timestamp = valtbl[1].mainsnak.datavalue.value.time
 	local date = string.sub(timestamp, 2,11)
 	local msg = ""
 	local y,m,d = string.match(date,"(%d+)-(%d+)-(%d+)")
 	msg= msg .. monthname[tonumber(m)] .. " "..d.." "..y
 	return msg
 end
 function p.getitem(frame)
 	local qid = frame.args.qid
 	local prop = frame.args.prop
 	local valtbl = mw.wikibase.getBestStatements(qid, prop)
 	local idd = valtbl[1].mainsnak.datavalue.value.id
 	local cause = mw.wikibase.getLabel(idd)
 	
 	return cause
 end
return p