9 connect("localhost", "rhawk", "#rhtest");
13 FROM == OWNER && TO == NICK && /^die in a fire/ {
14 say("Ack, argh, barasdjf..")
18 FROM == OWNER && TO == NICK && /^reload/ {
23 FROM == OWNER && TO == NICK && /^rejoin/ {
29 FROM == OWNER && TO == NICK && /^(join|part)/ {
30 match(MSG, /(join|part) +(#+\w+)/, arr)
31 if (arr[1] && arr[2]) {
32 send(toupper(arr[1]) " " arr[2]);
37 FROM == OWNER && TO == NICK && /^\.msg/ {
38 match(MSG, /.*\.msg +(#*\w+) +(.*)/, arr)
39 send("PRIVMSG " arr[1] " :" arr[2])
44 kick_delay = (kick_delay + 2) * 2
45 system("sleep " kick_delay)
47 reply("I feel happy!")
51 FROM ~ /bo+t$|rhnoise/ {
55 CMD == "NICK" && FROM in bots {
70 (systime()-lastpoll > 60*60*24 && CMD == "PING") ||
71 (/^\.poll/ && DST == "#sfvlug" && CMD == "PRIVMSG") {
76 cmd = "curl -s http://sfvlug.org/"
77 day = "(Sun|Mon|Tue|Wed|Thu|Fri|Sat)"
78 web = "next meeting.*" day "\\w+[, ]+([A-Z]\\w+) +([0-9]+)[, ]+([0-9]+)"
79 irc = day "\\w*[, ]+([A-Z]\\w+) +([0-9]+)"
80 while (cmd | getline line) {
81 if (match(line, web, arr)) {
82 new = arr[1] " " arr[2] " " arr[3]
83 sub(irc, new, topics[chan])
92 TO == NICK && /^/ { extra = "" }
93 TO == NICK && /^.fortune.*-o/ { extra = "-o" }
94 TO == NICK && /^.fortune/ {
95 gsub(/.*\.fortune *|-[a-z]* *|[^a-zA-Z0-9 ]/, "", MSG)
96 cmd = "fortune " extra " " (MSG ? "-m '" MSG "'" : "-s")
97 while (cmd | getline _fortune && lines < 5) {
106 FROM ~ OWNER && /^go go gadget woop/ {
108 say(".delay " i " seconds; .woop " i)
111 TO == NICK && DST ~ /^#/ {
118 say("Awk, awk, awk! I'm a bird!")
122 reply("Nothing can help you now..")
126 say("\00309Merry \00304Christmas!")