[gora]

Михаил11, если я правильно понял задачу, то попробуйте так:

Код:

@Echo Off
Setlocal EnableDelayedExpansion
:: Обрабатываемый файл
Set file=e:\Temp\in.txt
:: Новый файл
Set newfile=e:\Temp\new file.txt

(For /F "usebackq tokens=* delims=" %%i In ("%file%") Do (
	Set /A cnt=cnt%%4+1
	If !cnt!==1 Set line=%%i
	If !cnt!==2 Echo !line! - %%i
))>"%newfile%"