X-Git-Url: https://jxself.org/git/?p=8sync.git;a=blobdiff_plain;f=demos%2Fircbot.scm;h=9905dab03c8a5c2cc189d94468dc3330d972b7c5;hp=202c18c2a866170b39cd71dff30496796020001f;hb=fbb1776a35db50db19fc158381e74361d6e9b789;hpb=4e0dd1c6881754498c144f50db4158d4bff4b782

diff --git a/demos/ircbot.scm b/demos/ircbot.scm
index 202c18c..9905dab 100755
--- a/demos/ircbot.scm
+++ b/demos/ircbot.scm
@@ -33,6 +33,9 @@
      (match action
        ("botsnack"
         (irc-format socket "PRIVMSG ~a :Yippie! *does a dance!*" channel))
+       ((or "hello" "hello!" "hello." "greetings" "greetings." "greetings!"
+            "hei" "hei." "hei!")
+        (irc-format socket "PRIVMSG ~a :Oh hi ~a!" channel speaker))
        ;; Add yours here
        (_
         (irc-format socket "PRIVMSG ~a :*stupid puppy look*" channel))))