中国DOS联盟

没有处理大数字的过滤。因为是我的一个BAT要用，所以没有考虑那么多。
然后也没有做参数过滤.
使用PING作初始处理.

代码还可以精简。但是我懒得弄了。精简完也就少几字节，运行时间少几毫秒.

没有做完全的测试。所以难免有BUG
@echo off
setlocal ENABLEDELAYEDEXPANSION
set /p num=num?
set str=0123456789ABCDEF
FOR /F "usebackq tokens=2 delims= " %%i IN (`ping -n 1 %num% ^|find "Pinging"`) DO (
FOR /F "tokens=1,2,3,4 delims=." %%a IN ("%%i") DO (
call :prog %%a
call :prog %%b
call :prog %%c
call :prog %%d
)
)
call :NOZERO_ %RUS%
echo %RUS%
::TEST结果
set /a p=0X%RUS%
echo %P%
::可以删除
pause
exit





://BLOCKS
:prog
set T1=%1
if %T1% LEQ 15 (
set T4=0
call set T3=%%str:~!T1!,1%%
) ELSE (
set /a T3=%T1%%%16
set /a TT=%T1%-!T3!
set /a T4=!TT!/16
set TT=
call set T3=%%str:~!T3!,1%%
call set T4=%%str:~!T4!,1%%
)
set RUS=%RUS%%T4%%T3%
goto :EOF

:NOZERO_
set T1=%1
:NOZERO
if "%T1:~0,1%"=="0" (set T1=%T1:~1%) ELSE set RUS=%T1%&GOTO :EOF
goto :NOZERO

还可以
速度慢了点

PING拿去了。。。。肯定了....

我来个简单点的:(最大处理数字是2147483647,超过就会出错!)

@echo off

setlocal ENABLEDELAYEDEXPANSION

set /p num=num?

set str=0123456789ABCDEF

call :A %num%

echo %T3%

echo %num%

pause

exit



:A

set T1=%1

SET T3=

:B

set/A T2=T1%%16

SET T2=!str:~%t2%,1!

SET/A T1=%T1%/16

SET T3=%T2%%T3%

IF %T1%==0 GOTO :EOF

GOTO B

十分感谢..

如果ping的时间能少点的话应该不至于那么慢