GitHub/pbot
3
0
Fork 0
mirror of https://github.com/pragma-/pbot.git synced 2024-11-26 13:59:47 +01:00
Code Issues Projects Releases Wiki Activity

Show message about ending own correct answer streak

Browse Source
This commit is contained in:
Pragmatic Software 2015-02-07 08:47:42 -08:00
parent 0da2287cde
commit 95b1f3eee6
1 changed files with 13 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
modules/cjeopardy/cjeopardy_answer.pl
View File

@ -138,10 +138,10 @@ foreach my $answer (@valid_answers) {
my $is_wrong = 0;
if ($lctext > $answer) {
print "$color{red}$lctext is too high!$color{reset}\n";
print "$color{red}$lctext is too high!$color{reset}";
$is_wrong = 1;
} elsif ($lctext < $answer) {
print "$color{red}$lctext is too low!$color{reset}\n";
print "$color{red}$lctext is too low!$color{reset}";
$is_wrong = 1;
}
@ -255,13 +255,13 @@ foreach my $answer (@valid_answers) {
my $correct_percentage = 100 - $incorrect_percentage;
if ($correct_percentage >= 80) {
printf "Sorry, '$color{red}$text$color{reset}' is %.1f%% correct. So close!\n", $correct_percentage;
printf "Sorry, '$color{red}$text$color{reset}' is %.1f%% correct. So close!", $correct_percentage;
} elsif ($correct_percentage >= 70) {
printf "Sorry, '$color{red}$text$color{reset}' is %.1f%% correct. Almost.\n", $correct_percentage;
printf "Sorry, '$color{red}$text$color{reset}' is %.1f%% correct. Almost.", $correct_percentage;
} elsif ($correct_percentage >= 50) {
printf "Sorry, '$color{red}$text$color{reset}' is only %.1f%% correct.\n", $correct_percentage;
printf "Sorry, '$color{red}$text$color{reset}' is only %.1f%% correct.", $correct_percentage;
} else {
print "Sorry, '$color{red}$text$color{reset}' is incorrect.\n";
print "Sorry, '$color{red}$text$color{reset}' is incorrect.";
}
WRONG_ANSWER:
@ -269,6 +269,13 @@ $player_data->{wrong_answers}++;
$player_data->{lifetime_wrong_answers}++;
$player_data->{wrong_streak}++;
$player_data->{last_wrong_timestamp} = scalar gettimeofday;
if ($player_data->{correct_streak} >= 3) {
print " $color{red}You just ended your $color{orange}$player_data->{correct_streak} $color{red}correct answer streak!$color{reset}\n";
} else {
print "\n";
}
$player_data->{correct_streak} = 0;
if ($player_data->{wrong_streak} > $player_data->{highest_wrong_streak}) {