IPv6 prefix representation by *yuko*

1k=peek(0):if k<0k=58
if k-58t$=chr$(k)+"."+t$
if k=58s$=left$(t$+"0.0.0.0.",8)+s$:t$=""
if len(s$)<64goto 1
?s$,"ip6.arpa."

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page