REM geeks4yu.blogspot.com
@echo off
title Rar Password Cracker
mode con: cols=47 lines=20
copy 'C:Program FilesWinRARUnrar.exe'
SET PSWD=0
SET DEST=%TEMP%%RANDOM%
MD %DEST%
: RAR
cls
Echo----------------------------------------------
echo GET DETAIL
Echo----------------------------------------------
Echo.
SET/P 'NAME=Enter File Name : '
IF '%NAME%'' goto NERROR
goto GPATH
:NERROR
Echo----------------------------------------------
echo ERROR
Echo----------------------------------------------
Echo Sorry you can't leave it blank.
pause
goto RAR
: GPATH
SET/P 'PATH=Enter Full Path : '
IF '%PATH%'' goto PERROR
goto NEXT
: PERROR
Echo----------------------------------------------
echo ERROR
Echo----------------------------------------------
Echo Sorry you can't leave it blank.
pause
goto RAR
: NEXT
IF EXIST '%PATH%%NAME%' GOTO START
goto PATH
: PATH
cls
Echo----------------------------------------------
echo ERROR
Echo----------------------------------------------
Echo Opppss File does not Exist.
pause
goto RAR
: START
SET /A PSWD=%PSWD%+1
UNRAR E -INUL -P%PSWD% '%PATH%%NAME%' '%DEST%.'
IF /I %ERRORLEVEL% EQU 0 GOTO FINISH
GOTO START
: FINISH
RD %DEST% /Q /S
Del 'Unrar.exe'
cls
Echo----------------------------------------------
echo CRACKED
Echo----------------------------------------------
Echo.
Echo PASSWORD FOUND!
echo FILE = %NAME%
echo CRACKED PASSWORD = %PSWD%
pause>NUL
exit
REM