모듈:HSV
위 설명은 모듈:HSV/설명문서의 내용을 가져와 보여주고 있습니다. (편집 | 역사) 이 틀에 대한 수정 연습과 시험은 연습장 (만들기)과 시험장 (만들기)에서 할 수 있습니다. 분류는 /설명문서에 넣어주세요. 이 문서에 딸린 문서. |
local p = {}
function rgb2hsv(r, g, b)
local max = math.max(r, g, b)
local min = math.min(r, g, b)
local c = max - min
-- calculate hue
local h
if c == 0 then
h = 0
elseif max == r then
h = 60 * (0 + ((g - b)/c))
elseif max == g then
h = 60 * (2 + ((b - r)/c))
elseif max == b then
h = 60 * (4 + ((r - g)/c))
end
if h < 0 then h = h + 360 end
-- calculate value
local v = max
-- calculate luminance
-- local l = (max + min) / 2
-- calculate saturation
local s
if c == 0 then
s = 0
else
s = c/v
end
return h, s, v
end
function hsv2rgb(h, s, v)
local hi = math.floor(h / 60)
local f = ((h / 60) - hi)
local p = v * (1 - s)
local q = v * (1 - s * f)
local t = v * (1 - s * (1 - f))
if hi == 1 then
return q, v, p
elseif hi == 2 then
return p, v, t
elseif hi == 3 then
return p, q, v
elseif hi == 4 then
return t, p, v
elseif hi == 5 then
return v, p, q
else
return v, t, p
end
end
function decodeRGBHex(rgb)
local r = string.sub(rgb, 1, 2)
local g = string.sub(rgb, 3, 4)
local b = string.sub(rgb, 5, 6)
return tonumber(r, 16), tonumber(g, 16), tonumber(b, 16)
end
function getRGB(args)
local r, g, b, i
if string.len(args[1]) == 6 then
r, g, b = decodeRGBHex(args[1])
i = 2
else
r = args[1]
g = args[2]
b = args[3]
i = 4
end
return r / 255, g / 255, b / 255, i
end
--[[toHSV
Description: Converts a RGB color to a HSV color.
Usage: {{#invoke:HSV|toHSV|R|G|B}} or {{#invoke:HSV|toHSV|RGBhex}}
Output: hue [0°..360°]/saturation [0..1]/value [0..1]
]]
function p.toHSV(frame)
local r, g, b = getRGB(frame.args)
local h, s, v = rgb2hsv(r, g, b)
return h .. "/" .. s .. "/" .. v
end
--[[hue
Description: Returns the hue of a RGB color.
Usage: {{#invoke:HSV|hue|R|G|B}} or {{#invoke:HSV|hue|RGBhex}}
Output: hue [0°..360°]
]]
function p.hue(frame)
local r, g, b = getRGB(frame.args)
local h, s, v = rgb2hsv(r, g, b)
return h
end
--[[saturation
Description: Returns the saturation of a RGB color.
Usage: {{#invoke:HSV|saturation|R|G|B}} or {{#invoke:HSV|saturation|RGBhex}}
Output: saturation [0..1]
]]
function p.saturation(frame)
local r, g, b = getRGB(frame.args)
local h, s, v = rgb2hsv(r, g, b)
return s
end
--[[value
Description: Returns the hue of a RGB color.
Usage: {{#invoke:HSV|value|R|G|B}} or {{#invoke:HSV|value|RGBhex}}
Output: value [0..1]
]]
function p.value(frame)
local r, g, b = getRGB(frame.args)
local h, s, v = rgb2hsv(r, g, b)
return v
end
--[[saturate
Description: Saturates a RGB color by a given factor.
Usage: {{#invoke:HSV|saturate|R|G|B|factor}} or {{#invoke:HSV|saturate|RGBhex|factor}}
Optionally "factor" can be followed by another parameter with the value "hex" can be given to return the RGB color in a hexadecimal representation.
Output: saturated RGB
]]
function p.saturate(frame)
local r, g, b, i = getRGB(frame.args)
-- convert to HSV
local h, s, v = rgb2hsv(r, g, b)
-- saturate
s = s * frame.args[i]
if s < 0 then
s = 0
elseif s > 1 then
s = 1
end
-- convert back to RGB
local r, g, b = hsv2rgb(h, s, v)
r = math.floor(r * 255 + 0.5)
g = math.floor(g * 255 + 0.5)
b = math.floor(b * 255 + 0.5)
-- return values
if frame.args[i + 1] == "hex" then
return string.format("%.2X%.2X%.2X", r, g, b)
else
return r .. "/" .. g .. "/" .. b
end
end
--[[toRGB
Description: Converts a HSV color to a RGB color.
Usage: {{#invoke:HSV|toRGB|H|S|V}} with H in [0°..360°], S in [0..1] and V in [0..1].
Optionally a 4th parameter with the value "hex" can be given to return the RGB color in a hexadecimal representation.
Output: R/G/B
]]
function p.toRGB(frame)
local r, g, b = hsv2rgb(frame.args[1], frame.args[2], frame.args[3])
-- transform from real [0..1] to integer [0..255]
r = math.floor(r * 255 + 0.5)
g = math.floor(g * 255 + 0.5)
b = math.floor(b * 255 + 0.5)
-- return values
if frame.args[4] == "hex" then
return string.format("%.2X%.2X%.2X", r, g, b)
else
return r .. "/" .. g .. "/" .. b
end
end
return p