$pos_waiting = undef;
}
} else {
+ $engine2->{'info'} = {};
my $pos = $pos_waiting // $pos_calculating;
uciprint($engine2, "position fen " . $pos->{'fen'});
uciprint($engine2, "go infinite");
$pos{'black_castle_q'} = $x[14];
$pos{'time_to_100move_rule'} = $x[15];
$pos{'move_num'} = $x[26];
+ if ($x[27] =~ /([a-h][1-8])-([a-h][1-8])/) {
+ $pos{'last_move_uci'} = $1 . $2;
+ } else {
+ $pos{'last_move_uci'} = undef;
+ }
$pos{'last_move'} = $x[29];
$pos{'fen'} = make_fen(\%pos);