SkyBerron

198 posts

SkyBerron

SkyBerron

@SkyBerron

🙃

Katılım Şubat 2014
1 Takip Edilen87 Takipçiler
SkyBerron
SkyBerron@SkyBerron·
r=1/4s=sin::_::b=t()/8c=s(b+r)d=s(b)p={}for a=0,1,.005do x=s(a)+2*s(2*a)z=s(3*a)x,z=x*c-z*d,z*c+x*d j=16-z*5\1q=p[j]or{}add(q,{64+20*x,70-20*s(a+r)+40*s(2*a+r),8,j/2})p[j]=q end for j=1,32do for o in all(p[j])do circfill(unpack(o))end end?"\^1\^c0\^!5f100125☉48=<>96?:♥7" goto _
English
0
0
3
171
SkyBerron
SkyBerron@SkyBerron·
?"\^!5f1001😐<76=♪289:;⬅️3⬇️" ::_::cls()a=t()/6camera(16*cos(a)-64,16*sin(a)-64)for k=0,1do for r=8,120do z=t()*3+256/(24+(r-8))srand(z\1)c=rnd(15)line()for i=-1,15do b=i/16+sin(a)/9line(k+r*cos(b),r*sin(b),1+(c+i)%15)end end end flip()goto _
English
0
0
0
76
SkyBerron
SkyBerron@SkyBerron·
?"\^!5f100웃9:♥?◆🅾️84░53⬅️;⌂" function l(a,b)line(c*a-d*b+64,c*b+d*a+64)end::_::for k=0,1do w=t()/20e=2+cos(w)w+=(1-cos(w))*(.1+.015*k)c=e*cos(w)d=e*sin(w)for j=-8,8do for i=-9,9do a=i*8b=j*10-i%2*5line(1+(k+w+i)%15)l(a+5,b)l(a,b)l(a-3,b+5)l(a,b+10)end end end?"\^1\^c" goto _
English
0
0
0
72
SkyBerron
SkyBerron@SkyBerron·
?"\^!5f100▒1😐<7248🅾️◆53⬅️;⌂" s=sin::_::fillp(23130)for k=0,1do for i=0,399do m=i/399u=cos(m)v=s(m)x=40*u+k+64y=40*v+64l=m-t()/3for j=-1,2do n=l+j/3+s(m*2)/8b=8*s(n)if(j>=0and b>a)c=1+j*5+4.3*abs(b/8)line(x+a*u,y+a*v,x+b*u,y+b*v,c+(c+.5)\1*16) a=b+2end end end?"\^1\^c" goto _
English
0
0
0
75
SkyBerron
SkyBerron@SkyBerron·
?"\^!5f10▒1😐<53⬅️;849:2=67" poke(24364,7)poke(24404,96)palt(0,nil)::_::for i=0,64do sspr(0,i,i,1,1,i)sspr(i,0,1,i,i,1)end srand()for j=0,31do c=9+rnd(9)a=t()/c+rnd()b=4+2*sin(rnd()+t()/50)for i=0,b,.1do k=32+32*cos(a+i/128)pset(0,k,j)pset(k,0)end end flip()goto _
English
0
0
0
87
SkyBerron
SkyBerron@SkyBerron·
?"\^!5f100289:;⬅️3⬇️ˇ▒1😐<=5" p={}s=sin::_::cls()add(p,{r=0,a=t()/2,t=t()})for q in all(p)do for i=-12,0do r=q.r+i if(r>0)c=r*cos(q.a)d=r*s(q.a)a=c+64+s(q.t/4)*32b=d+64+s(q.t/9)*32c/=4d/=4line(a+d-c,b-c-d,a,b,q.t+i)line(a-d-c,b+c-d) end if(q.r>140)del(p,q) q.r+=1end flip()goto _
English
0
0
0
94
SkyBerron
SkyBerron@SkyBerron·
Also generates this animation:
GIF
English
0
0
0
89
SkyBerron
SkyBerron@SkyBerron·
cls()y=97j=0k=0::_::for i=0,15do l=abs((i+j)%16-4)pal(i,l<4and 8>>l,1)end for x=97,-97,-.1do u=x*.1v=y*.1d=u*u+v*v-1z=d>0and min(d^-.5,10)or 10pset(64-x+y,64-x/2-y/2+16*z,(u*u+v*v)^.5*k+(atan2(x,y)+1)%16*8*(64-3*k))end y-=abs(y)<23and.1or 1 if(y<-512)y=97k=16-k j+=1flip()goto _
English
1
0
0
107
SkyBerron
SkyBerron@SkyBerron·
?"\^!5f100▒1😐<=♪2489:;3⬇️🐱" m=0k=0s=sspr::s::i=0a=rnd()-.5memcpy(0,24576,8192)palt(0,nil)::_::cls(k)for y=0,127do b=y-63.5x=b*sin(a/4)+64if m<1do s(0,y,x,1,-i,y)s(x,y,129-x,1,x+i,y)else s(y,0,1,x,y,-i)s(y,x,1,129-x,y,x+i)end end flip()i+=.5if(i<1)goto _ k+=.1m=1-m goto s
English
0
0
0
112