egghelp/eggheads community

probleme with array

2005-07-16T06:56:08-04:00

Yes, raw 307 is not forced by anything. The output would be like:

Code:

#raw 307:userips

Statistics: Posted by awyeah — Sat Jul 16, 2005 6:56 am

probleme with array

2005-07-15T21:33:44-04:00

is that the whole script? that 307 reply is not forced by anything

also, I can't believe it works at all, since the 307 handler proc is wrong

Statistics: Posted by demond — Fri Jul 15, 2005 9:33 pm

probleme with array

2005-07-15T18:04:40-04:00

Try replacing the procregister proc with:

Code:

proc procregister {nick host hand chan arg} {  global identify  set _nick [lindex $arg 0]  if ![string length $_nick] { set _nick $nick }  set identifi "no"  if {[info exists identify($_nick)] && $identify($_nick) == "is a registered nick"} {  set identifi "yes" }  putserv "privmsg $chan :$identifi" }

Statistics: Posted by Sir_Fz — Fri Jul 15, 2005 6:04 pm

probleme with array

2005-07-15T17:48:19-04:00

Hello,

I have this script

Code:

bind pub - !reg procregisterproc procregister {nick host hand chan arg} {global identify set _nick [lindex $arg 0]if ![string length $_nick] { set _nick $nick }if {![info exists identify]} {set identifi "no"}if {$identify($_nick) == "is a registered nick"} {set identifi "yes"}putserv "privmsg $chan : $identifi"} bind raw - 307 identify   proc identify {from key arg} {global identify set nickidentify [lindex [split $arg] 1]set identify($nickidentify) [lindex [split $arg :] 1]return 0}

if is registered nick, it's ok.
But if isn't registered nick, i have this error message: can't read "identify(lilo)": no such element in array.

Thanks in advance!!

Statistics: Posted by ranny — Fri Jul 15, 2005 5:48 pm