Encrypt-Decrypt files using CMD (Batch)

:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
::Encrypt-Decrypt files using CMD                            ::
::Created by RU$$ [http://russdev.mooo.com/]                 ::
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
@ECHO OFF
TITLE Encrypt-Decrypt files using CMD
setlocal enabledelayedexpansion
SET BASE=-
SET DIR=-
SET file=-

If exist 7z.exe (GOTO :EXISTS1) else (GOTO :NOTEXISTS)

:EXISTS1
If exist 7z.dll (GOTO :EXISTS) else (GOTO :NOTEXISTS)

:NOTEXISTS
cls

Echo You do not have the needed 7z files in your dirrectory.
Echo.

SET INPUT=
SET /P INPUT= Do you wish to download them from GitHub? (Y/N):

IF /I '%INPUT%'=='Y' GOTO :DOWNLOAD
IF /I '%INPUT%'=='y' GOTO :DOWNLOAD
IF /I '%INPUT%'=='N' GOTO :CANCLED
IF /I '%INPUT%'=='n' GOTO :CANCLED

goto :NOTEXISTS

:CANCLED
cls

Echo ERROR: You need to download the needed files. Now exiting.
Echo.
pause.
exit

:DOWNLOAD
Echo STATUS: Now downloading the 7z directory files..

SET URL=http://7z-basefiles.webredirect.org/7z.zip
bitsadmin /transfer mydownloadjob /download /priority normal ^ %URL% %~dp0\x.zip

Echo STATUS: Extracting files..
powershell.exe -nologo -noprofile -command "& { Add-Type -A 'System.IO.Compression.FileSystem'; [IO.Compression.ZipFile]::ExtractToDirectory('%~dp0x.zip', '%~dp0'); }"
del /Q x.zip

cls
Echo STATUS: File(s) have downloaded successfully!
Echo.
Pause.
GOTO :EXISTS

::EXISTS
:EXISTS
cls

Echo Welcome to the Encrypt/Decrypt Menu!
Echo 1. Encrypt an file
Echo 2. Decrypt an file
Echo 3. Exit (Delete 7z)
Echo.

SET INPUT=
SET /P INPUT= Please select an option:

IF /I '%INPUT%'=='1' GOTO :ENCRYPT
IF /I '%INPUT%'=='2' GOTO :DECRYPT
IF /I '%INPUT%'=='3' GOTO :EXIT

goto :EXISTS

::ENCRYPT
:ENCRYPT

.>> ListFile.txt

:START
cls

Echo Select a base to bind. (Must include extension)
Echo 1. Back to menu
Echo.
SET /p BASE=File Name:

IF /I '%BASE%'=='1' GOTO :EXISTS
If exist %BASE% (GOTO :ZIP) else (GOTO :ERROR1)

:ERROR1
cls

Echo ERROR: File not found!
Echo.

Pause.
GOTO :START

:ZIP
::Display
cls

echo ============================================================
echo Current List:
echo ============================================================
for /f "tokens=*" %%a in ('type ListFile.txt') do (
set line=%%a
echo !line! )
echo ============================================================
echo 1. Complete list
echo 2. Delete List
echo 3. Back to menu
echo.

Echo Select files you wish to add to the zip. (Must include extension)
Set /p DIR=File Name:

IF /I '%DIR%'=='1' GOTO :COMPLETE
IF /I '%DIR%'=='2' GOTO :DELST
IF /I '%DIR%'=='3' GOTO :MNU

If exist %DIR% (GOTO :CHECK) else (GOTO :ERROR2)

:CHECK
Echo %DIR% >> ListFile.txt
goto :ZIP

:DELST
cls
DEL ListFile.txt
.>> ListFile.txt
cls

Echo STATUS: List was deleted!
Echo.

Pause.
GOTO :ZIP

:ERROR2
cls

Echo ERROR: File not found!
Echo.

Pause.
GOTO :ZIP

:COMPLETE
cls
Echo Now compressing your ZIP..

7z a -tzip OUT.zip @ListFile.txt
cls
Echo Compression sucessful.
Echo.

Pause.
GOTO :NAME

:NAME
cls

Echo Create a name for your output file. (Must include extension)
Set /p FNAME=File Name:

GOTO :CRYPT

:CRYPT
cls
Echo Now encrypting %BASE%...
copy /b %BASE% + OUT.zip "%FNAME%"

cls
Echo Process complete! File has been encrypted. Returning to menu.
Echo.
pause.
GOTO :MNU

:MNU
DEL OUT.zip
DEL ListFile.txt

GOTO :EXISTS

::DECRYPT
:DECRYPT
cls

Echo Select the name of the file you with to extract. (Must include extension)
Echo 1. Go to menu
Echo.
set /p file=File Name:

IF /I '%file%'=='1' GOTO :EXISTS
If exist %file% (GOTO :LOCT) else (GOTO :NOTEXISTS1)

:NOTEXISTS1
cls

Echo ERROR: File not found!
Echo.

Pause.
GOTO :DECRYPT

:LOCT
%~dp07z.exe e -y %file% -o%temp%\Extracted\%file%

cls
cd %temp%\Extracted\%file%
echo ============================================================
echo FILES IN ZIP:
echo ============================================================
echo.
dir /b /a-d
echo.
echo ============================================================
echo END OF FILE.
echo ============================================================
echo.

cd %~dp0

::CMenu
SET INPUT=
SET /P INPUT= Do you wish to extract these files? (Y/N):

IF /I '%INPUT%'=='Y' GOTO :CONFIRMEDEX
IF /I '%INPUT%'=='y' GOTO :CONFIRMEDEX
IF /I '%INPUT%'=='N' GOTO :OPTCANCLED
IF /I '%INPUT%'=='n' GOTO :OPTCANCLED

goto :LOCT

:OPTCANCLED
cls
RMDIR /s /q %temp%\Extracted

Echo Operation cancled! Returning to menu.
Echo.
Pause.
GOTO :EXISTS

:CONFIRMEDEX
RMDIR /s /q %temp%\Extracted

Echo STATUS: Now extracting encrypted files!
%~dp07z.exe e -y %file% -o%~dp0Extracted

cls
Echo STATUS: Files have been sucessfuly extracted to %~dp0Extracted
Echo.
pause.

GOTO :EXISTS

:EXIT
Echo Exiting batch, Cleaning up files..

cd %~dp0
Del /Q 7z.dll
Del /Q 7z.exe

exit