如何在NS2中查找邻居列表

本文介绍了如何在NS2中查找邻居列表的处理方法，对大家解决问题具有一定的参考价值，需要的朋友们下面随着小编来一起学习吧！ 问题描述

我想在传感器网络中查找邻居节点列表。如果有人为我提供示例Tcl脚本，那将是非常有帮助的。谢谢

推荐答案# neighbor node calculation set nbr [open Neighbor w] puts $nbr " Neighbor Detail" puts $nbr " ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~" puts $nbr " Node Nb node Node-Xpos Node-Ypos Nb-Xpos Nb-Ypos Distance(d)" puts $nbr " ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~" close $nbr proc distance { n1 n2 nd1 nd2} { global c n bnd src dst j0 j1 set a 0 set nbr [open Neighbor a] set x1 [expr int([$n1 set X_])] set y1 [expr int([$n1 set Y_])] set x2 [expr int([$n2 set X_])] set y2 [expr int([$n2 set Y_])] set d [expr int(sqrt(pow(($x2-$x1),2)+pow(($y2-$y1),2)))] if {$d<300} { if {$nd2!=$nd1} { puts $nbr " $nd1 $nd2 $x1 $y1 $x2 $y2 $d" } } close $nbr } U can use above function to print neighbor node's of all nodes in ns2. 调用"Distance"函数打印邻居列表 例如，

for {set i 0} {$i <$val(nn)} {incr i} { for {set j 0} {$j <$val(nn)} {incr j} { $ns at 10.002 "distance $n($i) $n($j) $i $j" } } here val(nn) denotes number of nodes.