let(@)=min
let rec($)x y=x>49&1$y-y/y;print_char"
\"'{[:\$%`#.@?*-".[x@49-x@y@30-y];x+1$y;;1$29