25 lines
686 B
Text
Executable file
25 lines
686 B
Text
Executable file
name: "Reflectocube"
|
|
mode: lines
|
|
blend: additive
|
|
persist: 0.91
|
|
linewidth: 1.419
|
|
|
|
[init]
|
|
n = 1235
|
|
|
|
[frame]
|
|
t = t + dt * (0.31 + bass_att * 1.8)
|
|
hue = hue + dt * 0.065 + beat * 0.012
|
|
|
|
[point]
|
|
arm = floor(i * 4)
|
|
fa = frac(i * 4)
|
|
d = fa
|
|
ang = arm * 1.405 + d * 0.906 * 3.14159 + t
|
|
rad = (0.04 + pow(d, 1.825) * 1.15) * (0.7 + bass * 0.5)
|
|
x = sin(ang) * rad / aspect
|
|
y = cos(ang) * rad
|
|
red = (0.3 + 0.7 * d) * (0.3 + mid) * (0.45 + 0.55 * sin(hue * 6.28318 + d * 4.537))
|
|
green = (0.3 + 0.7 * d) * (0.3 + mid) * (0.45 + 0.55 * sin(hue * 6.28318 + d * 4.537 + 2.09))
|
|
blue = (0.3 + 0.7 * d) * (0.3 + mid) * (0.45 + 0.55 * sin(hue * 6.28318 + d * 4.537 + 4.19))
|
|
skip = if(below(fa, 0.04), 1, 0)
|