中国DOS联盟

@echo off

::::::::::::::::::::::::::IP And Integer {s11ss 2007-9-25}::::::::::::::::::::::::::

set result=

if "%1" equ "/1" goto :ip2int

if "%1" equ "/2" goto :int2ip

echo Please input a parameter, /1 or /2 . 

goto :e

:ip2int

echo Please input an IP,like 127.0.0.1:

set/p ip=

for /f "delims=. tokens=1-4" %%a in ('echo %ip%') do set/a result+=%%a*256*256*256+%%b*256*256+%%c*256+%%d

goto :e

:int2ip

echo Please input an Integer,like 2130706433:

set/p int=

set/a quotient=%int%

:c

set/a remainder=%quotient%%%256

set/a quotient=%quotient%/256

if "%result%" equ "" (set result=%remainder%) else (set result=%remainder%.%result%)

if not %quotient% equ 0 goto :c

goto :e

:e

echo.

echo.%result%

echo Press Any Key To Exit...

pause>nul