Module:Sandbox/Sameboat/m1: Difference between revisions

Revision as of 02:21, 10 January 2015

Latest revision as of 13:44, 31 August 2015

(162 intermediate revisions by the same user not shown)

Line 1:

local getArgs = require('Module:Arguments').getArgs

local p = {}

function p.navbar(frame)

local navbar = require('Module:Navbar').navbar

return navbar('asd')

end

p.lengthcheck = function()

local asd = '123456789'

return string.len(asd)

end

p.indextable = function()

local result = ''

local t={}

t[#t+1]='odin'.. 1 + 0

t[#t+1]='dva'.. '1 + 1'

t[#t+1]='tri'.. 1.5 * 2

return table.concat(t, ', ') .. '.'

end

local function makeInvokeFunction(funcName)

-- makes a function that can be returned from #invoke, using

-- [[Module:Arguments]].

return function (frame)

local args = getArgs(frame, {parentOnly = true})

return p[funcName](args)

end

end

p.link = makeInvokeFunction('_link')

function p._link(args)

local result='{|class="wikitable"\n|-'

local t = {

{h='a', d='1a'},

{h='b', d='2b'},

{h='c', d='3c'},

{h='d', d='4d'},

}

t[5] = {h = 'e', d = '5e'}

t[6] = {h = 'f', d = '6f'}

t[7] = {h = 'g', d = '7g'}

for i,v in ipairs(t) do

if i==5 then break

else

result=result..'\n!'..v.h

end

end

result=result..'\n|-'

for i,v in ipairs(t) do

result=result..'\n|'..v.d

end

result=result..'\n|-'

local t = {

{h='aa', d='1aa'},

{h='bb', d='2bb'},

{h='cc', d='3cc'},

{h='dd', d='4dd'},

}

for i,v in ipairs(t) do

result=result..'\n!'..v.h

end

result=result..'\n|-'

for i,v in ipairs(t) do

result=result..'\n|'..v.d

end

return result .. '\n|}'

end

p.row = makeInvokeFunction('_row')

function p.format11( frame )

function p._row(args)

local pframe = frame:getParent()

local somelist = args[1]

local config = frame.args -- arguments from the template definition

local result

local args = pframe.args -- arguments from the page calling the template

result = ''

local system = frame.args[1]

for k1, v1 in ipairs(mw.text.split(somelist, '\n')) do

local code = frame.args[2]

for k2, v2 in ipairs(mw.text.split(v1 .. '\\', '\\')) do

if not system or not code then

if k2 > 2 then break

return 'Need values for parameter 1 or 2'

elseif (k2 % 2 == 1) then

end

if (k1 % 2 == 0) then

local data = pcall('Module:HK-MTR stations/' .. system)

result = result .. '\n|-style="background:#888"\n!' .. k1 .. '\n|' .. v2

local station = data.stations[code]

else result = result .. '\n|-\n!' .. k1 .. '\n|' .. v2

local id = station.id[code]

end

return code .. id

elseif (k2 % 2 == 0) then result = result .. '||' .. v2

end

end

end

result = '{|class="wikitable"' .. result .. '\n|}'

return result

end