#Excuse the mess… change stuff and see what happens
setup do
smoothing(true)
framerate(24)
end
draw do
randR = random 0, width/3
lRadius = width + randR + cos(time/100)+sin(time/100)
for i in 0..Math::PI*100+(cos(time/350)*24)**2
location = (((i*360)/2)/Math::PI)
xLoc = width/2 + lRadius * cos(location) - sin(time/50)
yLoc = height/2 + lRadius * sin(location) - cos(time/50)
color(255,255,255,25)
line(width/3,height/3*2,xLoc,yLoc)
line(width/2,height/3,xLoc,yLoc)
line(width/3*2,height/3*2,xLoc,yLoc)
end
end