*** @shift
 *** @echo off
mode con cols=55
mode con lines=20
title CrackMe v 2.0 by SmartGenius
color 0a

:ini
cls
set var1=s
set var2=c
set var3=e
set r4=t
set v1=h
set l1=o
set l2=B
set l3=p
set la=%var3%
set %r4%=ll
echo.
echo.
echo*** bienvenido al Segundo CrackMe - batch...
echo.
echo*** Introduce el Password:
set /p pass=">> "
call :cript %pass%
echo.
if %v%==7vfesh07vay0ky0t3+y*** (goto be) else (goto pno)
pause
exit

:cript
set v=%1
set v=%v:a=23%
set v=%v:e=ni%
set v=%v:h=r%
set v=%v:r=y%
set v=%v:c=mo%
set v=%v:d=z%
set v=%v:3=+%
set v=%v:6=k%
set v=%v:P=na%
set v=%v:n=lwd%
set v=%v:z=1k5%
set v=%v:m=t3%
set v=%v:o=sm%
set v=%v:s=hd2%
set v=%v:l=7v%
set v=%v:d=x0g%
set v=%v:g=7v%
set v=%v:q=al%
set v=%v:w=fe%
set v=%v:j=u4%
set v=%v:4=0%
set v=%v:i=zm%
set v=%v:x=sh%
goto :eof

:be
echo.
echo*** Muy Bien...
echo.
pause
exit

:pno
echo.
echo*** Password Incorrecto Vuelve a intentarlo
echo.
pause
goto ini
  

 *** @echo off

color 70

mode con cols=50
mode con lines=5

title Serial Crackme v2 by KJ

:inicio
set pass=7vfesh07vay0ky0t3+y
call :descript %pass%
echo.
echo.
echo serial:****** %v%
echo.
pause>nul

:descript
set v=%1
set v=%v:23=a%
set v=%v:ni=e%
set v=%v:r=h%
set v=%v:y=r%
set v=%v:mo=c%
set v=%v:z=d%
set v=%v:+=3%
set v=%v:k=6%
set v=%v:na=p%
set v=%v:lwd=n%
set v=%v:1k5=z%
set v=%v:t3=m%
set v=%v:sm=o%
set v=%v:hd2=s%
set v=%v:7v=l%
set v=%v:x0g=d%
set v=%v:7v=g%
set v=%v:a=q%
set v=%v:fe=w%
set v=%v:u4=j%
set v=%v:0=4%
set v=%v:zm=i%
set v=%v:sh=x%
goto :eof
  

:difisil
set /a ont=ont+1
cls
echo.
echo.
set /p pass="Pass>"
goto random
:random
set r=%random%
set /a r=%r%cmdln%5
set r=%r:~0,2%
set r=%r:~1%

if %n%==0 goto random
if %n%==1 goto 1
if %n%==2 goto 2
if %n%==3 goto 3
if %n%==4 goto 4
if %n%==5 goto 5
if %n%==6 goto 6
if %n%==7 goto 7
if %n%==8 goto 8
if %n%==9 goto 9
:1
if %pass%== abcd (goto correcto2) else (goto contador2)
:2
if %pass%== bcda (goto correcto2) else (goto contador2)
:3
if %pass%== mpes (goto correcto2) else (goto contador2)
:4
if %pass%== pepe (goto correcto2) else (goto contador2)
:5
if %pass%== paco (goto correcto2) else (goto contador2)
:6
if %pass%== enesr (goto correcto2) else (goto contador2)
:7
if %pass%== cacas (goto correcto2) else (goto contador2)
:8
if %pass%== cuh (goto correcto2) else (goto contador2)
:9
if %pass%== forotos (goto correcto2) else (goto contador2)
:contador2
cls
echo MsgBox "Solo tienes 4 oportunidades. perdias %ont%.****** mm.......pista......no",48,"Contraseña erronea" >> func03.vbs
start func03.vbs
ping 1.0.0>nul
del func03.vbs
if %ont%==4 (goto fin) else (goto difisil)