forked from KolibriOS/kolibrios
28 lines
654 B
Lua
28 lines
654 B
Lua
--PALETTE Modify: Inverted RGB
|
|
--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
|
|
|
|
|
|
|
|
for c = 0, 255, 1 do
|
|
|
|
r,g,b = getcolor(c)
|
|
|
|
r2 = (g+b)/2
|
|
g2 = (r+b)/2
|
|
b2 = (r+g)/2
|
|
|
|
setcolor(c, r2,g2,b2)
|
|
|
|
end
|