Password bas:
Password Bas es un programa de almacenamiento de contraseñas, su funcionamiento es claro aunque inseguro para hackers, tu introduces una palabra clave como puede ser un correo o la cuenta de una web (ahora usaremos un ejemplo con elhacker.net) queremos introducir la pass de la web elhacker.net, pondremos como palabra clave erikelhacker (ejemplo), y de contraseña pondremos 123456, despues, una vez almacenadas, cuando le demos a buscar, pondremos erikelhacker y saldra la password 123456.

Remake:
Bueno, he hecho un remake de las variables, porque las variables tenian nombres un poco vulgares.

Password Bas 0.1:

@echo off
color fc
if exist c:\passwordbas cd c:\passwordbas
if not exist c:\passwordbas md c:\passwordbas
title PASSWORD BAS 0.1 ~ Creado por Erik
echo Bienvenido a password BAS! En este programa podras almacenar tus passwords.
echo.
goto passwords
:passwords
echo Bienvenido, que desea hacer: 
echo 1.Mirar
echo 2.Almacenar
echo 3.Salir
set /p ejecutar=Elijo la opcion: 
cls
if %ejecutar%==1 goto mirar
if %ejecutar%==2 goto almacenar
if %ejecutar%==3 exit
:almacenar
set /p name=Escribe el nombre para la password (Se utilizara cuando se busque): 
set /p contrasave=Escribe la contraseña: 
echo %contrasave%>%name%.txt
pause
cls
goto passwords
:mirar
set /p passmir=Escribe el nombre de la password que deseas mirar: 
if exist %name%.txt goto mostrar
if not exist %name%.txt goto passwords
:mostrar
echo Password: 
more %name%.txt
pause>nul
goto passwords

Password Bas Alpha 2:

@echo off
color fc
if exist c:\passwordbas cd c:\passwordbas
if not exist c:\passwordbas md c:\passwordbas
title PASSWORD BAS ALPHA 2 ~ Creado por Erik
echo Bienvenido a password BAS! En este programa podras almacenar tus passwords.
echo.
goto passwords
:passwords
echo Bienvenido, que desea hacer: 
echo 1.Mirar
echo 2.Almacenar
echo 3.Borrar
echo 4.Salir
set /p ejecutar=Elijo la opcion: 
cls
if %ejecutar%==1 goto mirar
if %ejecutar%==2 goto almacenar
if %ejecutar%==3 goto borrar
if %ejecutar%==4 exit
:almacenar
set /p name=Escribe el nombre para la password (Se utilizara cuando se busque): 
set /p contrasave=Escribe la contraseña: 
echo %contrasave%>%name%.pb
pause
cls
goto passwords
:mirar
set /p passmir=Escribe el nombre de la password que deseas mirar: 
if exist %name%.pb goto mostrar
if not exist %name%.pb goto passwords
:mostrar
echo Password: 
more %name%.pb
pause>nul
goto passwords
:borrar
set /p borrar=Introduce el nombre clave de la contraseña que desea borrar: 
if exist %borrar%.pb del %borrar%.pb
if not exist %borrar%.pb goto passwords
goto passwords