#!/bin/nawk -f
BEGIN {
  code["A"]= 0;
  code["B"]= 1;
  code["C"]= 2;
  code["D"]= 3;
  code["E"]= 4;
  code["F"]= 5;
  code["G"]= 6;
  code["H"]= 7;
  code["I"]= 8;
  code["K"]= 9;
  code["L"]= 10;
  code["M"]= 11;
  code["N"]= 12;
  code["O"]= 13;
  code["P"]= 14;
  code["Q"]= 15;
  code["R"]= 16;
  code["S"]= 17;
  code["T"]= 18;
  code["U"]= 19;
  code["V"]= 20;
  code["W"]= 21;
  code["X"]= 22;
  code["Y"]= 23;
  code["Z"]= 24;
  code["Aa"]= 25;
}
{printf("{\"%s\", \"%s\",{ %s, %s }},\n", $1, $2, code[$3], $4); }