
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
155 bytes
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