Beach560

::q:: a,b,f,x,y,v,j,l,h,o=0,128,0,64,16,0,rnd(9999),line,f,print function c(a,s) s=s or a/20 return cos((f*s+i+j)/(a*9))*a end ::_:: f+=1 if(btn(0))x-=1 if(btn(1))x+=1 if(btn(3))v-=0.3 y-=v x=mid(x,0,128) v=min(v-0.15,4) a=min(a+0.2,99) cls(15) circfill(100,30+f/30,15,9) i=0 ::s:: z = 90+(c(12)-c(4,-2)) l(i,b,i,z,12) l(i,z,i,z+c(2),7) l(i,b,i,b-a/5-(c(10,-0.5)-c(4)+c(2))*a/99,4) i+=1 if(i<b)goto s p=pget(x,y) if(p==12)v+=2 if(p==4)goto q o("\x86",x-3,y-3,8) o(f,1,8,5) if(h)o("high score:"..h,1,1...