p F[gets.hex]while F=->a,b=a+1{a<r=1or(1..11).find{r<=(c=a%r<<=4)&&c<b&&F[a/r,c]}}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page