Need help with variables

2010-01-19T19:30:41-04:00

The part of your code below will only globalise the variable script and set it to 1 when the 'if' statement is passed. When the 'if' statement fails, the variable script does not exist. Rethink the logic.

Code:

    if {[string match "*[string tolower $version]*" [string tolower $arg]]} {         global script         set script "1"         putserv "privmsg #test :using script var: $script"     }

Statistics: Posted by arfer — Tue Jan 19, 2010 7:30 pm

Need help with variables

2010-01-19T15:18:24-04:00

hi, need some help whit this script.

Code:

set badversion {"logoscript" "script"}bind ctcr - VERSION clientinfproc clientinf {nick uhost hand dest key arg} {global badversionforeach version $badversion {if {[string match "*[string tolower $version]*" [string tolower $arg]]} {global scriptset script "1"putserv "privmsg #test :using script var: $script"}}}bind RAW - 671 whois:sslproc whois:ssl {from key text} {global "ssl"set ssl "[lindex [split $text " "] 4]"putserv "privmsg #test :using ssl var  $ssl"}bind pub - "!sendpass" spproc sp {nick uhost hand chan arg} {global "ssl" "script"putquick "whois $nick $nick"putserv "PRIVMSG $nick :\001VERSION\001"if {$script == "1"} {puthelp "privmsg #test :dont use script"if {$ssl != "a"} {puthelp "privmsg #test :please use ssl" }} else {puthelp "privmsg #test :Ok sending pass"}}

Bot says Tcl error [sp]: can't read "script": no such variable

Statistics: Posted by _TURBO_ — Tue Jan 19, 2010 3:18 pm

egghelp/eggheads community

Need help with variables

Need help with variables