Module:Sandbox/DavNvro

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

-- Task #2: Working with modules

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

-- Task #3: Calculations and tests

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

-- Task #4: Loops and tables

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", "Bob", "Robbie", "Tim"} local msg = "" for i = 1, #friends do msg = msg .. "Hello " .. friends[i] .. " "	end return msg end

-- Task #5: Lua libraries

function p.sent(frame) local txt = frame.args.text or "" return string.upper(string.sub(txt, 1, 1))..string.sub(txt, 2) 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: MediaWiki libraries

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 lang = frame.args.langcode or "en"; local fallbacks = mw.language.getFallbacksFor(lang); local out = ""; for i = 1, #fallbacks do		local fallbackLang = fallbacks[i] out = out..fallbackLang.." - "..mw.language.fetchLanguageName(fallbackLang, fallbackLang).." " end out = "Language fallbacks for "..mw.language.fetchLanguageName(lang, "en").." ("..mw.language.fetchLanguageName(lang, lang)..") are: "..out 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

function p.pginfo(frame) local pageTitle = frame.args.title or "" local page = mw.title.new(pageTitle) if page == nil then return "invalid title" end local out = page.text.." " if page.exists then out = out.."exists " else out = out.."does not exist " end out = out.."and is " if not page.isRedirect then out = out.."not " end out = out.."a redirect" return out end

return p