Module: Transfer

From Travel Strategies
Revision as of 13:59, 3 February 2021 by Editor (talk | contribs)
Jump to: navigation, search

Documentation for this module may be created at Module:Transfer/doc

local p = {}

local airline = {
	undefined = "0000",
	all = "1111",
	aegean = "0001",
	aerlingus = "1100",	
	aeroflot = "0001",	
	aeromexico = "1011",	
	aircanada = "1001",	
	airchina = "0001",
	flyingblue = "1111",
	airnz = "0001",
	alaska = "0001",
	alitalia = "1001",
	ana = "1001",
	american = "0001",
	asiana = "0001",
	avianca = "1011",
	british = "1101",
	cathay = "1011",
	chinaeastern = "0001",
	chinasouthern = "0001",
	copa = "0001",
	delta = "1001",	
	elal = "1000",	
	emirates = "1111",	
	etihad = "1011",
	eva = "0010",	
	frontier = "0001",	
	garuda = "0000",	
	hainan = "0001",
	hawaiian = "1001",
	iberia = "1101",
	jal = "0001",	
	jet = "0011",
	jetblue = "1111",	
	korean = "0001",	
	latam = "0001",	
	milesandmore = "0001",	
	malaysia = "0010",	
	qantas = "1011",	
	qatar = "0011",	
	saudi = "0001",	
	singapore = "1111",	
	sa = "0003",	
	southwest = "0101",	
	tap = "0001",	
	thai = "0011",	
	turkish = "0011",	
	united = "0101",	
	virginatlantic = "1111",	
	virginaustralia = "0001",}

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 = "0000"
	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:80%; 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:80%; 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:80%; vertical-align:text-top; background-color:'
	text = text .. color .. ';">TY</td>'
		if partners:sub(4,4) == "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:80%; vertical-align:text-top; background-color:'
	text = text .. color .. ';">Mar</td>'
	text = text .. '</table>'
	return text
end

return p