[文本处理] 建立当日日期的文件夹、重命名文件并复制到日期文件夹的批处理怎样改进？

@echo off

@mode con cols=58 lines=25
color f3
md d:\shangchao\02.29

ren D:\Progra~1\MultiDrop\pd.txt 02.29.001.txt 

copy D:\Progra~1\MultiDrop\02.29.001.txt D:\shangchao\02.29

cls

echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo. 已将文件"02.29.001"复制至 "d:\shangchao\02.29" 文件夹中
echo.
echo.
echo.    继续重命名及复制到"d:\shangchao\02.29" 请按任意键
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
pause
goto 2

::跳转开始
:2

ren D:\Progra~1\MultiDrop\pd.txt 02.29.002.txt 

copy D:\Progra~1\MultiDrop\02.29.002.txt D:\shangchao\02.29

cls

echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo. 已将文件"02.29.002"复制至 "d:\shangchao\02.29" 文件夹中
echo.
echo.
echo.    继续重命名及复制到"d:\shangchao\02.29" 请按任意键
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
pause
goto 3

:3

ren D:\Progra~1\MultiDrop\pd.txt 02.29.003.txt 

copy D:\Progra~1\MultiDrop\02.29.003.txt D:\shangchao\02.29

cls

echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo. 已将文件"02.29.003"复制至 "d:\shangchao\02.29" 文件夹中
echo.
echo.
echo.    继续重命名及复制到"d:\shangchao\02.29" 请按任意键
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
pause
goto 4

:4

ren D:\Progra~1\MultiDrop\pd.txt 02.29.004.txt

copy D:\Progra~1\MultiDrop\02.29.004.txt D:\shangchao\02.29

cls

echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo. 已将文件"02.29.004"复制至 "d:\shangchao\02.29" 文件夹中
echo.
echo.
echo.    继续重命名及复制到"d:\shangchao\02.29" 请按任意键
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
pause
goto 5

:5

ren D:\Progra~1\MultiDrop\pd.txt 02.29.005.txt
copy D:\Progra~1\MultiDrop\02.29.005.txt D:\shangchao\02.29

cls

echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo. 已将文件"02.29.005"复制至 "d:\shangchao\02.29" 文件夹中
echo.
echo.
echo.    继续重命名及复制到"d:\shangchao\02.29" 请按任意键
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
pause
复制代码