批处理如何处理歌词

netdzb

我还有个问题，这个需求可以用python的迭代的方法完成吗？

原文本文件如下，注意文本是一行的，没有换行的。

[ti:让你感觉我的心再说爱你][ar:彭家丽][al:新曲＋精选][offset:0][00:01.51]让你感觉我的心再说爱你 - 彭家丽[00:23.90]不愿说别离 我紧紧拥着你[00:28.57][00:29.57]让你听见我的心 在偷偷的叹息[00:35.50][00:36.19]过去所有的回忆 我会放在我心里[00:41.80][00:42.68]我会永远为你而美丽[00:48.35][00:49.23]不愿道别离 我紧紧吻着你[00:54.59][00:55.47]吻**的忧郁 你的泪滴[01:01.52]在每个深沉夜里 每一个梦里[01:07.95]我会用我的真心好好爱你

要求输出下面的形式

[ti:让你感觉我的心再说爱你]
[ar:彭家丽][al:新曲＋精选]
[offset:0]
[00:01.51]让你感觉我的心再说爱你 - 彭家丽
[00:23.90]不愿说别离 我紧紧拥着你
[00:28.57][00:29.57]让你听见我的心 在偷偷的叹息
[00:35.50][00:36.19]过去所有的回忆 我会放在我心里
[00:41.80][00:42.68]我会永远为你而美丽
[00:48.35][00:49.23]不愿道别离 我紧紧吻着
你[00:54.59][00:55.47]吻**的忧郁 你的泪滴
[01:01.52]在每个深沉夜里 每一个梦里
[01:07.95]我会用我的真心好好爱你

xp3000

不会python，所以溜了……

1. @set @n=0/*&echo off
   
2. dir /a-d/s/b *.txt|cscript -nologo -e:jscript "%~f0"
   
3. pause&exit /b */
   
4. 
   
5. var fso=new ActiveXObject('scripting.FileSystemObject');
   
6. 
   
7. while(!WSH.StdIn.AtEndOfStream)
   
8. {
   
9.         var result='';
   
10.         file=WSH.StdIn.ReadLine();
    
11.         fo=fso.OpenTextFile(file,1);
    
12.         while(!fo.AtEndOfStream)
    
13.         {
    
14.                 line=(fo.ReadLine()).replace(/(\[ar.+\]\[al.*)/g, '\r\n$1\r\n')
    
15.         .replace(/(\[[0-9]+:[0-9]+\.[0-9]+\]|\[offset)/g, '\r\n$1')
    
16.         .replace(/(\[[0-9]+:[0-9]+\.[0-9]+\])\r\n/g, '$1');
    
17.                 result+=line+'\r\n';
    
18.         }
    
19.         fo.close();
    
20.         file+='.lrc';
    
21.         fo=fso.CreateTextFile(file,true,false);
    
22.         fo.Write(result);
    
23.         fo.close();
    
24. }

复制代码