[已解决]批处理把srt字幕显示持续时间缩短

WHY

把 绝对路径 作为脚本参数传递给 PowerShell 脚本
get-ChildItem(dir)、get-Content(gc)、set-Content(sc) 这些 cmdlet 用参数 -LiteralPath 代替 -Path
当路径或文件名出现"["字符时可以避免报错。

1. <# :
   
2. @echo off
   
3. PowerShell -c ". ([ScriptBlock]::Create((gc -Literal '%~f0') -join "`r`n")) '%~dp0'"
   
4. pause & exit/b
   
5. #>
   
6. 
   
7. param([string]$path);
   
8. $reg = '^(\d\d:\d\d:\d\d,\d\d\d)\s*-->\s*(\d\d:\d\d:\d\d,\d\d\d)$';
   
9. 
   
10. forEach( $file In (dir -Literal $path -Filter *.srt) ){
    
11.     $arr = gc -Literal $file.FullName -Enc UTF8 -ReadCount 0;
    
12.     $count = $arr.Count;
    
13.     for( $i = 0; $i -lt $count; $i++ ){
    
14.         if( $arr[$i] -match $reg ){
    
15.             $T1 = [DateTime]$matches[1].Replace(',', '.');
    
16.             $T2 = [DateTime]$matches[2].Replace(',', '.');
    
17.             if( ($T2 - $T1).TotalSeconds -gt 5 ){
    
18.                 $arr[$i] = $matches[1] + ' --> ' + $T1.AddSeconds(5).ToString('HH:mm:ss,fff');
    
19.             }
    
20.         }
    
21.     }
    
22.     sc -Literal $file.FullName -Enc UTF8 -Value $arr;
    
23. }

复制代码