egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2005-12-23T00:29:36-04:00 https://forum.eggheads.org/app.php/feed/topic/11037 2005-12-23T00:29:36-04:00 2005-12-23T00:29:36-04:00 https://forum.eggheads.org/viewtopic.php?p=58606#p58606 <![CDATA[problem with setuser]]>

Statistics: Posted by nANDu — Fri Dec 23, 2005 12:29 am

]]> 2005-12-22T12:49:55-04:00 2005-12-22T12:49:55-04:00 https://forum.eggheads.org/viewtopic.php?p=58587#p58587 <![CDATA[problem with setuser]]>

Code: 

if {![validuser $nick]} {      setuser $nick XTRA sc$chan      putlog "set user $nick - [getuser $nick XTRA sc$chan]"}
This means, if the user does not exist then setuser....etc Does that make any sense to you?

You need to do it vise-versa, if the user exists then setuser ...etc If you want to add the user if it doesn't exist then check out the adduser command in Tcl-commands.doc.

Statistics: Posted by Sir_Fz — Thu Dec 22, 2005 12:49 pm

]]> 2005-12-22T08:08:09-04:00 2005-12-22T08:08:09-04:00 https://forum.eggheads.org/viewtopic.php?p=58582#p58582 <![CDATA[problem with setuser]]>

Code: 

bind pubm -|- * pubm:counterproc pubm:counter {nick uhost hand chan args} {if {![validuser $nick]} {setuser $nick XTRA sc$chan            putlog "set user $nick - [getuser $nick XTRA sc$chan]"}if {([isop $nick $chan]) || ([isvoice $nick $chan])} {            putlog "pubm counter hand is $hand for XTRA sc$chan = [getuser $hand XTRA sc$chan]"set cc [getuser $hand XTRA sc$chan]set ct [getuser $hand XTRA st$chan]if {$cc == ""} {set cc 0}if {$ct == ""} {set ct 0}if {[expr [unixtime] - $ct] < 2} {return 0}incrchanactivity $chanincr cc      putlog "pubm counter incremented user: $nick $hand $cc"setuser $nick XTRA sc$chan $ccsetuser $nick XTRA st$chan [unixtime]chattr $nick -|+T $chan}}
Still the same error:
<Testb0t> [17:06] Tcl error [pubm:counter]: No such user
.

Statistics: Posted by nANDu — Thu Dec 22, 2005 8:08 am

]]> 2005-12-22T02:14:33-04:00 2005-12-22T02:14:33-04:00 https://forum.eggheads.org/viewtopic.php?p=58569#p58569 <![CDATA[problem with setuser]]> Statistics: Posted by caesar — Thu Dec 22, 2005 2:14 am

]]> 2005-12-22T00:16:26-04:00 2005-12-22T00:16:26-04:00 https://forum.eggheads.org/viewtopic.php?p=58565#p58565 <![CDATA[problem with setuser]]> Tcl error [pubm:counter]: No such user. even though i've setuser. Can't understand, tell me wht the problem is?

Code: 

bind pubm -|- * pubm:counter proc pubm:counter {nick uhost hand chan args} {   if {[matchattr $hand b]} {     chattr $hand -|-T $chan     return 1   }   if {([isop $nick $chan]) || ([isvoice $nick $chan])} {     putlog "pubm counter hand is $hand for XTRA sc$chan - [getuser $hand XTRA sc$chan]"     if {$hand == "*"} {       setuser $nick XTRA sc$chan 1      setuser $nick XTRA st$chan [unixtime]       chattr $hand -|+T $chan       putlog "pubm counter setting user $nick st$chan for the first time"       return     }     set cc [getuser $hand XTRA sc$chan]     set ct [getuser $hand XTRA st$chan]     if {$cc == ""} {set cc 0}     if {$ct == ""} {set ct 0}     if {[expr [unixtime] - $ct] < 2} {       return 0     }     incr cc     putlog "pubm counter incremented user: $nick $hand $cc"     setuser $hand XTRA sc$chan $cc     setuser $hand XTRA st$chan [unixtime]   } }
<Testb0t> [09:00] pubm counter hand is * -
<Testb0t> [09:00] Tcl error [pubm:counter]: No such user.
<Testb0t> [09:00] pubm counter hand is * -
<Testb0t> [09:00] Tcl error [pubm_counter]: No such user.
<Testb0t> [09:00] <test-counter> hello
--
<Testb0t> [09:03] #nANDu# set errorInfo
<Testb0t> Currently: No such user.
<Testb0t> Currently: while executing
<Testb0t> Currently: "setuser $nick XTRA sc$chan 0"
<Testb0t> Currently: (procedure "pubm:counter" line 12)
<Testb0t> Currently: invoked from within
<Testb0t> Currently: "pubm:counter $_pubm1 $_pubm2 $_pubm3 $_pubm4 $_pubm5"

Statistics: Posted by nANDu — Thu Dec 22, 2005 12:16 am

]]>