Skip to content
This repository has been archived by the owner on Sep 4, 2019. It is now read-only.

Commit

Permalink
Release 0.6
Browse files Browse the repository at this point in the history
  • Loading branch information
DO1JLR committed Nov 7, 2017
1 parent 4bb80e0 commit 0f0bb2f
Showing 1 changed file with 3 additions and 1 deletion.
4 changes: 3 additions & 1 deletion ponybot.pl
Original file line number Diff line number Diff line change
Expand Up @@ -21,7 +21,7 @@
contact => 'l3d@see-base.de',
name => "Ponybot",
description => "A pony-irssi bot to draw colored ascii ponys in some channels.",
version => "0.5",
version => "0.6",
status => "alpha",
license => "GPL-3.0"
);
Expand Down Expand Up @@ -77,6 +77,7 @@ sub sig_message_public {
for my $mlp (@pony){
$server->command("msg $target $mlp");
}
my $hour = (localtime)[2];
if ( $hour >= 23 or $hour < 4 ) {
$server->command("msg $target $nick: Es ist Zeit zum Schlafen. Spannende Traeume erwarten dich!")
}
Expand All @@ -98,6 +99,7 @@ sub get_pony {
my $thispony;
if ( $hour >= 22 or $hour < 5 ) {
$ponyfile = "luna.irc";
$thispony = 42;
} else {
$thispony = int(rand(int($#ascii) ));
while ($thispony eq $lastpony){ $thispony = int(rand(int($#ascii) )); }
Expand Down

0 comments on commit 0f0bb2f

Please sign in to comment.