#!/usr/bin/awk -f BEGIN { dir[3]="<" dir[2]=">" FS="|" } { i=3 while (i >= 2) { # if ($i==" ") { # if (chars[i] != "") { # printf("%13.6f %c %-30s %-10s\n", start[i], dir[i], hex[i], chars[i]) # chars[i]=""; hex[i]=""; start[i]=0; prev[i]=0 # } # } # else { if ($i!=" ") { if ( ($1-prev[i]) > .002) { if (chars[i] != "") { printf("%13.6f %c %-39s %-13s\n", start[i], dir[i], hex[i], chars[i]) chars[i]=""; hex[i]=""; start[i]=0; prev[i]=0 } } if (chars[i] == "") start[i] = $1 hex[i] = hex[i] " " substr($i, 1, 2) chars[i] = chars[i] substr($i, 4, 1) prev[i] = $1 } i=i-1 } } END { i=3 while (i >= 2) { if (chars[i] != "") printf("%13.6f %c %-39s %-13s\n", start[i], dir[i], hex[i], chars[i]) i=i-1 } }