shadowbat, точно, пропустил, тогда попробуй так:
Код:
@Echo Off
Set INI=1.ini
Set DST=all.ini
If Exist "%DST%" DEL /F/Q "%DST%"
For /F "Delims=" %%a In ('DIR /S/B/A-D %INI%') Do (Set $N=1
For /F "Tokens=1* Delims=:" %%i In ('FindStr /ERNC:"$" "%%a"') 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
<Nul Set /P $X="%$N%.">>"%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
