BAT резервного копирования

@echo off
SetLocal EnableDelayedExpansion
set "source=E:\inform"
set "destination=E:\Backup"
set "destination2=C:\Users\Admin\YandexDisk"
set dd=%DATE:~0,2%
set mm=%DATE:~3,2%
set yyyy=%DATE:~6,4%
set curdate=%dd%-%mm%-%yyyy%
"C:\Program Files\7-Zip\7z.exe" a -tzip -ssw -mx1 -r0 %destination%\backup_%curdate%.zip %source%
xcopy "%destination%\backup_%curdate%.zip" "%destination2%" /Y
for /f "tokens=1,2,3 delims=." %%a in ("%date%") do (
    set day=%%a
    set month=%%b
    set year=%%c
)
if %day%==01 set day=1
if %day%==02 set day=2
if %day%==03 set day=3
if %day%==04 set day=4
if %day%==05 set day=5
if %day%==06 set day=6
if %day%==07 set day=7
if %day%==08 set day=8
if %day%==09 set day=9
if %month%==01 set month=1
if %month%==02 set month=2
if %month%==03 set month=3
if %month%==04 set month=4
if %month%==05 set month=5
if %month%==06 set month=6
if %month%==07 set month=7
if %month%==08 set month=8
if %month%==09 set month=9
set /A full_month=%month%-1
if %full_month%==0 (
    set /A summ_day_in_today=%day%+^(%year%-1^)*365
)
set 1=31
set 2=28
set 3=31
set 4=30
set 5=31
set 6=30
set 7=31
set 8=31
set 9=30
set 10=31
set 11=30
set 12=31
for %%a in (1 2 3 4 5 6 7 8 9 10 11 12) do (
    if defined summ_day_in_today goto step_2
    set number_month=%%a
    if %full_month% lss !number_month! (
        goto step_2
    ) else (
        call :step_1
    )
)
:step_2
if not defined summ_day_in_today (
    set /A summ_day_in_today=!summ_day:~1!+!day!+^(!year!-1^)*365
)
for /f "tokens=2,3,4 delims=_-." %%a in ('dir %destination2%\*.zip /a-d/b') do (
    set day=%%a
    set month=%%b
    set year=%%c
    if %day%==01 set day=1
    if %day%==02 set day=2
    if %day%==03 set day=3
    if %day%==04 set day=4
    if %day%==05 set day=5
    if %day%==06 set day=6
    if %day%==07 set day=7
    if %day%==08 set day=8
    if %day%==09 set day=9
    if !month!==01 set month=1
    if !month!==02 set month=2
    if !month!==03 set month=3
    if !month!==04 set month=4
    if !month!==05 set month=5
    if !month!==06 set month=6
    if !month!==07 set month=7
    if !month!==08 set month=8
    if !month!==09 set month=9
    if !month!==1 (
        set /A summ_day_in_file=!day!+^(!year!-1^)*365
        call :step_3
        if !raznica_dney! geq 2 (
            del %destination2%\backup_%%a-%%b-%%c.zip
            set full_month=
            set number_month=
            set summ_day=
            set summ_day_in_file=
            set raznica_dney=
        )
    )
    if not defined summ_day_in_today (
    set /A summ_day_in_today=!summ_day:~1!+!day!+^(!year!-1^)*365
    )
    if not !month!==1 set /A full_month=%month%-1
    if not !month!==1 call :step_4
    if not !month!==1 call :step_3
    if not !month!==1 (
        if !raznica_dney! geq 2 (
            del %destination2%\backup_%%a-%%b-%%c.zip
            set full_month=
            set number_month=
            set summ_day1=
            set summ_day_in_file=
            set raznica_dney=
            set summ_day=
        )
    )
)
pause
exit
:step_1
set summ_day=!summ_day!+!%number_month%!
exit /b
:step_3
set /A raznica_dney=!summ_day_in_today!-!summ_day_in_file!
echo %raznica_dney%
exit /b
:step_4
for %%a in (1 2 3 4 5 6 7 8 9 10 11 12) do (
    set number_month=%%a
    if !full_month! lss !number_month! (
        call :step_5
    ) else (
        call :step_6
    )
)
exit /b
:step_5
set /A summ_day_in_file=!summ_day1:~1!+!day!+^(!year!-1^)*365
exit /b
:step_6
set summ_day1=!summ_day1!+!%number_month%!
exit /b