Octagon

cartdata("o")
k,d,z,y,t,w,a,f,s,c,b=1/8,12,0,dget(0),0, 63.5,0,{},sin,cos,btn::⌂::t+=1cls()
if(b(➡️))a+=k/5
if(b(⬅️))a -=k/5
?z<2 и"⬅️ ➡️"или"",54,w,2
if(t%30==0)add(f,{flr(rnd()) *8),w,0})
для e во всех(f)do
e[2]-=1.5
if(e[2]<1)del(f,e )z+=1
для j=0,3 do для i=0,5 do
line(w+c((e[1]+i)*k)*(e[2]+ j),w+s((e[1]+i)*k)*(e[2]+j),w+c((e[1]+1+i)*k)*(e[2 ]+j),w+s((e[1]+1+i)*k)*(e[2]+j),8)end
end end
if(pget(w +c(a)*d,w+s(a)*d)==8)goto 😐
?"score:"..z,8,1,2
?"best:" ..y,90,1
pset(w+c(a)*d,w+s(a)*d)y=max(y,z)flip()
перейти к ⌂
::😐::
"повторить?",54,w,7
dset(0,y)
if(b(❎))z=0goto ⌂
иди 😐