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