Declaring alot of variables, with arrays or loops.

[awyeah]

Hi,

I have a script using alot of variables.
And declaring them is a real problem, I guess.

The variables say are, char1, char2, char3...... char115. (char1 - char115)
I can do that manually but, that is really hectic.

What here is I came up with a peiece of code
to do it. But it doesn't work.

Code: Select all

for {set i 1} {$i < 116} {incr i} {
 set char($i) 0
}

#Even tried, set char[$i], or set char$i, but they don't work!

Also in C I remember, you could declare them
such as using arrays, set char[115]? would this
declare 115 variables from, index 0 to index 115?

If anyone, can help me with this, I would be very thankful!

[Papillon]

There is nothing wrong with your code. It should work without problem.
from tclsh:

% for {set i 1} {$i < 116} {incr i} { set char($i) 0 }
% set char(41)
0
% set char(115)
0

...or you could use the while loop instead

Code: Select all

set i 1
while {$i<116} { set char($i) 0 ; incr i }

char[115] does not work in tcl

[awyeah]

Umm... thanks Papillon.. yeah it works