puts$<.map{|s|(' ")-=AHJ'.bytes.map{|k|[*s..?h+s][k+207][/[a-h][1-8]/]}-[p])*' '}