This is the new home of the egghelp.org community forum.
All data has been migrated (including user logins/passwords) to a new phpBB version.


For more information, see this announcement post. Click the X in the top right-corner of this box to dismiss this message.

Client -- Client connecting

Help for those learning Tcl or writing their own scripts.
Post Reply
s
sattam
Voice
Posts: 20
Joined: Sat Jan 02, 2010 8:42 am

Client -- Client connecting

Post by sattam »

I'm trying to do and repaired
Write entry in #Em

This bot Operator

(=E-) [20:06] -NOTICE- *** Client -- Client connecting: Guest-56228 (~r00t@cpc2-pool12-2-0-cust210.15-2.cable.virginmedia.com) [82.2.228.211] {users}

Code: Select all

bind raw * notice snotice
proc snotice {from keyword arg} {
       set nick [lindex $arg 5]
       putserv "svsjoin $nick #Em"
}
User avatar
speechles
Revered One
Posts: 1398
Joined: Sat Aug 26, 2006 10:19 pm
Location: emerald triangle, california (coastal redwoods)

Re: Client -- Client connecting

Post by speechles »

Code: Select all

bind raw - NOTICE snotice
proc snotice {from keyword arg} {
       # no use sending useless svsjoin's, is this notice
       # about a client connecting?
       if {![string match -nocase "*client connecting*" $arg]} { return }
       # so this works on multiple ircd's, nick is _not always_ in
       # the sixth position, but it is always after the first colon.
       set nick [lindex [lindex [split $arg :] 1] 0]
       putserv "svsjoin $nick #Em"
}
Last edited by speechles on Wed Jan 06, 2010 6:59 pm, edited 2 times in total.
s
sattam
Voice
Posts: 20
Joined: Sat Jan 02, 2010 8:42 am

Re: Client -- Client connecting

Post by sattam »

speechles wrote:

Code: Select all

bind raw -|- * NOTICE snotice
proc snotice {from keyword arg} {
       if {![string match -nocase "*client connecting*" $arg]} { return }
       # so this works on multiple ircd's, nick is _not always_ in
       # the sixth position, but it is always after the first colon.
       set nick [lindex [lindex [split $arg :] 1] 0]
       putserv "svsjoin $nick #Em"
}

Unfortunately did not work
User avatar
speechles
Revered One
Posts: 1398
Joined: Sat Aug 26, 2006 10:19 pm
Location: emerald triangle, california (coastal redwoods)

Post by speechles »

My bad.... try the altered code above I've edited ;)
s
sattam
Voice
Posts: 20
Joined: Sat Jan 02, 2010 8:42 am

Post by sattam »

speechles wrote:My bad.... try the altered code above I've edited ;)
I do not understand
I want to help if allowed
s
sattam
Voice
Posts: 20
Joined: Sat Jan 02, 2010 8:42 am

Post by sattam »

I mean when any user contact In the server

(=E-) [22:58] -NOTICE- *** Client -- Client exiting: Guest-56228 (~r00t@cpc2-pool12-2-0-cust210.15-1.cable.virginmedia.com) [Client Quit] [82.8.228.211]
Post Reply