0
set xx(0) 1.0
set yy(0) 1.0
$node_(0) set X_ $xx(0)
$node_(0) set Y_ $yy(0)
set g(1) $column
set g(2) [expr $g(1) + $column]
for {set i 3} {$i <= [expr $row -1]} { incr i } {
set g($i) [expr $g([expr $i - 1]) + $column]
}
set g(0) 0
set xx($g(1)) 1.0
set yy($g(1)) [expr $xx(0) + 100]
$node_($g(1)) set X_ $xx($g(1))
$node_($g(1)) set Y_ $yy($g(1))
for {set i 0} {$i <= [expr $row -1] } { incr i } {
set count($g($i)) 0
}
Может кто-нибудь, пожалуйста, сообщите мне, что делается и использует каждую строку в этом коде ... !! Использование xx (0) и yy (0) также происходит в g (0) g (1) и все.Сетевой симулятор Код Пояснение