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 |
|