imported>Melvintong1516 at 17:59, 20 January 2020

2020-01-20T17:59:09Z

New page

--Melvintong1516 - Google Code-in 2019, Introduction to Lua in Wikipedia
--Lua 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

p.converttemp = function(frame)
cels = tonumber(frame.args.celsius) or 0
fahr = (cels*9)/5+32
if cels>9 then msg = "It is warm." else msg="It is cold." end
msg = msg .. " " .. cels .. " degrees Celsius is " .. fahr .. " degrees Fahrenheit"
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 .. " equals " .. i * numb .. " "
end
return out
end

function p.people(frame)
local friends = {"Agnetha", "Betty", "Carlos", "Davinder", "Eloise", "Fiona", "George", "Hugo"}
local msg = ""
for l = 1, #friends do
msg = msg .. "Hello " .. friends[l] .. " "
end
return msg
end

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

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 langcode = frame.args.langcode
local msg = ""
local fallback = mw.language.getFallbacksFor( langcode )
for l = 1, #fallback do
msg = langcode.. msg .. l .. ". " .. fallback[l] .. " "
end
return msg
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 title = frame.args.title
local ttlobj = mw.title.new(title)
local msg1 = ""
local msg2 = ""
if ttlobj == nil then
error_msg = "The value input is invalid"
return error_msg
else
local exists = ttlobj.exists
local redirect = ttlobj.isRedirect
if exists == true then
msg1 = " exist "
else
msg1 = " does not exist "
end
if redirect == true then
msg2 = " is a redirect "
else
msg2 = " is not a redirect "
end
local txt = ttlobj.text
local msg = txt .. msg1 .. " and " .. msg2
return msg
end
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 dmy = string.sub(valtbl[1].mainsnak.datavalue.value.time, 2, 11)
return dmy
end

p.getfulldate = function(frame)
local qid = frame.args.qid
local prop = frame.args.prop
local monthname = { "January", "February", "March", "April", "May", "June", "July", "August", "September", "October", "November", "December" }
local valtbl = mw.wikibase.getBestStatements(qid, prop)
local dmyinfo = string.sub(valtbl[1].mainsnak.datavalue.value.time, 2, 11)

local y, m, d = string.match(dmyinfo, "(%d+)-(%d+)-(%d+)")
local month = monthname[tonumber(m)]
return d .. " " .. month .. " " .. y
end

p.getitem = function(frame)
local qid = frame.args.qid
local prop = frame.args.prop
local valtbl = mw.wikibase.getBestStatements(qid, prop)
local id = valtbl[1].mainsnak.datavalue.value.id
local idw = mw.wikibase.getLabel(id)
return idw
end

return p

Module:Sandbox/Melvintong1516 - Revision history

imported>Melvintong1516 at 17:59, 20 January 2020