#! /usr/bin/awk
BEGIN {
  FS = "[ \t]*(,|、|\t)";
}
/^!/ {
  print "#", $0
}
!/^!/ {
  print convert($1, $2, $3);
}

function convert(yomi, kanji, hinshi) {
  if (hinshi == "一般名詞")
    code = "#T35";
  else if (hinshi == "名詞サ変")
    code = "#T30";
  else if (hinshi == "固有人名")
    code = "#JN";
  else if (hinshi == "固有地名")
    code = "#CN";
  else if (hinshi == "固有組織")
    code = "#KK";
  else if (hinshi == "固有一般")
    code = "#T35";
  else if (hinshi == "形容詞")
    code = "#KY";
  else if (hinshi == "形容動詞")
    code = "#T05";
  else if (hinshi == "名詞形動")
    code = "#T00";
  else if (hinshi == "接続語")
    code = "#CJ";
  else if (hinshi == "接頭語")
    code = "#RT"; # ????
  else if (hinshi == "接尾辞")
    code = "#KJ"; # ????
  else if (hinshi == "数詞")
    code = "#NN";
  else if (hinshi == "副詞")
    code = "#F14";
  else if (hinshi == "単漢字")
    code = "#KJ";
  else if (hinshi == "サ変動詞")
    code = "#SX";
  else if (hinshi == "ザ変動詞")
    code = "#ZX";
  else if (hinshi == "一段動詞")
    code = "#KS";
  else if (hinshi == "カ行五段")
    code = "#K5";
  else if (hinshi == "ガ行五段")
    code = "#G5";
  else if (hinshi == "サ行五段")
    code = "#S5";
  else if (hinshi == "タ行五段")
    code = "#T5";
  else if (hinshi == "ナ行五段")
    code = "#N5";
  else if (hinshi == "バ行五段")
    code = "#B5";
  else if (hinshi == "マ行五段")
    code = "#M5";
  else if (hinshi == "ラ行五段")
    code = "#R5";
  else if (hinshi == "ワ行五段")
    code = "#W5";
  else {
    print "#" yomi " " hinshi " " kanji > "/dev/stderr";
    return "#" yomi " " hinshi " " kanji;
  }  
  return yomi " " code " " kanji;
}