How many characters of code did you use?
500

Include your code here, if you'd like to show it off!
poke(0x5f2c,3)
x=32y=48b=0c=1s=0h=0i=0yd=0
xd=0function _update60()if s==0then
if b>0then c=-1end
if b<-50then c=1end
b=b+c
if btnp(5)then
s=1end
else
x,y=cnp(x,y,1,b/-100)if x>24and x<36then
if y>3and y<17then
i+=1if i>h then h=i end
x=rnd(40)+10y=rnd(20)+30s=0end
elseif abs(x-48)>48or abs(y-48)>48then
i=0
x=rnd(40)+10y=rnd(20)+30s=0end
end
cls(3)circfill(32,10,7,7)circ(32,10,4,8)?"|",55+b,54
?"웃",x-2,y,0
?i,10,8,10
?h,52,8,2
end
function cnp(x,y,s,a)xd=cos(a)*s
yd=sin(a)*s
return x+xd,y+yd
end