[amel27]

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 (
  For /F "Tokens=1* Delims=:" %%i In ('FindStr /ERNC:"$" "%%a"') Do (
    Call :TestNum %%i&& <Nul Set /P $X="%%j. ">>"%DST%"
    If Defined $F <Nul Set /P $X="%%j">>"%DST%"& Echo.>>"%DST%")
  Echo.>>"%DST%")
Exit

:TestNum
 Set /A $N=%~1-(%~1+1)/3*3+1
 If %~1  EQU 1 Set $F=& Exit /B 2
 If %$N% EQU 2 Set $F=T&Exit /B 1
 If %$N% EQU 1 Set $F=& Exit /B 0
Set $F=& Exit /B 2