中国DOS联盟

不错不错，这个算法精简多了
建议右边部分取9位，这样尽量减少算法使用的时间

@echo off&setlocal enabledelayedexpansion
set hex=0123456789ABCDEF
for /f "usebackq tokens=1,2*" %%i in ("ip.txt") do (
if not "%%i"=="" set var=&set h=&set s=%%i&call:lp
set/a ha=0x!var:~-8,2!,hb=0x!var:~-6,2!,hc=0x!var:~-4,2!,hd=0x!var:~-2,2!
set str1=!ha!.!hb!.!hc!.!hd!
if not "%%j"=="" set var=&set h=&set s=%%j&call:lp
set/a ha=0x!var:~-8,2!,hb=0x!var:~-6,2!,hc=0x!var:~-4,2!,hd=0x!var:~-2,2!
set str2=!ha!.!hb!.!hc!.!hd!
>>ip1.txt echo !str1! !str2! %%k
)
start "" "ip1.txt"
pause&goto :eof
:lp
set/a m=s/16,n=s%%16
set n=!hex:~%n%,1!
set h=%n%%h%
if %m% geq 16 set s=%m%&goto lp
set m=!hex:~%m%,1!
set var=0%m%%h%


看看 这样会不会 有什么问题呢？

[ Last edited by cz1314 on 2009-1-4 at 14:12 ]

有没有问题，你自己测试一下不就知道了么？

我也来练习一下，
@echo off for /f "tokens=1,2,3" %%i in (test.txt) do call :conv %%i&call :conv %%j&echo %%k goto :EOF :conv set/a ip=%1,ip1_=0 if %ip% lss 0 set/a ip=ip+2147483647+1,ip1_+=128 set/a ip1=ip/16777216,ip-=ip1*16777216,ip1+=ip1_ set/a ip2=ip/65536,ip-=ip2*65536 set/a ip3=ip/256,ip-=ip3*256 set /p =IP,%1 %ip1%.%ip2%.%ip3%.%ip% <nul

哇,厉害!

19楼上改进
@echo off&setlocal enabledelayedexpansion cd.>ip1.txt for /f "tokens=1,2,3" %%i in (ip.txt) do ( set n=0 call:lp %%i %%j >>ip1.txt echo !str1! !str2! %%k ) pause&goto :eof :lp set/a ip=%1,n+=1 if %ip% lss 0 (set/a ip-=2147483648,_ip=128)else set _ip=0 set/a ip1=ip/16777216,ip2=ip%%16777216/65536,ip3=ip%%65536/256,ip4=ip%%256,ip1+=_ip set "str%n%=%ip1%.%ip2%.%ip3%.%ip4%" if not "%2" == "" call:lp %2

位移版，似乎更简单点
@echo off for /f "tokens=1,2,3" %%i in (test.txt)do call:conv %%i&call:conv %%j&echo %%k goto:EOF :conv for %%i in (24 16 8 0)do set/a ip%%i=%1^>^>%%i^&255 set /p=IP,%1 %ip24%.%ip16%.%ip8%.%ip0% <nul

[ Last edited by linee on 2009-1-6 at 21:06 ]

22楼的应该是绝版了
偶学习了

[ Last edited by netbenton on 2009-1-7 at 02:54 ]

22 楼 好象没有输出大批文本啊。。。

@echo off
>IP_out.txt cd.
for /f "tokens=1,2,3" %%i in (ip.txt)do call:conv %%i&call:conv %%j&echo %%k >>IP_out.txt
type IP_out.txt
pause
goto:EOF
:conv
for %%i in (24 16 8 0)do set/a ip%%i=%1^>^>%%i^&255
set /p= %ip24%.%ip16%.%ip8%.%ip0% <nul >>IP_out.txt

[ Last edited by netbenton on 2009-1-8 at 01:12 ]

Originally posted by netbenton at 2009-1-8 01:06:
@echo off
>IP_out.txt cd.
for /f "tokens=1,2,3" %%i in (ip.txt)do call:conv %%i&call:conv %%j&echo %%k >>IP_out.txt
type IP_out.txt
pause
goto:EOF
:conv
for %%i ...

22# 25# 似乎都对超过4294967295 的数字不能转换了.

这是32bit机器上的上限.

并且, 对于超出范围的数据,比如:
50331648 1033418400 US 4000000001 50332671 US 3549476416 50332927 US 4000000000 50333695 US 4007483643 50333951 US 11111111111 11111111110 cn 2123369536 50334719 US 4294967295 4294967294 us 11111111111 11111111110 cn

输出结果会取用上一个有效数据的值.

牛人啊！顶一个，最近几天忙着培训，没时间来学习了，呵呵。

超过32位的可以分成两截来处理,如15楼的方法,
只是不知道超过32位的ip地址有什么用?


3.0.0.0 61.152.182.160 US
238.107.40.1 3.0.3.255 US
211.144.182.64 3.0.4.255 US
238.107.40.0 3.0.7.255 US
238.221.88.251 3.0.8.255 US
2.150.70.25.199 2.150.70.25.198 cn
126.144.12.64 3.0.11.255 US
255.255.255.255 255.255.255.254 us
2.150.70.25.199 2.150.70.25.198 cn

netbenton


非常感谢！也感谢所有老师的帮助！