Script that "collects" Channel-Events

moonchild · Post by **moonchild** » Fri Jun 10, 2005 8:14 am

Hi, I'm searching for a tcl that Collects channel-events like join, part, kick etc. on the channels the bot is in and then posts the collected information to another channel.

Do you understand what I'm talking about?

Does anyone have a ready-to-use script or can help me crating one?

Thanks so far,
moonchild

demond · Post by **demond** » Fri Jun 10, 2005 12:21 pm

creating one is easy - just bind to events which are of interest to you and inside the handler post to another channel:

Code: Select all

bind join - * pjoin
proc pjoin {n u h c} {
  puthelp "privmsg $::otherchan :$n!$u has joined $c"
}

inxs · Post by **inxs** » Fri Jun 10, 2005 12:33 pm

demond which channel will it message .. means will it send join/part/quit/kick?

Post by **Sir_Fz** » Fri Jun 10, 2005 12:40 pm

to this channel

Code: Select all

set otherchan "#channel"

demond's code is an example, it relays the joins to #channel. If you want it to relay other events read tcl-commands.doc about binds.

moonchild · Post by **moonchild** » Fri Jun 10, 2005 3:36 pm

Thanks a lot for your answers!

moonchild · Post by **moonchild** » Fri Jun 10, 2005 4:06 pm

I wrote the follwing:

bind join - * pjoin
set otherchan "#smart-change"
proc pjoin {n u h c} {
puthelp "privmsg $::otherchan :$n!$u has joined $c"
}

but nothing happens... Am I just too stupid?

inxs · Post by **inxs** » Fri Jun 10, 2005 4:53 pm

this code only works on join can u give me the code on quit ?

^DooM^ · Post by **^DooM^** » Fri Jun 10, 2005 7:15 pm

Question:

inxs wrote:this code only works on join can u give me the code on quit ?

Answer:

Sir_Fz wrote:If you want it to relay other events read tcl-commands.doc about binds.

moonchild · Post by **moonchild** » Sat Jun 11, 2005 3:34 am

Hi, the code you give me does not work... whenever a user joins to the channel the bot does not report that Join-event to the relay channel :-