Linea: 11
Caracter: 1
Error: Error no especificado
Codigo: 80004005
Origen: (null)

setlocal enabledelayedexpansion
:main
set "string="
set /p "string=string: "
if not defined string goto main
set "output="
set "count=0"
:loop
if "!string:~%count%,1!" neq "" (
set "char=!string:~%count%,1!"
if "!char!" equ "A" set "output=!output!0"
if "!char!" equ "B" set "output=!output!1"
if "!char!" equ "C" set "output=!output!2"
if "!char!" equ "D" set "output=!output!3"
if "!char!" equ "E" set "output=!output!4"
if "!char!" equ "a" set "output=!output!5"
if "!char!" equ "b" set "output=!output!6"
if "!char!" equ "c" set "output=!output!7"
if "!char!" equ "d" set "output=!output!8"
if "!char!" equ "e" set "output=!output!9"
set /a "count+=1"
goto loop
)
echo output: !output!
goto main

string: ABCDEabcde
output: 0123456789

for /f "delims= " %%%% in () do ()

@echo on
setlocal enabledelayedexpansion
:main
cls
set/p "texto=String>> "
set/a cont=0
call :lenght
cls
set "string=%texto%"
for /l %%_ in (1,1,%cont%) do (
if ["!let[%%_]!"]==["A"] (set "string=%string:A=1%")
if ["!let[%%_]!"]==["B"] (set "string=%string:B=2%")
if ["!let[%%_]!"]==["C"] (set "string=%string:C=3%")
if ["!let[%%_]!"]==["D"] (set "string=%string:D=4%")
if ["!let[%%_]!"]==["a"] (set "string=%string:a=5%")
if ["!let[%%_]!"]==["b"] (set "string=%string:b=6%")
if ["!let[%%_]!"]==["c"] (set "string=%string:c=7%")
if ["!let[%%_]!"]==["d"] (set "string=%string:d=8%")
)
echo.%texto%
echo.
echo.%string%
pause
exit
:lenght
set "var=!texto:~%cont%,1!"
if not defined var (goto:eof)
set/a cont+=1
set "let[%cont%]=%var%"
goto:lenght