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).