[文本处理] 请问批处理如何删除带叠字的词语所在的行？

每天几分

如下  删除叠字所在行，如，劳劳碌碌，自欺欺人，大名鼎鼎所在行。。。。

aabn=1,工薪阶层
aadd=1,劳劳碌碌
aadi=1,落荒而逃
aaib=1,莘莘学子
aaie=1,卧薪尝胆
aaii=1,落花流水
aaal=1,花花世界
aaja=1,落花时节
……
dqhh=1,大名鼎鼎
mytp=1,曲高和寡
myyy=1,风度翩翩
……
复制代码

pcl_test

不知所云，排除所有叠字所在行，不管什么式

/*&cls
@echo off
(for /f "delims=" %%a in ('more +14 "%~f0"') do @echo;%%a)|cscript -nologo -e:jscript "%~f0"
pause&exit
*/

var s = '';
while(!WScript.StdIn.AtEndOfStream) {
    var str = WScript.StdIn.ReadLine();
    if(!/([\u4e00-\u9fa5])\1|\*\//.test(str))s += str+'\r\n';
}
WSH.Echo(s);

/*
aabn=1,工薪阶层
aadd=1,劳劳碌碌
aadi=1,落荒而逃
aaib=1,莘莘学子
aaie=1,卧薪尝胆
aaii=1,落花流水
aaal=1,花花世界
aaja=1,落花时节
dqhh=1,大名鼎鼎
mytp=1,曲高和寡
myyy=1,风度翩翩
*/
复制代码

codegay

实际文件就是这样子么？