CrLf

@echo off
for /f "delims=" %%a in (a.txt) do (
  set /a m=n/200+1,n+=1
  set "str=%%a"
  setlocal enabledelayedexpansion
  echo;!str!>a!m!.txt
  endlocal
)<a.txt
pause
复制代码

@echo off
for /f %%a in ('find /c /v "" ^<a.txt') do set /a "n=%%a/200+!!(%%a%%200)"
setlocal enabledelayedexpansion
(
  for /l %%a in (1 1 %n%) do (
    for /l %%b in (1 1 200) do (
      set "str="
      set /p "str="
      echo;!str!
    )
  )>a%%a.txt
)<a.txt
pause
复制代码

CrLf

gawk：

gawk "{n=int(NR/40)+1;print $0>n \".txt\"}"
复制代码

有 sed 的话，还可以这样玩

@sed "1~40!d" a.txt | sed "=" | sed -r "N;s/(.*)\n(.*)/\2,+39w\1.txt/g" | sed -f - a.txt
复制代码

CrLf

回复 6# 依山居


    gawk "{n=int(NR/40)+1;print $0>n \".txt\"}"
的意思是：

n   =  int           ( NR               /       40 ) +  1;  print $0     >  n \".txt\"
编号 = 转为int整数类型 ( 此文件中当前的记录号 / 步伐的间隔 ) + 1 ; 输出  当前行  到 编号.txt
复制代码

CrLf

回复 11# bailong360


    搜噶