📄 tcl00007.tcl
字号:
set ns [new Simulator]set f [open out.tr w]$ns trace-all $fset nf [open out.nam w]$ns namtrace-all $nfset n0 [$ns node]set n1 [$ns node]set n2 [$ns node]$ns duplex-link $n1 $n2 5Mb 2ms Queue/Prob$ns duplex-link $n0 $n1 5Mb 2ms DropTailset udp0 [new Agent/UDP]$ns attach-agent $n0 $udp0set cbr0 [new Application/Traffic/CBR]$cbr0 attach-agent $udp0set null0 [new Agent/Null]$ns attach-agent $n2 $null0$ns connect $udp0 $null0$ns at 1.0 "$cbr0 start"$ns at 3.0 "finish"proc finish {} { global ns f nf $ns flush-trace close $f close $nf exec ../bin/nam out.nam & exit 0}$ns run
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -