And the crappiest

There's an amusing bug if you play for long enough
ink 255*256,0
line 0,0,0,8
ink 128*256,0
dot 0,8
ink rgb(255,255,255),0
dot 0,1
get image 1,0,0,1,9
cls
line 20,59,121,60
line 120,49,121,60
sync on
lvl=0 : xp=0 : s=2
set text opaque
DO
if (mouseclick()>0)>mc then inc xp,s
mc=mouseclick()>0
if xp>99 then xp=(xp+s)-100 : inc lvl,1 : inc s,1
text 20,20,"Lvl. "+str$(lvl)
sprite 1,20,50,1
stretch sprite 1,100*xp,100
sync
LOOP
2 lines!
ink 255*256,0 : line 0,0,0,8 : ink 128*256,0 : dot 0,8 : ink rgb(255,255,255),0 : dot 0,1 : get image 1,0,0,1,9 :cls :line 20,59,121,60 :line 120,49,121,60 :vl=0 :xp=0 :s=2 :set text opaque :sync on
DO :if (mouseclick()>0)>mc: inc xp,s :endif :mc=mouseclick()>0 :if xp>99 :xp=(xp+s)-100 : inc lvl,1 : inc s,1 :endif :text 20,20,"Lvl. "+str$(lvl) :sprite 1,20,50,1 :stretch sprite 1,100*xp,100 :sync :LOOP
"You must be someone's friend to make comments about them." - MySpace lied.
