Character Count
499

Game Code
i={"♥","●","❎","✽","◆"}poke(24364,3)m=50w=0s={0,0,0}o={32,0,0}a=1r=rectfill::_::b={0,0,0}for c=1,3do z=w>3-c and 20or max(0,s[c]-1)s[c]=z
o[c]+=z
r(13+c*8,9,19+c*8,50,1)y=o[c]/4for j=1,5do q=((z==0and y+8-y%8or y)+j*8)%40+9?i[j],13+c*8,q,j+7
if(q==25and z==0)b[c]=j end end
r(0,46,63,63,0)r(20,27,44,27,7)d=b[1]e=b[2]f=b[3]if(btnp()&32>0)w=w>0and w-1or 3m-=w\3a=1
if(f!=0and(d==e and e==f or d==3or e==3or f==3)and(d==e or d==f or e==f))m+=a*10a=0?"win 10",21,2,10
?"$"..m,27,50,10
flip()cls()goto _