shaohua 当前离线
列兵
TOP
xczxczxcz (Tα酱油路过)当前离线
中尉
yhcfsr 当前离线
<# 时间相同的数据必须要有8组且相邻,否则结果会混乱; 使用环境:仅限WIN10,WIN7(没使用过PS脚本的,自行百度食用方法) #> $content=[System.IO.File]::ReadAllLines('.\ref.txt',[text.encoding]::Default); <#变量初始化#> $count=$content.count; [System.Collections.ArrayList] $Result=@(); $array=@{}; $arr=@{}; $lastTime=$i=0; do { if(($i -ne 0) -and ($array.Count -eq 9)){ $Result+= New-Object psobject -Property @{ data1=$array.item('"data1"'); data2=$array.item('"data2"'); data3=$array.item('"data3"'); data4=$array.item('"data4"'); data5=$array.item('"data5"'); data6=$array.item('"data6"'); data7=$array.item('"data7"'); data8=$array.item('"data8"'); time =$array.item("time") ; } $array.Clear();#清空上一组数据 } if($i -eq $count){break;} #扫描完所有行后,退出循环 $line=$content[$i++] -split '\s{8}';#分割数据 if($line[0] -notmatch 'data\d+'){continue;}#非data数据行,跳过 $line[2]=[int]$line[2];#去小数点 <#将时间相同的数据保存为一个数组#> if($lastTime -ne $line[1] ){$lastTime = $line[1];$array.Add("time",($line[1] -replace '^"(.*):\d+"$','$1'));$array.Add($line[0],$line[2]);} else{$array.Add($line[0],$line[2]);} }while($i -lt $count); <#输出到CSV文件#> $Result|Select-Object data1,data2,data3,data4,data5,data6,data7,data8,time|Export-Csv .\ref.csv -NoTypeInformation复制代码
@echo off & cd /d "%~dp0" echo data1 data2 data3 data4 data5 data6 data7 data8 time>ref.csv PowerShell "Foreach ($file in GC '.\ref.txt') {$str=$file -Replace '\s+',' ' -Replace '\"','';if ($str.Split(' ')[0] -match 'data[1-8]') {$name=$name + ' ' + ($str.Split(' ')[3]).Split('.')[0];if (($str.Split(' ')[0]).SubString(4,1) -eq 8) {$Line=$name.TrimStart()+' '+($str.Split(' ')[1]).Replace('-','/')+' '+$str.Split(' ')[2];AC \".\ref.csv\" -Value \"$Line\" -force;$name='';}}}" pause复制代码
cfwyy77_bat 当前离线
四级士官
BEGIN {printf("data1,data2,data3,data4,data5,data6,data7,data8,time\n")} /data/ {a[NR]=$4;b[NR]=substr($2,2,11);c[NR]=substr($3,1,5)} END{ for(i=2;i<=NR-2;i++) { if((i-1)%8) printf("%-2d,",a[i]); else printf("%-2d,%s %s\n",a[i],b[i],c[i]); } }复制代码
gawk -f 'script.awk' 1.txt >1.csv复制代码
不是最佳效率。===若文件固定，改一下速度很快。自行添加重定向以输出到csv。EXCEL中导入并以TAB键分格。== ... xczxczxcz 发表于 2018-11-25 14:01
@echo off & cd /d "%~dp0" setlocal EnableDelayedExpansion echo data1 data2 data3 data4 data5 data6 data7 data8 time for /f "tokens=1-4 delims= " %%a in (ref.txt) do ( set "n1=%%a" & set "n2=%%b" & set "n3=%%c" & set "n4=%%d" set "n2=!n2:-=/!" echo %%a|findstr /i "data[1-8]">nul && ( set "VarValue=!VarValue! !n4:.000000=!" if /i "!n1:~1,-1!"=="data8" ( echo !VarValue:~1! !n2:~1! !n3:~0,-1! set "VarValue=" ) ) ) pause复制代码
发表于 2018-11-25 12:40
| 
