[文本处理] 批处理如何检测srt每行字数，超出设定字数换行？

小白来了

大佬们好，想批量检测多个srt文件每行的字数，超出30个字加空格或者换行

不检测时间码，只检测每一行的字数~

两个文件如下

链接：https://pan.baidu.com/s/1-xmRDW2-5L3JQB6YBOtsvg?pwd=0ydb

Five66

哪里的标点符号？文件里的？什么类型的文件？txt，html，word？这些文件又放在哪里？
什么样的标点符号？中文标点？英文标点？日文标点？还是所有语言的标点？空格，制表符之类的算标点不？
显示出来是显示到哪里？显示到控制台？添加逗号是添加什么逗号？是逗号这两个字不？

czjt1234

回复 2# Five66


    有点严谨的么

小白来了

回复 2# Five66


    大佬，还在吗？再看一下吧，这样应该明确了

小白来了

回复 3# czjt1234


    大佬，上午好

Batcher

回复 1# 小白来了


    请找几个srt文件作为例子打包上传到网盘

小白来了

回复 6# Batcher


    大佬好，每个srt里面内容如下：只检测那一行文字，没有标点符号。检测文字字数。这是notpad打开的。



1
00:00:00,026 --> 00:00:00,852
批处理之家

2
00:00:00,952 --> 00:00:01,812
是个非常好的平台

3
00:00:01,912 --> 00:00:02,617
我爱批处理之家我爱批处理之家我爱批处理之家我爱批处理之家

小白来了

回复 6# Batcher


    大佬，我把2个srt文件传网盘了，您抽时间给看下吧~

  就是把每一行文字比较长的根据设定的字数换行~

链接：https://pan.baidu.com/s/1-xmRDW2-5L3JQB6YBOtsvg?pwd=0ydb 
提取码：0ydb
复制代码

qixiaobin0715

@echo off
chcp 65001>nul
for /f "delims=" %%i in ('dir /b /a-d *.srt') do (
    (for /f "delims=" %%j in ('type "%%i") do (
        set "str=%%j"
        setlocal enabledelayedexpansion
        if not "!str:~30!"=="" (
            echo,!str:~,30!
            echo,!str:~30!
        ) else (
            echo,%%j
        )
        endlocal
    ))>"New-%%i"
)
复制代码

小白来了

回复 9# qixiaobin0715


    大哥好，生成的srt是空白的~ 哪里需要修改一下呢？

小白来了

回复 6# Batcher


    大佬在吗？我这个srt的不好弄吗？

Batcher

回复 10# 小白来了


请参考Q-04把9楼.bat文件保存为UTF-8编码：
https://mp.weixin.qq.com/s/Koje4FufWxWBs7ioDy_LJA

小白来了

回复 12# Batcher


    UTF-8也是生成的空白文件。是因为srt文件格式吗

buyiyang

回复 13# 小白来了


    9楼代码第四行

    (for /f "delims=" %%j in ('type "%%i"') do (
复制代码

Five66

试试下面的看看吧，没有百度账号，下不了网盘文件
srt编码gbk或ansi，srt文件名不要以new_开头（因为会生成以new_开头的新的srt文件）

@echo off&chcp 936

set changdu=30

for %%a in (*.srt) do (
cd.>"new_%%~na.newnew"
set "newfile=new_%%~na.newnew"
for /f "delims=" %%b in ('findstr /n .* "%%a"') do (
set line=%%b
setlocal enabledelayedexpansion
set line=!line:*:=!
if not defined line (
rem echo,>>"!newfile!" 
echo,>>"!newfile!"
) else if "!line:~%changdu%!" == "" (
rem echo,!line:*:=!>>"!newfile!"
echo,!line!>>"!newfile!"
) else (
set n=0
set /a m=%changdu%
rem set line=!line:*:=!
call :aaa
)
endlocal
)
)
rename *.newnew *.srt
del *.newnew 2>nul
echo done&pause&exit/b

:aaa
echo,!line:~%n%,%changdu%!>>"!newfile!"
set /a n+=%changdu%
set /a m+=%changdu%
if "!line:~%m%!" neq "" (goto :aaa) else (
if "!line:~%n%!" neq "" echo,!line:~%n%!>>"!newfile!"
)
复制代码