let rec(!)x=print_char" temnaiogkdwrus qzycxbjp.l fvh KSK,".[x mod 40];1and($)u?(c=input_byte stdin-45)x=c*c<2&u$x*2+c;!x