7 lines
225 B
Lua
7 lines
225 B
Lua
f={}p={0,1,5,4,6,12,14,15}for i=0,1199
|
|
do f[i]=0 poke(i,143)end
|
|
function update()for i=0,1119 do
|
|
if i<41 then f[1160+i]=rnd(2)*256 end
|
|
f[i]=(f[i+39]+f[i+40]+f[i+41]+f[i+80])/4.1
|
|
poke(1200+i,p[mid(0,flr(f[i]/4),7)+1])
|
|
end end |