k=$1{for(j=2;j<k;)k%j?j++:k/=j;for(;k>=1;k/=2)a=k%2<1?"_"a:"-"a}$0=a
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page