Reorganized scripts, fixed 'memory' not working with subdirectories
git-svn-id: svn://pulkomandy.tk/GrafX2/trunk@1765 416bcca6-2ee7-4201-b75f-2eb2f807beb1
This commit is contained in:
42
share/grafx2/scripts/samples_2.3/brush/Waves.lua
Normal file
42
share/grafx2/scripts/samples_2.3/brush/Waves.lua
Normal file
@@ -0,0 +1,42 @@
|
||||
--BRUSH Distortion: Waves v1.0
|
||||
--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
|
||||
|
||||
|
||||
--frq = 2
|
||||
--amp = 0.3
|
||||
|
||||
-- Adjust power of frequency & amplitude
|
||||
frq_adj = 2
|
||||
amp_adj = 0.02
|
||||
|
||||
ok,frq,amp = inputbox("Settings",
|
||||
"Frequency 1-10", 3, 1,10,0,
|
||||
"Amplitude 1-10", 3, 1,10,0
|
||||
);
|
||||
|
||||
w, h = getbrushsize()
|
||||
|
||||
for y = 0, h - 1, 1 do
|
||||
for x = 0, w - 1, 1 do
|
||||
|
||||
ox = x / w;
|
||||
oy = y / h;
|
||||
ox = (1 + ox + math.sin(oy*math.pi*frq*frq_adj)*amp*amp_adj) % 1;
|
||||
|
||||
c = getbrushbackuppixel(math.floor(ox*w),y);
|
||||
putbrushpixel(x, y, c);
|
||||
|
||||
end
|
||||
end
|
||||
|
||||
Reference in New Issue
Block a user