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

每天几分

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

1. aabn=1,工薪阶层
   
2. aadd=1,劳劳碌碌
   
3. aadi=1,落荒而逃
   
4. aaib=1,莘莘学子
   
5. aaie=1,卧薪尝胆
   
6. aaii=1,落花流水
   
7. aaal=1,花花世界
   
8. aaja=1,落花时节
   
9. ……
   
10. dqhh=1,大名鼎鼎
    
11. mytp=1,曲高和寡
    
12. myyy=1,风度翩翩
    
13. ……

复制代码

pcl_test

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

1. /*&cls
   
2. @echo off
   
3. (for /f "delims=" %%a in ('more +14 "%~f0"') do @echo;%%a)|cscript -nologo -e:jscript "%~f0"
   
4. pause&exit
   
5. */
   
6. 
   
7. var s = '';
   
8. while(!WScript.StdIn.AtEndOfStream) {
   
9.     var str = WScript.StdIn.ReadLine();
   
10.     if(!/([\u4e00-\u9fa5])\1|\*\//.test(str))s += str+'\r\n';
    
11. }
    
12. WSH.Echo(s);
    
13. 
    
14. /*
    
15. aabn=1,工薪阶层
    
16. aadd=1,劳劳碌碌
    
17. aadi=1,落荒而逃
    
18. aaib=1,莘莘学子
    
19. aaie=1,卧薪尝胆
    
20. aaii=1,落花流水
    
21. aaal=1,花花世界
    
22. aaja=1,落花时节
    
23. dqhh=1,大名鼎鼎
    
24. mytp=1,曲高和寡
    
25. myyy=1,风度翩翩
    
26. */

复制代码

codegay

实际文件就是这样子么？