m=math s=m.sin c=m.cos t=0
function TIC()cls(14)t=t+0.02
for i=0,240 do
x=92+i*c(i+t)
y=52+i*s(i+t)r=6
P=0 T=r
if i%8<3*s(t/3)then C=circ else C=circb end
for j=0,6.3,6.3/(8+3*s(t)) do
R=r*2*c(j)S=r*2*s(j)
C(x+R,y+S,r,i%16+1)
end
C(x,y,r*1.2,i%16)
end end
m=math s=m.sin c=m.cos C=circ t=0
function TIC()cls(14)t=t+0.02
for i=0,240 do
x=20+i*c(i+t)
y=50+i*s(i+t)
r=6 P=0 T=r
for j=0,6.3,1.05 do
R=r*2*c(j) S=r*2*s(j)
C(x+R,y+S,r,i%16+1)
end
C(x,y,r*1.2,i%16)
end end
211 bytes
m=math s=m.sin c=m.cos C=circ b=circb
function TIC()cls(14)t=time()/8^4
for i=0,240 do
x=20+i*c(i+t)y=50+i*s(i+t)I=1+(i/20)%8
for j=0,6.3,.9 do
R=12*c(j)S=12*s(j)C(x+R,y+S,6,I+3)b(x+R,y+S,6,I)
end C(x,y,6.2,I)end
end
217 bytes
m=math s=m.sin c=m.cos t=0
function TIC()cls(14)t=t+0.1
for i=0,240 do G=80
x=G+i*c(i)
y=G+i*s(i)
r=10+10*s(t+i)
P=r*c(0) T=r*s(0)
for j=0,6.3,.3 do
R=r*c(j) S=r*s(j)
tri(x,y,x+R,y+S,x+P,y+T,j*s(t/9))P=R T=S
end
end
end
220 bytes
m=math s=m.sin c=m.cos C=circ t=0
function TIC()cls(14)t=t+0.02
for i=0,255,.5 do
x=148+i*c(i+t)+10*s(i)
y=84+i*s(i+t)+10*s(i)
r=15+i/100P=0T=r
for j=0,6.3,.1 do
R=r*c(j)S=r*s(j)tri(x,y,x+R,y+S,x+P,y+T,j+t%16)P=R T=S
end
C(x,y,R*.8,j)end end
242 bytes
t=0m=math s=m.sin c=m.cos C=circ
function TIC()cls(14)t=t+.02
clip(120*s(t),0,120,136)for i=0,255,.5 do
B=9*s(i)x=92+B+i*c(i+t)y=84+B+i*s(i+t)r=15+i/100P=0T=r
for j=0,6.3,.1 do
R=r*c(j)S=r*s(j)tri(x,y,x+R,y+S,x+P,y+T,j+t%16)P=R T=S
end C(x,y,R*.8,j)end end
256 bytes
m=math s=m.sin c=m.cos C=circ t=0
function TIC()cls(14)t=t+0.1
for i=-14,24 do
x,y,r=i*24+(i+20)*s(t/10)+(5+i)*c(t), 10+15*s(t/5+i),10+10*s(t+i)
for j=-1,3 do J=j*45 C(x-24,y+5+J,r,14+j)C(x+j+50,y+J+50,r,12+j)end
end
end
221 bytes
m=math s=m.sin f=m.floor cb=circb
function TIC()t=time()//32
for y=0,136 do for x=0,240 do
pix(x,y,f(3*s(x)*y+t)>>3)
if y%5<3 then pix(x+(x>>2)*s(t/10),y,f(3*s(x)+y/5+t)>>3)end
end
for i=1,t//15 do cb(100+i*s(t/20),80+i*s(t/20),15+t/20,f(t%15))end
end end
256 bytes
m=math s=m.sin c=m.cos t=0
function TIC()cls(14)t=t+0.1
z,a=0,0
for i=0,240,.25 do G=60
A=t+i-i/6.5
x=G+i*c(A)y=G+i*s(A)
circ(x,y,5,i%16)line(z,a,x,y,i%16)
z,a=x,y
end
end
172 bytes
s=math.sin
W=240 H=136
function TIC()t=time()//32
cls(6)for y=0,136,5 do
for j=1,5 do t5=t/50
circ((j*15+y*5+t+15*s(y+t/10))%W,(y*5+t+5*s(j*10+t5))%H,5+3*s(y+t5),6+j)Y=(y+t)%H
circb((50*j+(5+j)*s(y+t/20))%W,-Y%H,Y/20,6+Y/30)end end end
c=math.cos t=0H=136
function TIC()cls(0)t=t+.1
for i=0,50,2 do G=80+(50-i)*c(t/3)/2x=G+i*c(i/3)
y=10+i*2S=i/10 for j=-i,i,6 do
xH=j*5tri(G+j,y, G+j-5,y-3,G+j-5,y+3,7-j/(i-3))end circ(x-3,y-3,S,t+i)end
for i=0,240 do line(i,H,i,H-50+10*c(i/55),12)end
end
t=0s=math.sin L=elli
function TIC()cls(13)for j=0,300,40 do J=(j+20+t)%300-40
for i=1,10 do U=50*s(j/20)+30L(J,4*i+U,3*i,i,7)L(J,40+2*i+U,5,3,2)L(J+3*i*s(i+J),4*i-3+U,3,3,i+t)end end
for i=1,999 do pix((i*J*s(i)+9*s(t/59))%240,(i*9+t)%160,12)end
t=t+1
end
t=0
function TIC()for i=0,135 do
for j=0,239 do U=t/9+j/50if i<45then U=(j+i)//8+t end
pix(j,i,(i~j|-j~-i)+U)end
end
t=t+.2
end