Lua scripts: Added the 'table' library. Added GPL headers to DawnBringer's scripts (thanks!). 2 cosmetic fixes in scripts.
git-svn-id: svn://pulkomandy.tk/GrafX2/trunk@1391 416bcca6-2ee7-4201-b75f-2eb2f807beb1
This commit is contained in:
@@ -2,6 +2,13 @@
|
||||
--by Richard Fhager
|
||||
--http://hem.fyristorg.com/dawnbringer/
|
||||
|
||||
-- Copyright 2010 Richard Fhager
|
||||
--
|
||||
-- This program is free software; you can redistribute it and/or
|
||||
-- modify it under the terms of the GNU General Public License
|
||||
-- as published by the Free Software Foundation; version 2
|
||||
-- of the License. See <http://www.gnu.org/licenses/>
|
||||
|
||||
-- This script was adopted from Evalion, a Javascript codecrafting/imageprocessing project
|
||||
--http://goto.glocalnet.net/richard_fhager/evalion/evalion.html
|
||||
|
||||
@@ -12,9 +19,9 @@ percent = 100
|
||||
function desaturate(percent,r,g,b) -- V1.0 by Richard Fhager
|
||||
p = percent / 100
|
||||
a = (math.min(math.max(r,g,b),255) + math.max(math.min(r,g,b),0)) * 0.5 * p
|
||||
r = math.min(math.max(r + (a-r*p),0),255) -- Capping may not be needed if mathcolor/setcolor is updated
|
||||
g = math.min(math.max(g + (a-g*p),0),255)
|
||||
b = math.min(math.max(b + (a-b*p),0),255)
|
||||
r = r + (a-r*p)
|
||||
g = g + (a-g*p)
|
||||
b = b + (a-b*p)
|
||||
return r,g,b
|
||||
end
|
||||
--
|
||||
|
||||
Reference in New Issue
Block a user