#!/usr/bin/muawk
# mu-carboncino v 0.1 by Andrea Manzini
# alfabeto carbonaro (crypto game)
#
BEGIN {
  fr="ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz"
  to="OPGTIVCHEJKRNMABQLZDUFWXYSopgtivchejkrnmabqlzdufwxys"
  l=length(to)
  for (i=1;i<=l;i++) t[substr(fr,i,1)]=substr(to,i,1)
  ORS=""
}

{
  s=$0
  for (i=1;i<=length(s);i++) {
    c=substr(s,i,1)
    o=" "
    for(j=1;j<=l;j++) { if (substr(fr,j,1)==c) o=t[c] }
    if (o==" ") o=c
  print o
  }
  print "\b"


END { print "\n" }
    


