@echo off
set info=互助互利,支付宝扫码头像,感谢打赏
rem 有问题,可加QQ956535081及时沟通
title %info%
cd /d "%~d0"
set "txtfile=你的文本.txt"
set "folder=result"
if not exist "%folder%" md "%folder%"
powershell -NoProfile -ExecutionPolicy bypass ^
    $enc=[Text.Encoding]::Default;^
    $text=[IO.File]::ReadAllText('%txtfile%',$enc).trim() -split '(?:\r?\n){2,}';^
    for($i=0;$i -lt $text.count;$i++){^
        $newfile=($i+1).toString()+'.txt';^
        write-host $newfile;^
        [IO.File]::WriteAllText('%folder%\'+$newfile, $text[$i], $enc);^
    }
echo;%info%
pause
复制代码

@echo off
setlocal enabledelayedexpansion
set "n=1"
for /f "tokens=1* delims=:" %%i in ('type "原文件.txt" ^| findstr /n ".*"') do (
    if "%%j" equ "" (
        set /a n+=1
    ) else (
        >>"!n!.txt" echo,%%j
    )
)
复制代码