#生成TCP代理,并将其连在结点之上
for {set i 1} {$i<=$node_num_} {incr i} {
set tcp($i) [new Agent/TCP]
$tcp($i) set class_ 2
#将代理TCP(i)分别连接在节点n(i)上
$ns attach-agent $n($i) $tcp($i)
set sink [new Agent/TCPSink]
$ns attach-agent $s2 $sink
$ns connect $tcp($i) $sink
#该数据流为fid_(i)
$tcp($i) set fid_ ($i)
}
#为TCP链接设置FTP传输源
for {set i 1} {$i<=$node_num_} {incr i} {
set ftp($i) [new Application/FTP]
$ftp($i) attach-agent $tcp($i)
$ftp($i) set type_ FTP
}
#通过命令at来安排事件。我们使三个业务源都在0.1秒时开始传送数据,并都在4.0秒时停止发送
for {set i 1} {$i<=$node_num_} {incr i} {
$ns at 0.1 "$ftp($i) start"
$ns at 4.0 "$ftp($i) stop"
}
#派遣 tcp 和 sink 代理(不必要)
for {set i 1} {$i<=$node_num_} {incr i} {
$ns at 4.5 "$ns detach-agent $n($i) $tcp($i) ;
$ns detach-agent $s2 $sink"}
#在仿真到5s是调用结束程序
$ns at 5.0 "finish"#运行仿真
- 上一篇:神经元耦合系统中的同步研究综述
- 下一篇:基于FPGA的脉冲信号发生器设计
-
-
-
-
-
-
-
java+mysql车辆管理系统的设计+源代码
大众媒体对公共政策制定的影响
十二层带中心支撑钢结构...
当代大学生慈善意识研究+文献综述
电站锅炉暖风器设计任务书
酸性水汽提装置总汽提塔设计+CAD图纸
河岸冲刷和泥沙淤积的监测国内外研究现状
杂拟谷盗体内共生菌沃尔...
中考体育项目与体育教学合理结合的研究
乳业同业并购式全产业链...