[文本处理] 批处理按照行数割文本文件怎么写？

@echo off
set n=0
set x=30
set /a y=x-1
set z=1000
setlocal enabledelayedexpansion
for /f "delims=" %%i in (test.txt) do (
    set /a m=n%%x
    set /a n+=1
    set str!m!=%%i
    if !m! equ %y% (
        set /a z+=1
        (for /l %%j in (0,1,%y%) do (
            echo,!str%%j!
        ))>test-!z:~-3!.txt
    )
)
set /a z+=1
if !m! neq %y% (
    (for /l %%j in (0,1,!m!) do (
        echo,!str%%j!
    ))>test-!z:~-3!.txt
)
复制代码

@echo off
cd /d "%~dp0"

set file=1.txt
set l=30
set _0=3

set m=10000001
for /f "delims=" %%i in ("%file%") do (
	for /f "tokens=1* delims=[]" %%a in ('find /n /v "" ^<"%%i"') do (
		setlocal enabledelayedexpansion
		for /f %%x in ("!m:~-%_0%!") do (
			endlocal
			>>"%%~ni-%%x%%~xi" echo=%%b
		)
		set /a n=%%a%%%l%,1/n 2>nul || set /a m+=10000001
	)
)
pause
复制代码

@echo off

set @file=test.txt
set hangshu=30
set shuliang=0
set houzhuishuzi=1000
set "houzhui=_!shuliang:~-3!"

for %%a in ("%@file%") do set @newfile=%%~na&set @fileext=%%~xa
for /f "usebackq delims=" %%i in (`findstr /n .* "%@file%"`) do (
set "line=%%i"
set /a shuliang=aaa/hangshu+houzhuishuzi+1
set /a aaa+=1
setlocal enabledelayedexpansion
if not defined @%houzhui% (
echo create file !@newfile!%houzhui%!@fileext!
cd. >"!@newfile!%houzhui%!@fileext!"
for %%z in ("@%houzhui%") do endlocal&set %%~z=1
) else (endlocal)
setlocal enabledelayedexpansion
(
echo(!line:*:=!|| ^)?
)>>"!@newfile!%houzhui%!@fileext!"
endlocal
)
pause&exit/b
复制代码