#! /usr/bin/gawk -f

BEGIN {
  FS="|";
}

/./ {
  loc = $1;
  lab = $2;
  cmt = $3;
  
  gsub(/  *$/, "", loc);
  
  gsub(/^  */, "", lab);
  gsub(/  *$/, "", lab);
  olab = lab;
  gsub(/b/, "r", lab);
  gsub(/G/, "d", lab);
  gsub(/Uh/, "sh", lab);
  gsub(/T/, "t", lab);
  gsub(/K/, "k", lab);
  gsub(/P/, "p", lab);
  gsub(/F/, "f", lab);
  gsub(/D/, "d", lab);
  gsub(/C/, "c", lab);
  gsub(/S/, "s", lab);
  gsub(/ /, ".", lab);
  if (olab == lab) {olab = "";} else {olab = ("{V=" olab "}");}
  
  gsub(/^  */, "", cmt);
  
  printf "%s;V | %s%s | %s\n", loc, lab, olab, cmt;
  next;
}