标题: [文本处理] 【已解决】批处理按行分割文本,每个小文本字数不能超过200字。 [打印本页]
作者: liziyunabcd 时间: 2023-3-4 05:33 标题: 【已解决】批处理按行分割文本,每个小文本字数不能超过200字。
一个大文本TXT,大约8000字,像诗歌一样,一行一行的。
现在我想按行来分割成很多小文本,每个小文本字数又不能超过200字符。
(我找了几天也没找出相关的代码和软件,我会点按键精灵,也现实不了这功能,只好来求助BAT大神们了)
作者: 77七 时间: 2023-3-4 08:23
- @echo off
- rem 假设每行均不超过100个字符
- set /a m=1001,n=0,max=每行最多字符数=100
- setlocal enabledelayedexpansion
- for /f "delims=" %%a in ('type "大文本.txt"') do (
- set "str=%%a"
- set /a h=0
- for /l %%l in (0,1,%max%) do (
- if not "!str:~%%l,1!" equ "" (
- set /a n+=1,h+=1
- )
- )
- if !n! geq 200 (
- set /a m+=1,n=h
- )
- >>小文本!m:~-3!.txt echo %%a
- )
- endlocal
- pause
复制代码
将文本和批处理均以ansi编码格式保存
作者: liziyunabcd 时间: 2023-3-4 08:52
回复 2# 77七
作者: liziyunabcd 时间: 2023-3-4 08:53
回复 3# liziyunabcd
我擦!!!就好了?!!!!牛逼啊!!!
我整了两天都没搞定,我去,太牛了
欢迎光临 批处理之家 (http://bbs.bathome.net/) |
Powered by Discuz! 7.2 |