gawk "NR>1{print $4-A,$5-B,$6-C,$7-D}{A=$4;B=$5;C=$6;D=$7}" table.txt
复制代码

$obj = (type table.txt) -replace '\s+',','|convertfrom-csv -Delimiter ","
for($i=1;$i -lt $obj.length;$i++){
    $j=$i-1;
    ($obj[$i].A-$obj[$j].A),($obj[$i].B-$obj[$j].B),($obj[$i].C-$obj[$j].C),($obj[$i].C-$obj[$j].C) -join ' '
}
复制代码

@echo off&setlocal enabledelayedexpansion
for /f "delims=U" %%a in ('cmd /u /c echo 唉') do set "tab=%%a"
for /f "tokens=1-7" %%a in (a.txt) do (
    if defined a (
       set /a a=%%d-a,b=%%e-b,c=%%f-c,d=%%g-d
       echo %%a%tab%%%b%tab%%%c%tab%!a!%tab%!b!%tab%!c!%tab%!d!
    ) else echo %%a%tab%%%b%tab%%%c%tab%%%d%tab%%%e%tab%%%f%tab%%%g
    set a=%%d&set b=%%e&set c=%%f&set d=%%g
)
pause
复制代码

@set @n=0; /* & echo off
cscript -nologo -e:jscript "%~0"<a.txt>b.txt
pause & exit/b
*/

txt = WScript.StdIn.ReadAll();
re = /(\S+\s+){3}(\d+\s+){3}\d+\s*$/mg;
while((ar = re.exec(txt)) != null) {
    if (typeof(B) != "undefined") {
        A = ar[0].split(/\s+/);
        for (i=3; i<7; i++) { B[i] = A[i] - B[i] };
        WScript.Echo(B.join("\t"));
    }
    B = ar[0].split(/\s+/);
}
复制代码