Character Count
255

Cartridge Code
cls()f=0c=0s=0t={1}m={1}::_::f=f+1if(f==100000) do
c=c+1f=0if(c==8) do
c=0s=s+1add(t,1)add(m,s)end
for i=-count(t),-1 do
if(t[-i] > 90) do del(t, t[-i])del(m, m[-i])
end
end
for i=1,count(t) do
t[i] = t[i]+1circfill(63,80,t[i],m[i])
clip()
end
end
goto _