X-Git-Url: https://git.sesse.net/?p=remoteglot;a=blobdiff_plain;f=remoteglot.pl;h=313ccbe9026c1d807b641d39473de330132ac866;hp=39fa629304b429840583dfe22cbe414b25284153;hb=86873d4101b0bcd4e96ae79a975279c65d889619;hpb=aef8c5f5ed0c9fb515182eac0cfb2fee07fac45b

diff --git a/remoteglot.pl b/remoteglot.pl
index 39fa629..313ccbe 100755
--- a/remoteglot.pl
+++ b/remoteglot.pl
@@ -25,8 +25,7 @@ my $engine2_cmdline = "./stockfish_13111119_x64_modern_sse42";
 my $telltarget = undef;   # undef to be silent
 my @tell_intervals = (5, 20, 60, 120, 240, 480, 960);  # after each move
 my $uci_assume_full_compliance = 0;                    # dangerous :-)
-my $update_max_interval = 2.0;
-my $second_engine_start_depth = 8;
+my $update_max_interval = 1.0;
 my @masters = (
 	'Sesse',
 	'Sessse',
@@ -239,6 +238,7 @@ sub handle_uci {
 				$pos_waiting = undef;
 			}
 		} else {
+			$engine2->{'info'} = {};
 			my $pos = $pos_waiting // $pos_calculating;
 			uciprint($engine2, "position fen " . $pos->{'fen'});
 			uciprint($engine2, "go infinite");
@@ -344,6 +344,11 @@ sub style12_to_pos {
 	$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);
 
@@ -771,7 +776,7 @@ sub output_screen {
 			my $key = $pretty_move;
 			my $line = sprintf("  %-6s %6s %3s  %s",
 				$pretty_move,
-				short_score($info, $pos_calculating_second_engine, $mpv, 1),
+				short_score($info, $pos_calculating_second_engine, $mpv, 0),
 				"d" . $info->{'depth' . $mpv},
 				join(', ', @pretty_pv));
 			push @refutation_lines, [ $key, $line ];