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