3
0
mirror of https://github.com/pragma-/pbot.git synced 2024-11-25 13:29:29 +01:00

applets/cjeopardy: qstats now shows all wrong answers instead of top 10

This commit is contained in:
Pragmatic Software 2023-01-21 12:13:01 -08:00
parent fd864cf1ee
commit 576783df55
3 changed files with 3 additions and 5 deletions

View File

@ -268,7 +268,7 @@ foreach my $answer (@valid_answers) {
my $ratio1 = ($t1 + $t1) / $a1; my $ratio1 = ($t1 + $t1) / $a1;
my $ratio2 = ($t2 + $t1) / $a2; my $ratio2 = ($t2 + $t1) / $a2;
print STDERR "nick: $nick, t1 = $t1, t2 = $t2, a1 = $a1, a2 = $a2, ratio1 = $ratio1, ratio2 = $ratio2\n"; #print STDERR "nick: $nick, t1 = $t1, t2 = $t2, a1 = $a1, a2 = $a2, ratio1 = $ratio1, ratio2 = $ratio2\n";
if ($ratio2 < $ratio1 and $player_data->{correct_streak} >= 3) { if ($ratio2 < $ratio1 and $player_data->{correct_streak} >= 3) {
$player_data->{highest_quick_correct_streak} = $player_data->{correct_streak}; $player_data->{highest_quick_correct_streak} = $player_data->{correct_streak};

View File

@ -279,10 +279,8 @@ if (lc $command eq 'rank') {
if (@$wrong_answers) { if (@$wrong_answers) {
$stats .= ", wrong answers: "; $stats .= ", wrong answers: ";
my $count = 0;
my $sep = ""; my $sep = "";
foreach my $answer (sort { $b->{count} <=> $a->{count} } @$wrong_answers) { foreach my $answer (sort { $b->{count} <=> $a->{count} } @$wrong_answers) {
last if ++$count >= 10;
$stats .= $sep; $stats .= $sep;
$stats .= $answer->{answer}; $stats .= $answer->{answer};
if ($answer->{count} > 1) { if ($answer->{count} > 1) {

View File

@ -25,8 +25,8 @@ use PBot::Imports;
# These are set by the /misc/update_version script # These are set by the /misc/update_version script
use constant { use constant {
BUILD_NAME => "PBot", BUILD_NAME => "PBot",
BUILD_REVISION => 4598, BUILD_REVISION => 4600,
BUILD_DATE => "2022-12-31", BUILD_DATE => "2023-01-21",
}; };
sub initialize {} sub initialize {}