openvisengine/tools/converted/root/embedded/Amp Picks/S_KuPeRS - Inverse Kinetics.ava

30 lines
738 B
Text
Executable file

name: "Inverse Kinetics"
mode: dots
blend: additive
persist: 0.805
linewidth: 2.613
[init]
n = 817
[frame]
tt = tt + dt * (0.5 + bass_att * 1.1)
hue = hue + dt * 0.103
burst = burst * 0.9
[beat]
burst = 1
[point]
jet = floor(i * 2)
life = frac(rand(i * 7.7 + jet) + tt * (0.35 + rand(i + 3) * 0.65))
a = jet * 6.28318 / 2 + rand(i * 5.1 + jet) * 0.736
spd = 0.4 + rand(i * 9.2 + jet) * 0.8
px = cos(a) * spd * life
py = sin(a) * spd * life - 1.2 * life * life
x = px * (0.85 + bass * 0.35) / aspect
y = py
red = max(0, 1 - life) * (0.35 + burst * 0.55) * abs(sin(life * 4))
green = max(0, 1 - life) * (0.35 + burst * 0.55) * 0.22
blue = max(0, 1 - life) * (0.35 + burst * 0.55) * abs(cos(life * 4))
skip = if(above(life, 0.94), 1, 0)