Создать bat на копирование файлов из большого каталога с вложенными папками

@echo off
set "list=C:\Users\Александр Кузнецов\Desktop\Макеты.txt"
set "source=C:\YandexDisk-Axe11ius"
set "destination=C:\Users\Александр Кузнецов\Desktop\Макеты на сегодня"
powershell -executionpolicy bypass -command "$list=Get-Content '%list%';" ^
    "$files=Get-ChildItem '%source%' -file -Recurse | where {$_.Extension -eq '.png'};" ^
    "$list | foreach {$iter=$_; $files | where {$_.BaseName -eq $iter} | foreach {$basename=$_.basename; if (Test-Path """%destination%\$($_.name)""" -PathType Leaf) {$duplicate=Get-ChildItem '%destination%' -file | where {$_.Name -match """^$($basename)"""}; if ($duplicate) {if ($duplicate.count -gt 1) {Copy-Item $_.FullName """%destination%\$($_.BaseName) ($($duplicate.count-1))$($_.Extension)"""} else {Copy-Item $_.FullName """%destination%\$($_.BaseName) (1)$($_.Extension)"""}}} else {Copy-Item $_.FullName '%destination%'}}}"
pause
exit

@echo off
set "list=C:\Users\Александр Кузнецов\Desktop\Макеты.txt"
set "source=C:\YandexDisk-Axe11ius"
set "destination=C:\Users\Александр Кузнецов\Desktop\Макеты на сегодня"
powershell -executionpolicy bypass -command "$list=Get-Content '%list%';" ^
    "$files=Get-ChildItem '%source%' -file -Recurse | where {$_.Extension -eq '.png'};" ^
    "$list | group {$_} | foreach {$basename=$_.name; if ($_.count -eq 1) {$files | where {$_.BaseName -eq $basename} | foreach {Copy-Item $_.fullname '%destination%'}}; if ($_.count -gt 1) {1..$($_.count) | foreach -Begin {$file=$files | where {$_.BaseName -eq $basename}} -Process {if ($_ -eq 1) {Copy-Item $file.fullname '%destination%'} else {Copy-Item $file.fullname """%destination%\$($file.basename) ($($_-1))$($file.extension)"""}}}}"
pause
exit

@Echo Off
cls
>nul chcp 1251
    Set "BoxIn=C:\YandexDisk-Axe11ius"
    Set "BoxOut=C:\Users\Александр Кузнецов\Desktop\Макеты на сегодня"
    Set "FileList=C:\Users\Александр Кузнецов\Desktop\Макеты.txt"
    sET "Ext=png"
 
    For /F "usebackq delims=" %%i In (`2^>nul More "%FileList%"`) Do (
        For /F "usebackq delims=" %%f In (`2^>nul Dir /B /S /A:-D "%BoxIn%\%%i.%Ext%"`) Do Call :MyCopy "%%f" "%BoxOut%"
    )                                                                                                              %
pause
Exit /B 0
 
:MyCopy
    If Not Exist "%~2\%~nx1" >nul Copy %1 "%~2\" &Exit /B 0
    Set /A N=100
    :Begin
        Set /A N+=1
        If Not Exist "%~2\%~n1(%N:~-2%)%~x1" >nul Copy %1 "%~2\%~n1(%N:~-2%)%~x1" &Exit /B 0
        GoTo :Begin
Exit /B 0

del /f /q "%destination%\*"

@Echo Off
cls
>nul chcp 1251
        Set "BoxIn=C:\YandexDisk-Axe11ius"
        Set "BoxOut=C:\Users\Александр Кузнецов\Desktop\Макеты на сегодня"
        Set "FileList=C:\Users\Александр Кузнецов\Desktop\Макеты.txt"
        Set "Ext=png"
    Set /A Max=99
 
        Pushd "%BoxOut%" &&(
        For /F "usebackq Skip=%Max% delims=" %%i In (`2^>nul Dir /B /A:-D *.*`) Do 2>nul Rd /S /Q "%BoxOut%" &GoTo :Continue
        :Continue
            Popd
    )
 
        For /F "usebackq delims=" %%i In (`2^>nul More "%FileList%"`) Do (
            For /F "usebackq delims=" %%f In (`2^>nul Dir /B /S /A:-D "%BoxIn%\%%i.%Ext%"`) Do Call :MyCopy "%%f" "%BoxOut%"
        )
pause
Exit /B 0
 
:MyCopy
    If Not Exist "%~2\%~nx1" >nul Copy %1 "%~2\" &Exit /B 0
    Set /A N=100
    :Begin
        Set /A N+=1
        If Not Exist "%~2\%~n1(%N:~-2%)%~x1" >nul Copy %1 "%~2\%~n1(%N:~-2%)%~x1" &Exit /B 0
        GoTo :Begin
Exit /B 0