//&cls&dir /a-d/b *.txt|cscript -nologo -e:jscript "%~f0"&pause&exit

var fso = new ActiveXObject('Scripting.Filesystemobject'), s='';
function CoutN(file){
    var f = fso.OpenTextFile(file, 1);
    try{
        var txt = f.ReadAll().split(/\r\n/)
        if(/^\s*?keys=(\d+)\s*$/.test(txt[2])){
            var n=RegExp.$1;
            for(var i=3; i<txt.length; i++){
                if(txt[i].length > 5)n++;
            }
            s+=fso.GetFile(file).Name+','+n+'\r\n';
        }
    }catch(e){}
    f.Close();
}

while(!WSH.StdIn.AtEndOfStream)CoutN(WSH.StdIn.ReadLine());
WSH.echo(s);
复制代码

@echo off&
for /f "delims=" %%a in ('dir /a-d/b *.txt') do (
    setlocal enabledelayedexpansion
    for /f "delims=" %%b in ('type "%%a"') do (
        set /a n+=1
        set "str=%%b"
        if !n! equ 3 (
            if "!str!" neq "!str:*keys=!" set %%b
        ) else if !n! geq 4 (
            if defined keys if "!str:~5!" neq "" set /a keys+=1
        )
    )
    if defined keys echo;%%~nxa,!keys!
    endlocal
)
pause
复制代码