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

t=1s=math.sin
function TIC()T=s(t)+2
for j=0,136 do
 for i=0,239 do
  P=s((2*t+i)/(5+t/9))*s(j/10)-s((t+j)/20)*s(i/10)
  pix(i,j,P*16)
 end
end
t=t+.1
end

TIC=load'for j=0,135 do for i=0,239 do pix(i,j,(s((t/9+i+5*s(i*j/v))/v+t)^9+s(j/u))*10)end end t=t+.01'u=15v=90t=0s=math.sin

t=0v=90s=math.sin
function TIC()T=t/50 for y=-68,67 do for x=-120,239 do
X=(math.atan2(y,x)+3.14)Y=((x*x+y*y)^.5)/120L=(300*s(160*s(Y-T)+20*s(X+T)+3*s(Y*X/v))/v+T/2)//1&(8*s(X+Y)//1)
pix(120+x,68-y,(L//1))end
end t=t+1 end