10进制转换为16进制.bat

namejm写的批处理

@echo off
:: 10进制转换为16进制
:: code by 3742668 2006-6-28 CMD@XP
set /p 源数=输入十进制数字:
set /a 源数=%源数% || goto :eof

:dosomething
    set /a 余数 = %源数% %% 16
    set /a 源数 /= 16
    call :转换 %余数% 
    set 余数=%ret%
    set 计算结果=%余数%%计算结果%
    if %源数% lss 16 goto end
goto dosomething

:转换
    set ret=
    if "%1" == "10" set ret=A
    if "%1" == "11" set ret=B
    if "%1" == "12" set ret=C
    if "%1" == "13" set ret=D
    if "%1" == "14" set ret=E
    if "%1" == "15" set ret=F
    if %1 lss 10 set ret=%1
goto :eof

:end
call :转换 %源数%
set 源数=%ret%
if "%源数%" == "0" set 源数=
echo  0x%源数%%计算结果% 
set ret=
set 源数=
set 余数=
set 计算结果=
pause>nul