Module:Sandbox/IJReid/Geological data
Module documentation[] [purge]
base = { }
--Variables etc
rgb = {}
rgb["Mesozoic"] = {
[1] = 7,
[2] = 202,
[3] = 234,}
rgb["Cretaceous"] = {
[1] = 111,
[2] = 200,
[3] = 107,}
rgb["Jurassic"] = {
[1] = 0,
[2] = 187,
[3] = 231,}
rgb["Triassic"] = {
[1] = 153,
[2] = 78,
[3] = 150,}
Mesozoic = 244445
start = {}
start["Mesozoic"] = 251.902
start["Cretaceous"] = 145
start["Jurassic"] = 201.3
start["Triassic"] = start["Mesozoic"]
--Period color function
base.periodcolor = function(period, format)
if format == "rgb255" then
return rgb[period[1]] .. ", " .. rgb[period[2]] .. ", " .. rgb[period[3]]
end
if format == "rgb1" then
local conversion_holder1 = rgb[period[1]] / 255
local conversion_holder2 = rgb[period[2]] / 255
local conversion_holder3 = rgb[period[3]] / 255
return conversion_holder1 .. ", " .. conversion_holder2 .. ", " .. conversion_holder3
end
end
base.periodstart = function(period)
return start[period]
end
return base