Module: Transfer

Documentation for this module may be created at Module:Transfer/doc
local p = {}

local airline = {
	undefined = "00000",
	all = "11111",
	aegean = "00001",
	aerlingus = "11000",	
	aeroflot = "00001",	
	aeromexico = "10111",	
	aircanada = "11011",	
	airchina = "00001",
	flyingblue = "11111",
	airnz = "00001",
	alaska = "00001",
	alitalia = "10011",
	ana = "10001",
	american = "00101",
	asiana = "00001",
	avianca = "10111",
	british = "11011",
	cathay = "10111",
	chinaeastern = "00001",
	chinasouthern = "00001",
	copa = "00001",
	delta = "10001",	
	elal = "10000",	
	emirates = "11111",	
	etihad = "10111",
	eva = "00110",
	finnair = "00010",
	frontier = "00001",	
	garuda = "00000",	
	hainan = "00001",
	hawaiian = "10001",
	iberia = "11001",
	jal = "00001",	
	jet = "00101",
	jetblue = "11111",	
	korean = "00001",	
	latam = "00001",	
	milesandmore = "00001",	
	malaysia = "00100",	
	qantas = "10111",	
	qatar = "00101",	
	saudi = "00001",	
	singapore = "11111",	
	sa = "00003",	
	southwest = "01001",	
	tap = "00011",	
	thai = "00101",	
	turkish = "00111",	
	united = "01001",	
	virginatlantic = "11101",	
	virginaustralia = "00001",}

function p.output(frame)
	local a = string.lower(frame.args[1])
	local mr = false
	local ur = false
	local ty = false
	local spg = false
	local color = "rgb(255,255,255)"
	local partners = airline[a]
	if partners == nil then 
		partners = "00000"
	end
	text = '<table style="display:inline;">'
	if partners:sub(1,1) == "1" then 
		color = "rgb(125,221,255)"
	else
		color = "rgb(255,255,255)"
	end
	text = text .. '<td style="width: .25in; border: 1px solid black; text-align:center; font-size:70%; vertical-align:text-top; background-color:'
	text = text .. color .. ';">MR</td>'
	if partners:sub(2,2) == "1" then 
		color = "rgb(142,186,226)"
	else
		color = "rgb(255,255,255)"
	end
	text = text .. '<td style="width: .25in; border: 1px solid black; text-align:center; font-size:70%; vertical-align:text-top; background-color:'
	text = text .. color .. ';">UR</td>'
	if partners:sub(3,3) == "1" then 
		color = "rgb(255,224,125)"
	else
		color = "rgb(255,255,255)"
	end
	text = text .. '<td style="width: .25in; border: 1px solid black; text-align:center; font-size:70%; vertical-align:text-top; background-color:'
	text = text .. color .. ';">TY</td>'
	if partners:sub(4,4) == "1" then 
		color = "rgb(76,159,250)"
	else
		color = "rgb(255,255,255)"
	end
	text = text .. '<td style="width: .25in; border: 1px solid black; text-align:center; font-size:70%; vertical-align:text-top; background-color:'
	text = text .. color .. ';">C1</td>'
	if partners:sub(5,5) == "0" then 
		color = "rgb(255,255,255)"
	else
		color = "rgb(225,204,240)"
	end
	text = text .. '<td style="width: .25in; border: 1px solid black; text-align:center; font-size:70%; vertical-align:text-top; background-color:'
	text = text .. color .. ';">Mar</td>'
	text = text .. '</table>'
	return text
end

return p