$var

dutch1918 · Post by **dutch1918** » Fri Oct 03, 2014 7:17 pm

I have a $var that has data +###.## or -###.##. What I want to do is "if the $var has +###.## then do something. This is what I have thus far but it doesn't work...

Code: Select all

if {[$change]!="+"} {
        putserv "PRIVMSG $channel :\[\00304DJIA\017]\00303 --> $last $change\017 | $timestamp"
        } else {
		putserv "PRIVMSG $channel :\[\00304DJIA\017]\00304 --> $last $change\017 | $timestamp"
        }

Post by **caesar** » Sat Oct 04, 2014 3:16 am

Hi,

you should use string first to get what you want:

Code: Select all

if {[string first "+" $var] == 0]} {
	putserv "PRIVMSG $channel :\[\00304DJIA\017]\00303 --> $last $change\017 | $timestamp"
} elseif {[string first "-" $var] == 0]} {
	putserv "PRIVMSG $channel :\[\00304DJIA\017]\00304 --> $last $change\017 | $timestamp" 
}

dutch1918 · Post by **dutch1918** » Sat Oct 04, 2014 8:33 am

I get the following error back:

Tcl error [pub:test]: invalid character "]" in expression "...irst "+" $change] == 0]"

After further research I resolved it. Here is the correct syntex:

Code: Select all

set plus [string first "+" $change]
set minus [string first "-" $change]
	if {$plus == !1} { 
        putserv "PRIVMSG $channel :\[\00312DJIA\017]\002 -->\017 \00303$last $change\017 | $timestamp"
        } elseif {$minus == !1} {
		putserv "PRIVMSG $channel :\[\00312DJIA\017]\002 --> \017\00304$last $change\017 | $timestamp"
        } else {
		putserv "PRIVMSG $channel :\[\00312DJIA\017]\002 --> $last \017 | $timestamp"
	}
}

Fire-Fox · Post by **Fire-Fox** » Sat Oct 04, 2014 3:41 pm

Code: Select all

{$minus == !1}

is wrong the !

it should with == as in != ex