aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Phillips <david@yeah.nah.nz>2020-03-15 17:11:50 +1300
committerDavid Phillips <david@yeah.nah.nz>2020-03-15 17:11:50 +1300
commitc46b6bbbc7a7a0c7949c4c6d57613b90da73bf93 (patch)
tree2d51a3a3e4bae4443127b24829e69d68c2db67c7
parent2f0feee0d3e654d58fa5b7de3d53930783581605 (diff)
downloadidalius-c46b6bbbc7a7a0c7949c4c6d57613b90da73bf93.tar.xz
Add some misc zest to Natural.pm
-rw-r--r--Plugin/Greet.pm1
-rw-r--r--Plugin/Natural.pm2
2 files changed, 3 insertions, 0 deletions
diff --git a/Plugin/Greet.pm b/Plugin/Greet.pm
index 4d221c2..d223ff0 100644
--- a/Plugin/Greet.pm
+++ b/Plugin/Greet.pm
@@ -70,6 +70,7 @@ sub on_join {
"$nick!!!!! guys!!!!!! $nick is here !!!!!!!!",
"weclome $nick",
"Welcome to $where, $nick. Leave your sanity at the door",
+ "It smells like up dog in here",
"I feel sick");
}
$irc->delay([privmsg => $where => $response], 1+rand(5));
diff --git a/Plugin/Natural.pm b/Plugin/Natural.pm
index 58c7f96..53c799f 100644
--- a/Plugin/Natural.pm
+++ b/Plugin/Natural.pm
@@ -75,6 +75,8 @@ sub choose_normal_response {
return some("?", "รถ", ":O", "!!");
} elsif ($what =~ /^help\b/i) {
return some("D:", "ono", "*throws a lifeline to $nick");
+ } elsif ($what =~ /^ooo$/i) {
+ return some("jjj");
} elsif ($what =~ /(:D|:\)|D:|:\||:\\|:C|:S)/) {
return some(":D", ":)", "D:", ":|", ":/", ":\\", ":S", ">:D", ">:(", ">>>:CCCC");
} elsif ($what eq "o/") {