my ($newx, $newy) = calculate_move($board, $x, $y);
        printf "\r$move: $x,$y->$newx,$newy\t";