How many characters of code did you use?
500

Include your code here, if you'd like to show it off!
function r(b,m,s)if(p(b))n=(n&~m)>>>s|(n&m)<<s*4end
function v()r(0,0x8421.08,-1)r(1,0x842.108,1)r(2,-2048,-5)r(3,.06055,5)if(p(5))s^^=n
end
l=0function d(n,f,c)for i=0,24do if(n&1<<15-i!=0)?f,43+i%5*9,y+i\5*9,c
end
end::y::if(l%5==0)s=8c=9+l%6
k=rnd(l)n=s
l+=1p=function()return rnd()>.96^l
end
q=n::u::v()if(p()or s==0or q==s)goto u
g=s
n=q
s=q
p=btnp::d::if(k>0)?"⁷g"..k
flip()cls()?l
k=p()*3.5y=13o="(ᵇ~ノᵇk-)"v()if(p(4))s=q
d(~0,o,1)d(s,"●",c)d(n,o,7)if(s==g)goto y
y=73d(~0,o,1)d(g,"●",12)goto d