Network mask v2 by Carlos Gutierrez

do
input""a$
if"4"<a$end
b=!split(a$,docu$(),".")
for i=0to 4b=b+mod(val(bin$(val(docu$(i)))),9)next
?b
loop

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

download

return to the top page