@rem 金が絡むなら自己責任でどうぞ @echo off & setlocal enabledelayedexpansion & set "b=" & set "h=" set "a=123456789ABCDEFGHJKLMNPQRSTUVWXYZabcdefghijkmnopqrstuvwxyz" set /p "b=Base58=" & set "z=%a:~0,1%" & set /a "n=1,d=0,e=58" set "c=!b!-" & set "b=%z%!b!" & set "f=0123456789abcdef" :1 for /L %%i in (0,1,57) do if "!a:~%%i,1!"=="!b:~-1!" set /a e=%%i if %e%==58 (exit /b) else set /a "g%n%=e" & set "b=!b:~0,-1!" if defined b set /a "n+=1,e=58" & goto 1 :2 set /a "b=0,e=0" & for /L %%i in (%n%,-1,1) do ( set /a "g%%i+=b*58,b=g%%i%%16,e|=g%%i/=16") set "h=!f:~%b%,1!%h%" & set /a "d=(d+1)%%2" & if %e% neq 0 goto 2 if "%h%"=="0" (set "h=") else if %d%==1 set "h=0%h%" :3 if "%c:~0,1%"=="%z%" set "h=00%h%" & set "c=%c:~1%" & goto 3 if defined h echo Hex=%h% & pause
