How many characters of code did you use?
553

If you're comfortable with it, paste your game code here, so we can marvel at your achievement!
cartdata("sm")::z::
if(dget(1)==0)dset(1,999)
x,y,a,u=5,18,0,flr(dget(1))
function w(i)
if(pget(x,y)==i)return true
end
e={}for i=1,10 do
q=80/i
add(e,{s="█",y=i*10+8,t=q,l=q})end
::_::cls()a+=.03
for v in all(e) do
?v.s,116,v.y,7
if v.t>0 then v.t-=1 else
v.t=v.l
if(v.s=="😐")v.s="█"else v.s="😐"end
if(v.s=="😐")rectfill(113,v.y,12,v.y+4,1)end
?"♥ best:"..u,60,118,14
?"slink",54,5
?flr(a),62,11
rect(0,0,127,127)
if btnp(4) then
if(w(0))x+=8
if(w(7))y+=10 x=5
if(w(1))goto z
end
if w(14) then
if(a<dget(1))dset(1,a)goto z
end
?"웃",x,y
flip()goto _