Peak Detection by marcof

!c||(a&&$1<=r){r=$1;c=a=1;print}a&&$1>r+9{r=$1;a-=b=1}a&&$1!=r\x0d
b&&$1<r-9{print r"*"p"\n"$1;r=$1;p=z;b-=a=1}b&&$1>r{print r p;r=$1;p=z}b&&r!=$1{p=p"\n"$1}END{print b?r p:l}

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return top