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

Plugin/Wordle: keep game state after giveup

Browse Source
This commit is contained in:
Pragmatic Software 2024-11-27 16:15:09 -08:00
parent 001f2024c4
commit 6ba8776c2c
No known key found for this signature in database
GPG Key ID: CC916B6E3C84ECCE
2 changed files with 28 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

31
lib/PBot/Plugin/Wordle.pm
View File

@ -165,6 +165,12 @@ sub wordle($self, $context) {
$result .= "; solved by: $self->{$channel}->{solved_by} ($solved_on)";
}
if ($self->{$channel}->{givenup}) {
my $givenup_on = concise ago (time - $self->{$channel}->{givenup_on});
my $wordle = join '', $self->{$channel}->{wordle}->@*;
$result .= "; given up by: $self->{$channel}->{givenup_by} ($givenup_on); word was: $wordle";
}
return $result;
}
@ -173,9 +179,21 @@ sub wordle($self, $context) {
return NO_WORDLE;
}
my $wordle = join '', $self->{$channel}->{wordle}->@*;
$self->{$channel}->{wordle} = undef;
if ($self->{$channel}->{correct}) {
my $solved_on = concise ago (time - $self->{$channel}->{solved_on});
return "Wordle already solved by $self->{$channel}->{solved_by} ($solved_on)";
}
if ($self->{$channel}->{givenup}) {
my $givenup_on = concise ago (time - $self->{$channel}->{givenup_on});
my $wordle = join '', $self->{$channel}->{wordle}->@*;
return "The word was $wordle. It was already given up by $self->{$channel}->{givenup_by} ($givenup_on).";
}
$self->{$channel}->{givenup} = 1;
$self->{$channel}->{givenup_by} = $context->{nick};
$self->{$channel}->{givenup_on} = time;
my $wordle = join '', $self->{$channel}->{wordle}->@*;
return "The word was $wordle. Better luck next time.";
}
@ -203,7 +221,7 @@ sub wordle($self, $context) {
$length = $args[0];
}
if (defined $self->{$channel}->{wordle} && $self->{$channel}->{correct} == 0) {
if (defined $self->{$channel}->{wordle} && $self->{$channel}->{correct} == 0 && $self->{$channel}->{givenup} == 0) {
return "There is already a Wordle underway! Use `wordle show` to see the current progress or `wordle giveup` to end it.";
}
@ -237,7 +255,7 @@ sub wordle($self, $context) {
return "I'm not on that channel!";
}
if (defined $self->{$custom_channel}->{wordle} && $self->{$custom_channel}->{correct} == 0) {
if (defined $self->{$custom_channel}->{wordle} && $self->{$custom_channel}->{correct} == 0 && $self->{$custom_channel}->{givenup} == 0) {
return "There is already a Wordle underway! Use `wordle show` to see the current progress or `wordle giveup` to end it.";
}
@ -279,6 +297,10 @@ sub wordle($self, $context) {
return "Wordle already solved by $self->{$channel}->{solved_by}. " . $self->show_wordle($channel);
}
if ($self->{$channel}->{givenup}) {
return "Wordle given up by $self->{$channel}->{givenup_by}.";
}
my $result = $self->guess_wordle($channel, $args[0]);
if ($self->{$channel}->{correct}) {
@ -394,6 +416,7 @@ sub make_wordle($self, $channel, $length, $word = undef, $wordlist = DEFAULT_LIS
$self->{$channel}->{guess} = '';
$self->{$channel}->{guesses} = [];
$self->{$channel}->{correct} = 0;
$self->{$channel}->{givenup} = 0;
$self->{$channel}->{guess_count} = 0;
$self->{$channel}->{letters} = {};

2
lib/PBot/VERSION.pm
View File

@ -25,7 +25,7 @@ use PBot::Imports;
# These are set by the /misc/update_version script
use constant {
BUILD_NAME => "PBot",
BUILD_REVISION => 4859,
BUILD_REVISION => 4860,
BUILD_DATE => "2024-11-27",
};