shadowbat, не уверен, что правильно понял:
Код:
@Echo Off
Set INI=1.ini
Set DST=all.ini
If Exist "%DST%" DEL /F/Q "%DST%"
For /F "Tokens=1* Delims=[]" %%a In ('DIR /S/B/A-D %INI%^|Find /N /V ""') Do (
Set $N=1& Echo %%a>>"%DST%"
For /F "Tokens=1* Delims=:" %%i In ('FindStr /ERNC:"$" "%%b"') Do (
Call :TestN1 %%i&& <Nul Set /P $X="%%j. ">>"%DST%"
Call :TestN2 %%i&&(<Nul Set /P $X="%%j">>"%DST%"&Echo.>>"%DST%"))
Echo.>>"%DST%")
Exit
:TestN1
Set /A $I=%~1-(%~1+1)/3*3+1
If %$I% NEQ 1 Exit /B 1
Set $S=00%$N%
<Nul Set /P $X="%$S:~-3%.">>"%DST%"
Set /A $N+=1& Exit /B 0
:TestN2
Set /A $I=%~1-(%~1+1)/3*3+1
If %~1 EQU 1 Exit /B 1
If %$I% NEQ 2 Exit /B 1
Exit /B 0
