for(c<-"A"*50;s=readLine;i=s map(_%64%48 min 10)sum)println(Seq(i+(-s.count(c-i/12==)&10),"Bust")(i/22))