I:=1.
stdin do:[:c|c=$.|(c=$-)and:[I:=I*2+c value- 45];or:[(', temnaiogkdwrus  qzycxbjp l.fvh'at:I\\39\\37+1)display. c=$/or:[$ display].I:=1]]