Compressed Bytes used
1019

Source Code (OPTIONAL)
pal(15,-5,1)n={e=63,f=63,i=0,d=0}o={}c={}l={}s={}i,h,d=0,0,1for n=1,10do add(l,{e=rnd(128),f=rnd(128),o=rnd(.2)})add(s,{e=rnd(384),f=rnd(10)+100})end function _draw()g,x,C=max(g,i),{▒,▤,░,ˇ,…},{15,11}cls(12)t=time()if(t%2==0)add(o,{e=130,f=rnd(80)+20,t=true})
a,r,e,f=(-60-t*10)%(231)-56,10+sin(t/10)*10,n.e,n.f circfill(a,r,30-sin(t),10)for n=1,10do for e=1,2do local n,f=cos(n/10+t/10),sin(n/10+t/10)line(e+a+n*40,r+f*40,e+a+n*55,r+f*55)end end foreach(l,function(n)n.e-=n.o n.e%=128for e=1,4do circfill(n.e+e*2,n.f,5+n.o*2,6)end end)foreach(s,function(n)n.e-=.5+tonum(n.f>105)n.e%=384circfill(n.e-128,n.f+100,100,C[1+tonum(n.f>105)])if n.f<114then?"▥",n.e-128,n.f-2,15
?"░",n.e-100,n.f-1,3
if(n.f>108.5)?"⌂",n.e-120,n.f,4
end end)foreach(c,function(n)circfill(n.e,n.f,n.o,7)n.o-=.1n.e+=n.i if(n.o<0)del(c,n)
end)foreach(o,function(e)if not u then e.e-=1+i/30if(e.e<-10)del(o,e)
if(e.e<n.e and e.t)i+=1e.t=false?"s4x5c1egc2egc3egc4"
u=e.e>50and e.e<70and abs(e.f-n.f)>30end rectfill(e.e,0,e.e+10,e.f-30,3)rectfill(e.e,e.f+30,e.e+10,128)rectfill(e.e+7,0,e.e+9,e.f-30,15)rectfill(e.e+7,e.f+30,e.e+9,128)ovalfill(e.e-2,e.f+29,e.e+12,e.f+32)ovalfill(e.e-2,e.f+30,e.e+12,e.f+33,3)ovalfill(e.e-2,e.f-30,e.e+12,e.f-32)ovalfill(e.e+1,e.f+30,e.e+9,e.f+32,1)end)if u then n.i-=.05n.d+=.5if(n.f>140)o={}n={e=63,f=63,i=0,d=-5}i=0u=false
else if(btnp(5))add(c,{e=n.e,f=n.f-4,i=-1,o=rnd(5)+2})h+=1n.d=-3?".v3x1a<b<c<d<e<f<a"
if(n.f>128)n.d*=.4
n.f%=128n.d+=.3end n.e+=n.i n.f+=n.d fillp(x[-ceil(n.i*5)])line(e+8,f-n.d,e+10,f-n.d,9)for d=0,1do line(e+d*2,f,e-(4-d*2)-n.d/2,f+7-n.d/3,1)end circfill(e+6,f-n.d,3,10)circfill(e,f,5)circfill(e+7,f-n.d,0,1)ovalfill(e-2,f-n.d/3,e+2,f-n.d+2,9)if(btnp(4))d+=1S=not S
if S then d*=3if(d>8)d=8
else if(d>.01)d*=.5
end rectfill(0,-1,128,d-1,13)?"SCORE:"..i,4,1,1
?" HI SCORE:"..g.." FLAPS:"..h,37,d-7
end