apanimesh061 0 Junior Poster
set ns [new Simulator]		 

set tracefile [open out.tr w]
$ns	trace-all $tracefile	

set nf [open out.nam w]
$ns	namtrace-all $nf		

proc finish {} {

       global ns tracefile nf
       $ns flush-trace
       close $nf 
       close $tracefile
       exec nam out.nam &
       exit 0

set n0 [$ns node]
set n1 [$ns node]
set n2 [$ns node]

$ns	simplex-link $n0 $n1 15Mb 3ms DropTail
$ns	simplex-link $n1 $n2 20Mb 25ms DropTail

#TCP Connections

set tcp0 [new Agent/TCP]
$ns attach-agent $n0 $tcp0

set ftp0 [new Application/FTP]
$ftp0 attach-agent $tcp0

set tcpsink0 [new Agent/TCPSink]
$ns attach-agent $n1 $tcpsink0

set tcp1 [new Agent/TCP]
$ns attach-agent $n0 $tcp1

set ftp1 [new Application/FTP]
$ftp1 attach-agent $tcp1

set tcpsink1 [new Agent/TCPSink]
$ns attach-agent $n1 $tcpsink1

set tcp2 [new Agent/TCP]
$ns attach-agent $n0 $tcp2

set ftp2 [new Application/FTP]
$ftp2 attach-agent $tcp2

set tcpsink2 [new Agent/TCPSink]
$ns attach-agent $n1 $tcpsink2

set tcp3 [new Agent/TCP]
$ns attach-agent $n0 $tcp3

set ftp3 [new Application/FTP]
$ftp3 attach-agent $tcp3

set tcpsink3 [new Agent/TCPSink]
$ns attach-agent $n1 $tcpsink3

$ns connect $tcp0 $tcpsink0
$ns connect $tcp1 $tcpsink1
$ns connect $tcp2 $tcpsink2
$ns connect $tcp3 $tcpsink3

$ns at 1.0 "$ftp0 start"
$ns at 3.0 "finish"

$ns run

This uses DroptTail as the Queuing protocol, I want to use DRR and FQ, how should I use that..... ?

Please Help! :)

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts learning and sharing knowledge.