Content deleted Content added
No edit summary |
No edit summary |
||
Line 69:
local intensityfactor = 0
local numofitems = 400
--
--
nm2RGB(wlcycle, false)▼
-- if wlcycle < wavelength then
-- intensityfactor = (wlcycle - 380) / (wavelength - 380)
Line 79 ⟶ 78:
-- if intensityfactor < 0 then
-- intensityfactor = 0
--
-- end ▼
-- redsum = redsum + redvalue*intensityfactor
-- greensum = greensum + greenvalue*intensityfactor*1.5▼
-- bluesum = bluesum + bluevalue*intensityfactor*1▼
-- local result='#' .. string.format("%.2X%.2X%.2X", 255*(redsum/numofitems), 255*(greensum/numofitems), 255*(bluesum/numofitems)) ▼
▲ greensum = greensum + greenvalue*intensityfactor*1.5
local result='#' .. string.format("%.2X%.2X%.2X", 255*redvalue, 255*greenvalue, 255*bluevalue)
▲ bluesum = bluesum + bluevalue*intensityfactor*1
▲ end
▲ local result='#' .. string.format("%.2X%.2X%.2X", 255*(redsum/numofitems), 255*(greensum/numofitems), 255*(bluesum/numofitems))
return result
end
|