【已解决】批处理如何将多个BAT代码合而为一？

思想之翼

若有如下若干BAT代码，如何将其合而为一？
恳望再次得到帮助。

@echo off
for /f "skip=10 delims=" %%i in ('dir /b /a-d /o-n /s "C:\001\lishi\*.txt"') do (
    copy "%%i" "C:\数据\1.txt"
    goto :eof
)

@echo off
for /f "skip=10 delims=" %%i in ('dir /b /a-d /o-n /s "C:\002\lishi\*.txt"') do (
    copy "%%i" "C:\数据\2.txt"
    goto :eof
)

@echo off
for /f "skip=10 delims=" %%i in ('dir /b /a-d /o-n /s "C:\003\lishi\*.txt"') do (
    copy "%%i" "C:\数据\3.txt"
    goto :eof
)

.....

@echo off
for /f "skip=10 delims=" %%i in ('dir /b /a-d /o-n /s "C:\210\lishi\*.txt"') do (
    copy "%%i" "C:\数据\210.txt"
    goto :eof
)

DAIC

1. @echo off
   
2. setlocal enabledelayedexpansion
   
3. for /l %%a in (1001,1,1210) do (
   
4.     set n=%%a
   
5.     set x=!n:~-3!
   
6.     set /a y=%%a-1000
   
7.     call :Copy_File !x! !y!
   
8. )
   
9. goto :eof
   
10. 
    
11. :Copy_File
    
12. for /f "skip=10 delims=" %%i in ('dir /b /a-d /o-n /s "C:\%1\lishi\*.txt"') do (
    
13.     copy "%%i" "C:\数据\%2.txt"
    
14.     goto :eof
    
15. )
    

复制代码