每十行添加一个换行.bat
2023-04-03 19:29 作者:棉花糖一样甜的凤小幽 | 我要投稿
@echo off
chcp 65001 >nul REM 设置命令行编码为 UTF-8 避免出现乱码
setlocal enabledelayedexpansion REM 开启延迟变量扩展
REM 获取拖拽到脚本上的文件路径
set "file=%~1"
REM 如果文件路径为空,则输出提示信息并退出
if "%file%"=="" (
echo 请拖拽一个文本文件到本脚本上!
pause>nul
exit /b
)
REM 判断文件是否存在,如果不存在则输出提示信息并退出
if not exist "%file%" (
echo 所拖拽的文件不存在,请重新拖拽!
pause>nul
exit /b
)
REM 获取文件名和扩展名
for %%a in ("%file%") do (
set "fileName=%%~na"
set "fileExt=%%~xa"
)
REM 生成新的文件名
set "newFileName=!fileName!+1!fileExt!"
REM 创建新文件并将修改后的内容写入
(for /f "tokens=* usebackq" %%a in ("%file%") do (
echo %%a
set /a "count+=1"
REM 每10行后面添加一个换行符
if !count! equ 10 (
set /a "count=0"
echo.
)
)) > "!newFileName!"
REM 输出操作完成提示信息
echo 文件修改完成,生成的新文件名为:!newFileName!
pause>nul