Paso 1: el código
Xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx xxxxxxxxxxxx
De
SetLocal EnableExtensions EnableDelayedExpansion
Set /P "= Escriba una contraseña:" < Nul
Llamar al: PasswordInput
Eco (la entrada era:! Línea!
GOTO: Eof
: PasswordInput
:: Autor: Carlos Montiers Aguilera
:: Ultima actualización: 20150401. Creado: 20150401.
:: Definir en línea variable una contraseña de entrada
For /F omitir ^ = 1 ^ delims ^ = ^ eol ^ = %% # en ()
"" Echo (| Replace.exe «% ~ f0 ". / U/w «') Set "CR = %% #"
For /F %% # en ()
"" Sugerirán el $H & %% _ en (_) Rem "') Set" BS = %% #"
Conjunto "línea ="
: _PasswordInput_Kbd
Conjunto "CHR =" & skip/f ^ = 1 ^ delims ^ = ^ eol ^ = %% # en ()
' Replace.exe «% ~ f0 ". / U/w ') Set "CHR = %% #"
If! CHR. ==! CR! Eco (& Goto: Eof
If! CHR! ==! BS! (Si se ha definido la línea (Set /P "=! BS! BS!" Conjunto "línea =! Línea: ~ 0, -1! "
)
) Más (Set /P "= *" si! CHR. ==! (Sistema "línea =! Línea! ^! "
) Set otra "línea =! Línea!!!! CHR."
)
GOTO: _PasswordInput_Kbd
Xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
