 |
 |
 |
 |
 |
 |
 |
 |
 |
 |
 |
 |
set
ns [new Simulator]
|
|
$ns
use-scheduler List
|
|
|
set n0 [$ns
node]
|
|
set n1 [$ns
node]
|
|
|
$ns
duplex-link $n0 $n1 1Mb 10ms DropTail
|
set
cbr0 [new Agent/CBR]
|
|
|
$ns
attach-agent $n0 $cbr0
|
|
$cbr0
set packetSize_ 500
|
|
|
$cbr0
set interval_ 0.005
|
|
set
null0 [new Agent/Null]
|
|
|
$ns
attach-agent $n1 $null0
|
|
$ns
connect $cbr0 $null0
|
|
|
$ns
at 0.5 "$cbr0 start"
|
|
$ns
at 4.5 "$cbr0 stop"
|
|