fucking cardinal conversion in awk

gistfile1.txt

function int2(str, card, rec) {
  if(!card) card=10;
  i = index("0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ", toupper(substr(str, 1, 1)))-1;
  if(length(str) < 2) {
    return rec*card+i;
  } else {
    return int2(substr(str, 2), card, rec*card+i);
  }
}