tcc updates

tcc01.lua

@@ -0,0 +1,20 @@
+pt={}
+g=0r=0m=math
+for i=1,180 do pt[i]={x=0,y=0,c=i%15} end
+function TIC()r=time()/1000
+h=2*m.pi/10
+c=0
+for i=1,180 do
+p=pt[i]
+pix(p.x,p.y,p.c)
+if i%10==0 then
+c=c+1g=r
+end
+pt[i]={x=c*3*m.sin(g)+120,y=(c*3*m.cos(g)*0.55)+10+(c*8),c=p.c}
+g=g+h
+end;end
+
+-- <PALETTE>
+-- 000:1a1c2c5d275db13e53ef7d57ffcd75a7f07038b76425717929366f3b5dc941a6f673eff7f4f4f494b0c2566c86333c57
+-- </PALETTE>
+

tcc02.lua

@@ -0,0 +1,7 @@
+s=math.sin
+function TIC()t=time()/800
+for y=0,130 do for x=0,320 do pix(x+math.cos(t)*20-20,y+s(t)*10,y+s(x/3)+t) end;end;end
+-- <PALETTE>
+-- 000:1a1c2c5d275db13e53ef7d57ffcd75a7f07038b76425717929366f3b5dc941a6f673eff7f4f4f494b0c2566c86333c57
+-- </PALETTE>
+

tcc04.lua

@@ -1,5 +1,4 @@
-s=math.sin
-function TIC()t=time()/1000 for i=0,32265 do x=i%240y=i/240v=s(t-y/130)*(8*s(x/40))+(8*s(y/50))pix(x,y,v)end;end
+TIC=load't=t+.1 for i=0,32265 do x=i%240y=i/240v=s(t-y/30)*(8*s(x/40))+(8*s(y/50))pix(x,y,v)end't=0s=math.sin
 
 -- <PALETTE>
 -- 000:1a1c2c5d275db13e53ef7d57ffcd75a7f07038b76425717929366f3b5dc941a6f673eff7f4f4f494b0c2566c86333c57