Thrive - 256 bytes intro for Tic-80 fantasy console by Ilmenit/Agenda
HTML-код
- Опубликовано: 11 сен 2024
- What will grow out of a tiny seed?
www.pouet.net/...
The whole source code in the LUA language:
function b(x,y,a,l)
for i=0,l do
j=y+i*s(a)+3*s(i/9)*s(a-8) k=x+i*s(a-8)-3*s(i/9)*s(a)
circ(k, j+s(i)*m(t-633,4)*m(1133-t,1), m(t-633-i,1), 3*s(i/9)-m(t/36,36))
n=l-i
rect(k,j,n/33,n/33,0) rect(k,j,n/33,m(t-1633-i,1),-m(t-1633-i,133)/33)
if i%14==9 then b(k,j,a+s(i)+s(t/33)/33,n-33) end
end
end
function TIC()
t=time()/46
for i=0,32639 do
poke4(i,63-i/3333+i*s(i)%1) pix(i%333,t-2433+i*s(i*i)/33,12)
end
b(123,123,5,m(t,263))
end
s=math.sin m=math.min
WOW! :) Tylko 256 bajtów i taki śliczny efekt! Cudo!
This is sorcery
Niesamowite !!!
Jak tyle co się dzieje na ekranie można upchać w 256 bajtów???
Szok i szacun :)))
Szkoda ze to nie na Atari :)))
Dzięki! Następnym razem ;-)
@@ilmenit identyczne na Atari i jestem w niebie:)))
To intro to opowieść o narodzinach, o przemijaniu. Niesamowita rzecz.
Amazing!
Impossible
Wow, I don't believe this, how this work, re-write this in pascal or turbo pascal ! =D or better yet Delphi !