openvisengine/tools/converted/root/embedded/Amp Picks/mig - Freekwyrms.ava

27 lines
504 B
Text
Executable file

name: "Freekwyrms"
mode: dots
blend: additive
persist: 0.864
linewidth: 1.436
[init]
bars = 46
n = bars * 12
[frame]
rot = rot + dt * (0.09 + mid * 0.3)
hue = hue + dt * 0.063
[point]
bar = floor(i * bars)
bi = frac(i * bars)
lvl = getspec(bar / bars, 0, 0)
h = lvl * 0.722
a = bar * 6.28318 / bars + rot
rad = 0.216 + bi * h
x = sin(a) * rad / aspect
y = cos(a) * rad
red = min(1, 0.25 + bi * 0.75 * 1.3)
green = 0.25 + bi * 0.75 * 0.5
blue = 0.25 + bi * 0.75 * 0.12
skip = if(above(bi, 0.97), 1, 0)