name: "Solar Flaire"
mode: lines
blend: additive
persist: 0.866
linewidth: 1.678

[init]
bars = 59
n = bars * 11

[frame]
rot = rot + dt * (0.076 + mid * 0.3)
hue = hue + dt * 0.107

[point]
bar = floor(i * bars)
bi = frac(i * bars)
lvl = getspec(bar / bars, 0, 0)
h = lvl * 0.607
a = bar * 6.28318 / bars + rot
rad = 0.241 + bi * h
x = sin(a) * rad / aspect
y = cos(a) * rad
red = 0.25 + bi * 0.75 * (0.45 + 0.55 * sin(hue * 6.28318 + bar * 6.28318 / bars))
green = 0.25 + bi * 0.75 * (0.45 + 0.55 * sin(hue * 6.28318 + bar * 6.28318 / bars + 2.09))
blue = 0.25 + bi * 0.75 * (0.45 + 0.55 * sin(hue * 6.28318 + bar * 6.28318 / bars + 4.19))
skip = if(above(bi, 0.97), 1, 0)