30 lines
661 B
Text
Executable file
30 lines
661 B
Text
Executable file
name: "Jello Cube"
|
|
mode: lines
|
|
blend: additive
|
|
persist: 0.813
|
|
linewidth: 2.201
|
|
|
|
[init]
|
|
n = 620
|
|
|
|
[frame]
|
|
hue = hue + dt * 0.073 + beat * 0.01
|
|
travel = travel + dt * (0.196 + bass_att * 1.4)
|
|
flash = flash * 0.86
|
|
|
|
[beat]
|
|
flash = 1
|
|
|
|
[point]
|
|
g = floor(i * 10)
|
|
gi = frac(i * 10)
|
|
ph = frac(rand(g * 5.1 + 1) + travel * (0.55 + rand(g + 17) * 0.85))
|
|
a = gi * 6.28318
|
|
rad = ph * (0.226 + bass * 0.743 + flash * 0.08)
|
|
x = sin(a) * rad / aspect
|
|
y = cos(a) * rad
|
|
fade = sin(ph * 3.14159)
|
|
red = fade * (0.35 + flash * 0.4) * abs(sin(g * 0.7))
|
|
green = fade * (0.35 + flash * 0.4) * 0.22
|
|
blue = fade * (0.35 + flash * 0.4) * abs(cos(g * 0.7))
|
|
skip = if(above(ph, 0.96), 1, 0)
|