Changeset 1076 for trunk/plugins/en/complex_fry.tcl

Timestamp:

04/05/10 10:14:02 (2 years ago)

Author:

james

Message:

the best kind of commit message

File:

• trunk/plugins/en/complex_fry.tcl (modified) (1 diff)

trunk/plugins/en/complex_fry.tcl

@@ -14 +14 @@
 
 bMotion_plugin_add_complex "fry1" "i'?ve been as (dumb|stupid) as $botnicks" 100 bMotion_plugin_complex_fry1 "en"
+bMotion_plugin_add_complex "technically" "technically \[a-z\]+\\M" 60 bMotion_plugin_complex_technically "en"
+
+proc bMotion_plugin_complex_technically { nick host handle channel text } {
+        if {![bMotion_interbot_me_next $channel]} {
+                return 0
+        }
+
+        if [regexp -nocase "technically (\[a-z\]+)\\M" $text matches thing] {
+                bMotionDoAction $channel $thing "The best kind of $thing"
+                return 1
+        }
+}
 
 proc bMotion_plugin_complex_fry1 {nick host handle channel text} {
-        global botnicks
 
         bMotionDoAction $channel "" "am not %VAR{unsmiles}"