egghelp/eggheads community

Help with a script

2007-03-04T10:53:05-04:00

Didn't notice the 2nd feature. I edited the code above; look at it, it's not hard at all so you should learn how to do it yourself now.

Statistics: Posted by Sir_Fz — Sun Mar 04, 2007 10:53 am

Re: Help with a script

2007-03-25T11:44:07-04:00

First request works correctly (botnick)

I guess it's not easy to add the second one

Thanks

Statistics: Posted by Torrevado — Sun Mar 04, 2007 10:13 am

Help with a script

2007-03-04T10:51:50-04:00

Code:

bind pub - !kiss kissproc kiss {nick uhost hand chan arg} {if {[lsearch {#channel } $chan] == -1} return global afkiss if {![onchan $nick $chan]} {return 0} if {![info exists afkiss([set nickchan [string tolower $nick:$chan]])]} {  set afkiss($nickchan) [list [unixtime] 0] } foreach {t o} $afkiss($nickchan) {break} if {[unixtime]-$t > 120} { set t [unixtime]; set o 0 } if {[incr o] > 5} { return 0 } set afkiss($nickchan) [list $t $o] if {[onchan [set kissed [lindex [split $arg] 0]] $chan]} {  if {[isbotnick $kissed]} {   puthelp "privmsg $chan :"  } elseif {[string equal -nocase $nick $kissed]} {   puthelp "privmsg $chan :"  } {   puthelp "privmsg $chan :\00306$nick kisses $kissed\003 :o"  } }}

Edit: Added other feature (self-kissing).

Statistics: Posted by Sir_Fz — Sat Mar 03, 2007 10:58 pm

Help with a script

2007-03-03T17:10:29-04:00

Code:

bind pub - !kiss kissproc kiss {nick uhost hand chan arg} {if {[lsearch {#channel } $chan] == -1} return global afkiss if {![onchan $nick $chan]} {return 0} if {![info exists afkiss([set nickchan [string tolower $nick:$chan]])]} {  set afkiss($nickchan) [list [unixtime] 0] } foreach {t o} $afkiss($nickchan) {break} if {[unixtime]-$t > 120} { set t [unixtime]; set o 0 } if {[incr o] > 5} { return 0 } set afkiss($nickchan) [list $t $o] if {[onchan [set kissed [lindex [split $arg] 0]] $chan]} {  putserv "privmsg $chan :\00306$nick kisses $kissed\003 :o" }}

I'd like that if someone use botnick, eggdrop will respond an alternative message

I'd like (if it's possible) the same thing to users asking for themselves

Note: this is Sir_Fiz's rock script (modified)

Thanks

Statistics: Posted by Torrevado — Sat Mar 03, 2007 5:10 pm