egghelp/eggheads community

REALLY SIMPLE - I'm having a block and am tired.

2007-07-16T06:37:06-04:00

Basically, [join] converts lists into strings. Check the join manual page.

Statistics: Posted by Sir_Fz — Mon Jul 16, 2007 6:37 am

REALLY SIMPLE - I'm having a block and am tired.

2007-07-16T04:43:16-04:00

bind part
procname

Description: triggered by someone leaving the channel. The mask is matched against "#channel nick!user@host" and can contain wildcards. If no part message is specified, msg will be set to "".

New Tcl procs should be declared as

proc partproc {nick uhost hand chan {msg ""}} { ... }

for compatibility.

Module: irc

Something like this:

Code:

bind part - "*" check:users:on:partproc check:users:on:part {nick uhost hand chan {text ""}} { if {![isbotnick $nick]} {  #whatever you want to do here  }}

Statistics: Posted by awyeah — Mon Jul 16, 2007 4:43 am

REALLY SIMPLE - I'm having a block and am tired.

2007-07-16T04:40:07-04:00

Okay well, everything works well but when someone parts the channel I need it to check the users again.

So what's the bind for when someone parts the channel?

Statistics: Posted by Zorb — Mon Jul 16, 2007 4:40 am

REALLY SIMPLE - I'm having a block and am tired.

2007-07-16T03:41:45-04:00

Why shouldn't we apply join over a string? join is used in relation with strings. I don't understand this, please elaborate Sir_Fz.

Anyway Tossers, could would work, but as caesar mentioned to make it more understandable and readable easier to the eye, you can use this:

Code:

bind raw - INVITE invite:detectorbind raw - 315 check:chan:countproc invite:detector {from keyword arg} { global invite set chan [lindex [split [join [string tolower $arg] ""] :] 1] if {[validchan $chan]} { return 0 } set invite($chan) 1 channel add $chan}proc check:chan:count {from keyword arg} { global invite set chan [string tolower [lindex [split $arg] 1]] if {[info exists invite($chan)]} {  if {[llength [chanlist $chan]] < 3} {   channel remove $chan   unset invite($chan)  } else {   unset invite($chan)  } }}

Statistics: Posted by awyeah — Mon Jul 16, 2007 3:41 am

REALLY SIMPLE - I'm having a block and am tired.

2007-07-15T09:40:21-04:00

Do not apply join over a string.

Statistics: Posted by Sir_Fz — Sun Jul 15, 2007 9:40 am

REALLY SIMPLE - I'm having a block and am tired.

2007-07-14T17:19:57-04:00

I see that you are using '[string tolower [lindex [split [join $arg ""] :] 1]]' 3 times. Why haven't you done the same thing like in 'if {![info exists invite([set chan [string tolower [lindex [split $arg] 1]]])]} {' ?

Statistics: Posted by caesar — Sat Jul 14, 2007 5:19 pm

REALLY SIMPLE - I'm having a block and am tired.

2007-07-14T15:18:45-04:00

awyeah its best to bind on raw 315 (end of who) so then the bot would of got the list.

Code:

bind raw - INVITE invite:detectorbind raw - 315 check:chan:countproc invite:detector {from keyword arg} { global invite if {[validchan [string tolower [lindex [split [join $arg ""] :] 1]]]} { return } set invite([string tolower [lindex [split [join $arg ""] :] 1]]) channel add [string tolower [lindex [split [join $arg ""] :] 1]]}proc check:chan:count {from keyword arg} { global invite if {![info exists invite([set chan [string tolower [lindex [split $arg] 1]]])]} {  unset $invite($chan)  if {[llength [chanlist $chan]] < 3} {   channel remove $chan  } }}

Just a few tweaks to awyeah's code.

Statistics: Posted by r0t3n — Sat Jul 14, 2007 3:18 pm

REALLY SIMPLE - I'm having a block and am tired.

2007-07-14T14:52:24-04:00

Well you will need to use bind raw with the keyword "INVITE". You will also need an additional bind join, for the bot to check on join the channel user count and then based on that either part or stay in the channel.

Here is a basic script which can do the work for you, make changes and edit it yourself the way you would want it to work accordingly.

Code:

bind raw - INVITE invite:detectorbind join - "*" check:chan:countproc invite:detector {from keyword arg} { channel add [string tolower [lindex [split [join $arg ""] :] 1]]}proc check:chan:count {nick uhost hand chan} { if {[isbotnick $nick]} {  if {[llength [chanlist $chan]] < 3} {    channel remove $chan    }  }}

Statistics: Posted by awyeah — Sat Jul 14, 2007 2:52 pm

REALLY SIMPLE - I'm having a block and am tired.

2007-07-14T12:46:44-04:00

you want the end-of-who raw, which is raw 315.

http://www.xs4all.nl/~wiebeson/rawlist.txt is a list of raws.

Statistics: Posted by r0t3n — Sat Jul 14, 2007 12:46 pm

REALLY SIMPLE - I'm having a block and am tired.

2007-07-14T09:13:56-04:00

well, its [llength [chanlist #channel]]
but since the bot joins u should do this check after recieving the nicklist on the channel (bind raw) dont remember the raw atm. if you just use a bind join proc for it, the bot havent recieved the chanlist, and it will return 1.

Statistics: Posted by scarface — Sat Jul 14, 2007 9:13 am

REALLY SIMPLE - I'm having a block and am tired.

2007-07-14T08:51:05-04:00

Well, the idea is when the bot is invited to a channel it joins but if the user amount in the channel is lower than 3 it will part.

I just can't think of how to get the number of people in the channel.

Thank you in advance.

Statistics: Posted by Zorb — Sat Jul 14, 2007 8:51 am