Changeset 281
- Timestamp:
- 09/19/03 09:25:53 (8 years ago)
- File:
-
- 1 edited
-
trunk/plugins/en/complex_thanks.tcl (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/plugins/en/complex_thanks.tcl
r2 r281 1 1 ## bMotion plugin: thanks 2 # 3 # $Id$ 2 4 3 # 5 4 5 # $Id$ 6 7 # 8 9 10 6 11 ############################################################################### 12 7 13 # This is a bMotion plugin 14 8 15 # Copyright (C) James Michael Seward 2000-2002 16 9 17 # 18 10 19 # This program is covered by the GPL, please refer the to LICENCE file in the 20 11 21 # distribution; further information can be found in the headers of the scripts 22 12 23 # in the modules directory. 24 13 25 ############################################################################### 26 27 14 28 15 29 bMotion_plugin_add_complex "thanks" "^(thank(s|z|x)|thankyou|thank you|thx|thanx|ta|cheers|merki|merci) %botnicks" 100 bMotion_plugin_complex_thanks "en" 16 30 31 32 17 33 proc bMotion_plugin_complex_thanks { nick host handle channel text } { 34 18 35 global bMotionCache 36 19 37 #need to have done something for this user recently 20 if {![regexp -nocase $nick $bMotionCache(lastDoneFor)]} {return 0} 21 set bMotionCache(lastDoneFor) "" 38 39 #if {![regexp -nocase $nick $bMotionCache(lastDoneFor)]} {return 0} 40 41 #set bMotionCache(lastDoneFor) "" 42 43 22 44 23 45 #bMotion_putloglev d * "bMotion: Thanked by $nick on $channel" 24 bMotionDoAction $channel $nick "%VAR{welcome}" 46 47 bMotionDoAction $channel $nick "%VAR{welcomes}" 48 25 49 bMotionGetHappy 50 26 51 driftFriendship $nick 3 52 27 53 return 1 54 28 55 }
Note: See TracChangeset
for help on using the changeset viewer.
