egghelp/eggheads community

Variable does not take value

2016-11-08T19:11:18-04:00

When programmed it looks I was asleep.
I declared the variables backwards.
Thanks caesar and willyw by being more awake than me.

Statistics: Posted by juanamores — Tue Nov 08, 2016 7:11 pm

Variable does not take value

2016-11-08T10:09:00-04:00

Code:

  utimer 5 [list vDJ oldnick uhost hand chan newnick Djs_channel dj]   proc vDJ {$oldnick $uhost $hand $chan $newnick $Djs_channel $dj} {

Are these just backwards?

As in, should be:

Code:

utimer 5 [list vDJ $oldnick $uhost $hand $chan $newnick $Djs_channel $dj]   proc vDJ {oldnick uhost hand chan newnick Djs_channel dj} {

Statistics: Posted by willyw — Tue Nov 08, 2016 10:09 am

Variable does not take value

2016-11-08T10:06:17-04:00

That's because you forgot to add $ in front of the variable names. For example it should be $oldnick instead of oldnick.

You mean in this line, right?

Code:

utimer 5 [list vDJ oldnick uhost hand chan newnick Djs_channel dj]

If so, I saw that too.
However, wouldn't that itself assign a value to the variable in the proc when called? Thus perhaps causing some other error, but not the one described?

I started to answer this post earlier, then after I re-thought it as just stated, I convinced myself that I was not awake yet, and to wait awhile.
I must be overlooking something ....

Statistics: Posted by willyw — Tue Nov 08, 2016 10:06 am

Variable does not take value

2016-11-08T08:42:29-04:00

That's because you forgot to add $ in front of the variable names. For example it should be $oldnick instead of oldnick.

Statistics: Posted by caesar — Tue Nov 08, 2016 8:42 am

Variable does not take value

2016-11-08T06:50:20-04:00

This script controls changes nicks.

Code:

bind nick - * nickchangeset debug_channel "#debugs_tcl"set Djs_channel #Djs_channel"proc nickchange { oldnick uhost hand chan newnick } {    global debug_channel Djs_channelif {[string tolower $chan] != [string tolower $Djs_channel]} {return 0}#DJs data baseif {[file exists dj]} {    set temp [open "dj" r]    set djs [gets $temp]set dj [lindex $djs 0]    close $temp}#putmsg $debug_channel "variable previous nick = $oldnick"#dj database waiting timerutimer 5 [list vDJ oldnick uhost hand chan newnick Djs_channel dj]proc vDJ {$oldnick $uhost $hand $chan $newnick $Djs_channel $dj} {if {([info exist dj]) && ([info exist oldnick]) && ($oldnick == "$dj")} { putmsg $Djs_channel "$newnick does not change its nickname while is on air. Thanks"return}#DJs and Staff check flagsset hand [nick2hand $oldnick $chan]if {[djs:check:flags $chan $hand]} { return } else {putmsg $Djs_channel "$newnick remember back to your nick..."}}}

ERROR:
[10:39:38] Tcl error in script for 'timer45':
[10:39:38] can't read "oldnick": no such variable

..................................................
#putmsg $debug_channel "variable previous nick = $oldnick" HERE $oldnick is set perfectly..

#dj database waiting timer
utimer 5
proc vDJ {$oldnick $uhost $hand $chan $newnick $Djs_channel $dj} {
HERE can't read "oldnick": no such variable

I do not understand that the variable has value on the previous line and NOT in the next line.

Statistics: Posted by juanamores — Tue Nov 08, 2016 6:50 am