cat(chartr(a<-"0123456789abcdef","fedcba9876543210",readChar("stdin",99)))