Module:Sandbox/Subscriptshoe9

--Subscriptshoe9 Google Code-in 2019, Introduction to Lua in Wikipedia

local p = {}

--Task 2 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 .. ". " end

--Task 3 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 Fahrenheit. " if    cels > 9 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 " for   i    = 1, 12 do out = out..numb .. " times " ..i.. " is equal to " ..i * numb.. ". " 	end return out end

function p.people(frame) local friends = {"Agnetha", "Betty", "Carlos", "Davinder", "Eloise", "James", "Emily", "Cindy", "Eleni"} local msg     = "" for   i       = 1,#friends do msg    = msg .. "Hello " .. friends[i] .. " "	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 .. " Day = " .. d .. " 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 .. " "		count = count + 1 end return out .. " = " .. count .. " languages" end

function p.fallbacklangs(frame) local code = frame.args.langcode or "zh" local answer = mw.language.getFallbacksFor(code) local out = "" for a, b in pairs(answer) do out = out .. a .. " --> " .. b .. " "	end return "Code = " .. code .. " " ..out end

p.pgtitle = function( frame ) local title = frame.args.title local ttlobj = mw.title.new( title ) local txt = ttlobj.text return txt end

function p.pginfo(frame) local out = "" local title =  frame.args.title local pginfo = mw.title.new( title ) if   pginfo == nil then return "The Page Name is invalid.(頁面標題係為無效值. )"

end if   pginfo.text ~= title then out     = out.." does not exist and is not a redirect.(頁面並不存在亦非重定向頁面. )" return "The page you want to enter"..out

end if     pginfo.exists     == false then   out                = out.. " does not exist and is not a redirect.(頁面並不存在亦非重定向頁面. )" else if pginfo.isRedirect == true then   out                = out.." exists and is a redirect.(頁面存在且為重定向頁面. )" else   out                = out.." exists and is not a redirect.(頁面存在但非重定向頁面. )"

end end return title..out end

return p