X-Git-Url: https://git.sesse.net/?a=blobdiff_plain;f=remoteglot.pl;h=d8a7925c9137cfe548b0b9729a98f8daf3defac7;hb=d9f38cb28bf7ceac256e78c47043cb08a5e2da3a;hp=7220412d14a03e022d7c50f9f8e6abf096a15e98;hpb=5ee1c604d0b954b024626f72bd6813f379ee96c4;p=remoteglot diff --git a/remoteglot.pl b/remoteglot.pl index 7220412..d8a7925 100755 --- a/remoteglot.pl +++ b/remoteglot.pl @@ -585,13 +585,13 @@ sub complete_using_tbprobe { $pos = $pos->make_move(parse_uci_move($move)); } - while ($pos->num_pieces() > 6 && $#pv > -1) { + while ($pos->num_pieces() > 7 && $#pv > -1) { my $move = shift @pv; push @moves, $move; $pos = $pos->make_move(parse_uci_move($move)); } - return if ($pos->num_pieces() > 6); + return if ($pos->num_pieces() > 7); my $fen = $pos->fen(); my $pgn_text = `fathom --path=/srv/syzygy "$fen"`; @@ -603,6 +603,9 @@ sub complete_using_tbprobe { # Splice the PV from the tablebase onto what we have so far. for my $move (@{$pgn->moves}) { last if $move eq '#'; + last if $move eq '1-0'; + last if $move eq '0-1'; + last if $move eq '1/2-1/2'; my $uci_move; ($pos, $uci_move) = $pos->make_pretty_move($move); push @moves, $uci_move;