egghelp/eggheads community

snotice + bind ctcr

2003-04-02T16:06:52-04:00

==> putlog "ctcp reply $key from $nick: $arg"

Did it say that in your log? That's what I meant. I want to see if it's even getting the reply.

Also, do you see the ctcp reply itself on the partyline?

Statistics: Posted by stdragon — Wed Apr 02, 2003 4:06 pm

snotice + bind ctcr

2003-04-01T09:01:17-04:00

well ....
i still don't get a query wenn a user connect with a different finger reply....

Statistics: Posted by misterys — Tue Apr 01, 2003 9:01 am

snotice + bind ctcr

2003-03-31T18:10:36-04:00

Code:

####    binds bind raw - notice ctcpfinger bind ctcr - "FINGER" ctcpreply ####    ctcp on connect proc ctcpfinger {from key text} {   if {[string match "*connecting*" $text] } {     set text [split $text]     set nickname [lindex $text 8]     putserv "PRIVMSG $nickname :\FINGER\001"     putlog "$nickname connected"   }  return 0} ####    ctcp reply + action proc ctcpreply {nick uh hand dest key arg} {  putlog "ctcp reply $key from $nick: $arg"  if {![string match -nocase "*eggdrop*" $arg]} {     putserv "PRIVMSG misterys :kljsdfjl"   }  return 0}

See what that says now.

Statistics: Posted by stdragon — Mon Mar 31, 2003 6:10 pm

snotice + bind ctcr

2003-03-31T15:59:57-04:00

Code:

####bindsbind raw - notice ctcpfingerbind ctcr - "FINGER" ctcpreply####ctcp on connectproc ctcpfinger {from key text} { if {[string match "*connecting*" $text] } { set text [split $text] set nickname [lindex $text 8] putserv "PRIVMSG $nickname :\FINGER\001" putlog "$nickname connected"return 0} } ####ctcp reply + actionproc ctcpreply {nick uh hand dest key arg} {   if {![string match -nocase "*eggdrop*" $arg]} {     putserv "PRIVMSG misterys :kljsdfjl"   } }

hmm same result as before, i don't get a query when a user connects with a different version... that's the main problem
misterys

Statistics: Posted by misterys — Mon Mar 31, 2003 3:59 pm

snotice + bind ctcr

2003-03-31T15:35:00-04:00

Code:

proc ctcpreply {nick uh hand dest key arg} {   if {![string match -nocase "*eggdrop*" $arg]} {     putserv "PRIVMSG misterys :blabla"   } }

The ! in front of [string ...] will make it only work if it does not match.

Also put a return 0 at the end of your ctcpfinger proc.

Statistics: Posted by stdragon — Mon Mar 31, 2003 3:35 pm

snotice + bind ctcr

2003-03-31T14:23:18-04:00

hi....

the tcl should should bind the snotices from the server when a user connects and finger him. ( it's clear that the bot has ne right userflags to recive the snotices)

the finger reply should the bot msg to my query if it does not contain a special word, in this case "*eggdrop*" ...

i hope it's clear... sorry again for bad english i must lern more

mfg
misterys

Statistics: Posted by misterys — Mon Mar 31, 2003 2:23 pm

snotice + bind ctcr

2003-03-31T13:49:52-04:00

What are you trying to do exactly?

Statistics: Posted by stdragon — Mon Mar 31, 2003 1:49 pm

snotice + bind ctcr

2003-03-31T12:00:50-04:00

sorry *g that was my fault...

... but atm i tinkt i'm to stupid for this tcl
*banging head on the table*

fact is, the client recives the ctcp, so i think, he _must_ at last reply when there is enough bandwich. the client gets the finger request at the same time when he is requested to identify hisself at nickserv and when u get this notice, he's ready with connecting ( in my opinion )

or am i just to stupid for this *g

Statistics: Posted by misterys — Mon Mar 31, 2003 12:00 pm

snotice + bind ctcr

2003-03-31T11:06:02-04:00

You stated it is now working, oh well.

Code:

if {[string match "*connecting*" $text] } {

This line must be failing, if no CTCP is being returned.

Other options include, the client has connected completly, when the CTCP is sent.

You may want to send the message using a timer, set to 5 second, to make sure the connection is completed.

Statistics: Posted by ppslim — Mon Mar 31, 2003 11:06 am

snotice + bind ctcr

2003-03-31T07:55:10-04:00

hmm no one else an idea how to do ?
or does anyone knows an alternative way how to realize this script ?

still in hope
misterys

Statistics: Posted by misterys — Mon Mar 31, 2003 7:55 am

snotice + bind ctcr

2003-03-30T15:19:45-04:00

it works *g now the bot floods my partyline *g

Statistics: Posted by misterys — Sun Mar 30, 2003 3:19 pm

snotice + bind ctcr

2003-03-30T15:16:31-04:00

Add a 'putlog $nickname' to ctcpfinger just to be sure it's working :)

Statistics: Posted by BarkerJr — Sun Mar 30, 2003 3:16 pm

snotice + bind ctcr

2003-03-30T15:10:21-04:00

i think yes, i searched here how to bind snotices...
connect and kill notices are both snotices, so i think it's right...
or do u know an other way how to bind them ?

misterys

Statistics: Posted by misterys — Sun Mar 30, 2003 3:10 pm

snotice + bind ctcr

2003-03-30T15:07:48-04:00

Are yolu sure teh RAW bind is matching.

Statistics: Posted by ppslim — Sun Mar 30, 2003 3:07 pm

snotice + bind ctcr

2003-03-30T14:54:44-04:00

hi...
i have a problem with a tcl,

Code:

bind raw - notice ctcpfingerbind ctcr - FINGER ctcpreplyproc ctcpfinger {from key text} { if {[string match "*connecting*" $text] } { set text [split $text] set nickname [lindex $text 8] putserv "PRIVMSG $nickname :\001FINGER\001" } }  proc ctcpreply {nick uh hand dest key arg} { if {[string match -nocase "*Java*" $arg]} { putserv "PRIVMSG misterys :blabla"} }

problem is:
when i bind the "connection snotice" from the server when a user connect, i dont get the finger reply.
if i bind join, the script is working...
running eggdrop1.6.10 and Tcl 8.3.2.

what can i do ? where is the error ?
btw... how to do that i just get a msg when the bot DONT geht the Finger reply "*java*" ??

i hope that s.o. can help me *g
and sorry for my bad english

mfg
misterys

Statistics: Posted by misterys — Sun Mar 30, 2003 2:54 pm