[Iska]

у меня уходит 8сек и я скажу вам что это очень много для подобной операции »

На моём десятилетнем ноуте на Ваш батник уходит 40 сек, и это напрягает. »

А так:

Код:

@echo off
setlocal enableextensions enabledelayedexpansion

echo Start: %time%

for %%i in (400 300 200 100) do (
	<"0001.txt" >"Out_%%i.txt" (
		for /l %%j in (1, 1, %%i) do (
			set /p sVar=
			echo !sVar!
		)
	)
)

echo Finish: %time%

endlocal
exit /b 0

?

А вообще-то очень плохо, что нет стандартной утилиты для того, чтобы прочесть заданное кол-во строк в батнике »

Обходится таким вот кодом .