How can I create, for instance, 100 wireless nodes in tcl script ?

I tried
set nn 100
for {set i 1} {$i < $val(nn) } { incr i } {
        set tag($i) [new Agent/...]
        $tag($i) set var1_ $i+10
        $tag($i) set time_ 1
        $tag($i) set debug_ 0
}

But I am not able to bind the vars. The values are not assigned.
What's my mistake ?

Thanks

--
----------------------------------------------------------------------------------------------------------------
Rafael Perazzo B Mota
rafaelpera...@gmail.com
Web-page: https://sites.google.com/site/rafaelperazzo/
Doutorando em Ciência da Computação
Universidade de São Paulo (USP)
Campus da Capital
Instituto de Matemática e estatística (IME)
------------------------------------------------------------------------------------------------------------------

Reply via email to