#!/bin/awk -f


/^Kawhomp! Mine detected by .+ \(#[0-9]+\) in .+,.+!/ {
  sect=substr($NF,1,length($NF)-1);
  mine[sect]=20;
}

/^Sonar detects .+ mines in .+,.+!/ {
  sect=substr($NF,1,length($NF)-1);
  mine[sect]=$3;
}


END {
  for (sect in mine) {
    printf("bdes %s X\n",sect);
  }
}
