var i,j=0
val a=readLine split"[,:-~]"tail;while(i>=0&i<a.size)a{j=i
i+=a(i).toInt
j}="\x01\x04\x03\x02"
a.mkString("[",",","]\n")map(c=>System.out.write(Seq(c,240,159,146,169)(9/c%8)))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).