2kiber_punk: а эту функцию можно использовать для добавления 0x100?
@echo off
setlocal enableextensions enabledelayedexpansion
set /a Decimal = 511
call :DecimalToHex %Decimal% Hex
echo Decimal [%Decimal%] == Hex [%Hex%]
endlocal
exit /b 0
rem ===============================================================
:DecimalToHex DecimalValueIn HexStringOut
rem ===============================================================
setlocal enableextensions enabledelayedexpansion
set /a DecimalValue = %1
set HexString=
:Repeat
set /a Index = DecimalValue %% 16 + 1
set /a DecimalValue = DecimalValue / 16
for /f "tokens=%Index%" %%h in ("0 1 2 3 4 5 6 7 8 9 A B C D E F") do set HexString=%%h%HexString%
if %DecimalValue% GTR 0 goto :Repeat
endlocal & set %2=%HexString%
exit /b 0
rem ===============================================================
Наподобие такого (на примере «set /p…» из оригинального скрипта):
@echo off
setlocal enableextensions enabledelayedexpansion
set /p Adress=Enter offset address, default - begin file:
if "%Adress%"=="" (
set Adress=100
) else (
set /a DecimalAdress = 0x!Adress! + 0x100
call :DecimalToHex !DecimalAdress! Adress
rem echo Here Adress in hex = !Adress!
)
echo HexAdress [%Adress%]
endlocal
exit /b 0
rem ===============================================================
:DecimalToHex DecimalValueIn HexStringOut
rem ===============================================================
setlocal enableextensions enabledelayedexpansion
set /a DecimalValue = %1
set HexString=
:Repeat
set /a Index = DecimalValue %% 16 + 1
set /a DecimalValue = DecimalValue / 16
for /f "tokens=%Index%" %%h in ("0 1 2 3 4 5 6 7 8 9 A B C D E F") do set HexString=%%h%HexString%
if %DecimalValue% GTR 0 goto :Repeat
endlocal & set %2=%HexString%
exit /b 0
rem ===============================================================
alexii, извиняюсь, впредь больше такого не повторится
Ну, что Вы, это была просто просьба 
.
OFF: сделано на основе TSCMD032 FAQ: How can I convert a decimal number to binary, octal, hexadecimal? Assorted NT/2000/XP/.. CMD.EXE script tricks written by Timo Salmi. Много там, конечно, совершенно лишнего — я многое убрал, но вот использование:
call :LabelName %ArgIn% ArgOut
для вызова функции «:LabelName» и возврат значения «Variable» в вызывающий скрипт через параметры в виде:
endlocal & set %2=%Variable%
я встретил впервые. Самое интересное, что это работает. Как говорится, chapeau!
]]>
Тогда вам нужен шестнадцатиричный редактор.
)
