[文本处理] 批处理如何处理歌词

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，所以溜了……

@set @n=0/*&echo off
dir /a-d/s/b *.txt|cscript -nologo -e:jscript "%~f0"
pause&exit /b */

var fso=new ActiveXObject('scripting.FileSystemObject');

while(!WSH.StdIn.AtEndOfStream)
{
	var result='';
	file=WSH.StdIn.ReadLine();
	fo=fso.OpenTextFile(file,1);
	while(!fo.AtEndOfStream)
	{
		line=(fo.ReadLine()).replace(/(\[ar.+\]\[al.*)/g, '\r\n$1\r\n')
        .replace(/(\[[0-9]+:[0-9]+\.[0-9]+\]|\[offset)/g, '\r\n$1')
        .replace(/(\[[0-9]+:[0-9]+\.[0-9]+\])\r\n/g, '$1');
		result+=line+'\r\n';
	}
	fo.close();
	file+='.lrc';
	fo=fso.CreateTextFile(file,true,false);
	fo.Write(result);
	fo.close();
}
复制代码