openvisengine/tools/converted/root/embedded/Amp Picks/Tuggummi - Multiple Orgasms.ava

27 lines
741 B
Text
Executable file

name: "Multiple Orgasms"
mode: lines
blend: additive
persist: 0.873
linewidth: 1.6
[init]
spokes = 30
n = spokes * 33
[frame]
rot = rot + dt * (0.106 + mid * 0.4)
t = t + dt * 2.164
hue = hue + dt * 0.106
[point]
sp = floor(i * spokes)
si = frac(i * spokes)
a = sp * 6.28318 / spokes + rot
wave = sin(si * 4 * 3.14159 - t) * (0.03 + bass * 0.28)
rad = 0.12 + si * 0.919 + wave
x = sin(a) * rad / aspect
y = cos(a) * rad
red = (1 - si) * 0.45 + 0.15 + sv * 0.55 * (0.45 + 0.55 * sin(hue * 6.28318 + sp * 0.4))
green = (1 - si) * 0.45 + 0.15 + sv * 0.55 * (0.45 + 0.55 * sin(hue * 6.28318 + sp * 0.4 + 2.09))
blue = (1 - si) * 0.45 + 0.15 + sv * 0.55 * (0.45 + 0.55 * sin(hue * 6.28318 + sp * 0.4 + 4.19))
skip = if(above(si, 0.985), 1, 0)