Sh... didnt work.
`###Glowworm for the 20-Line Challenge (19 Lines)###
`###By BackBONE 20.02.03############################
hide mouse : load image "np1.jpg",1
sync on : backdrop on : color backdrop rgb(0,0,0) : position camera 0,0,-300
`Change this for different effects
max#=100 : sp#=3 : d=2 : q=4 : a=0
`set up the Particles
for i=1 to max#
make object plain i,max#+2,max#+2 : scale object i,max#-i,max#-i,100
lock object on i : texture object i,1 : ghost object on i
next i
do
`new random positions after a expired
if mr<=a : rx=rnd(400)+40 : ry=rnd(400)+40 : inc l : endif
`set new diameter
if l=q then d=rnd(6)-3:l=0 : q=rnd(2)+1 : a=rnd(358) : mr=0
`simple way to still let you guide the worm with your mouse somehow ...
mx#=curvevalue(rx#,mousex(),80) : my#=curvevalue(ry#,mousey(),80) : mr=wrapvalue(mr+d)
position mouse curvevalue(sin(mr)*mx#+320,mousex(),40),curvevalue(cos(mr)*my#+240,mousey(),40)
`angles for x and y and those sin() cos() things
r=wrapvalue(r+8) : r2=wrapvalue(r2+12)
x#=(sin(r)*3)+(mousex()-320) : y#=(sin(r2)*3)+(240-mousey()) : position object 1,x#,y#,400
`let all those particles follow the "Head"
for i=2 to max#
position object i,curvevalue(object position x(i-1),object position x(i),sp#),curvevalue(object position y(i-1),object position y(i),sp#),400
next i
sync
loop
