中国DOS联盟

求助:
怎么样批量在一文件夹内以文件夹命名文件夹内文件名呢
例f文件夹内有a b c三个文件夹a文件夹内有x y两个文件, b文件夹内有m n s三个文件, c文件夹内有k一个文件, 怎么样用批处理把
f文件夹内的a文件夹内x y两个文件命名为a1 a2, b文件夹内m n s三个文件命名为b1 b2 b3, c文件夹内k文件命名为c呢

已经搞掂
@echo off
for /d %%i in (*) do (
call :rm "%%i"
)
pause
goto :eof

:rm
set num=0
for /r %1 %%a in (*.*) do (
set /a num+=1
call ren "%%a" "%~1%%num%%%%~xa"
)