imported>IJReid at 04:38, 21 October 2017

2017-10-21T04:38:54Z

New page

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

Module:Sandbox/IJReid/Geological data - Revision history

imported>IJReid at 04:38, 21 October 2017