cls()::_::w=t()*2for i=1,w*14do
a=⌂-🐱+rnd(2^13)s=(%(a-65)+%a+%(a+64))%15poke(a,s>8and 0or s>6and 1or s>4and mid(1,2,2+cos(min(w%4,1.5))+(a%127+w&48))or ceil(s/3))end?"\^!5f10▒a😐"
rect(0,0,127,127,2)flip()goto _