ns2 "_o3 self class proc file optx opty"

h3am · 12-24-2017, 01:11 PM

hi
i have problem whit ns2

Code:

wrong # args: should be "_o3 self class proc file optx opty"
    (Simulator namtrace-all-wireless line 1)
    invoked from within
"$ns namtrace-all-wireless $namFile "
    (file "test6.tcl" line 19)

Code:

set val(chan)			Channel/WirelessChannel
set val(prop)			Propagation/TwoRayGround
set val(netif)			Phy/WirelessPhy
set val(mac)			Mac/Simple
set val(ifq)			Queue/DropTail/PriQueue   
set val(ll)				LL
set val(ant)			Antenna/OmniAntenna
set val(ifqlen)         50
set val(nn)				2
set val(rp)				DumbAgent  
set val(x)               250
set val(y)               250

set ns [new Simulator]
$ns use-newtrace
set traceFile [open out.tr w]
$ns trace-all $traceFile
set namFile [open out.nam w]
$ns namtrace-all-wireless $namFile 
	$val(x) $val(y)

set topo [new Topography]
$topo load_flatgrid $val(x) $val(y)
create-god $val(nn)
set chan_ [new $val(chan)]

$ns node-config -adhocRouting $val(rp) -llType $val(ll) \
	-macType $val(mac)  -ifqType $val(ifq)  \
	-ifqLen $val(ifqlen) -antType $val(ant) \
	-propType $val(prop) -phyType $val(netif) \
	-topoInstance $topo a-agentTrace ON \
	-routerTrace ON -macTrace ON \
	-movementTrace ON -channel $chan_
for {set i 0} {$i < $val(nn)} {incr i} {
set n($i) [$ns node]
$n($i) random-motion 0
}

$n(0) set x_ 20.0
$n(0) set y_ 20.0
$n(0) set z_ 0.0
$n(1) set x_ 120.0
$n(1) set Y_ 20.0
$n(1) set z_ 0.0


$ns at 0.0 "$n(0) setdest [$n(0) set x_] [$n(0)	set y_] 0.0"
$ns at 0.0 "$n(1) setdest [$n(1) set x_] [$n(1)	set y_] 0.0"
	
set tcp [new Agent/TCP]
set sink[new Agent/TCPSink]
$ns attach-agent $n(0) $tcp
$ns attach-agent $n(1) $sink
$ns connect $tcp $sink
$ns connect $tcp $sink
set ftp [new Application/FTP]
$ftp attach-agent $tcp

proc stop {} {
	global ns traceFile namFile
	$ns flush-trace
	close $traceFile; close $nameFile
	exit 0
}
$ns at 0.5 "$ftp start" 
$ns at 5.0 "$ftp stop"
$ns at 6.0 "stop"
$ns run

knudfl · 12-25-2017, 12:41 PM

Welcome to LQ.

Some typo´s ...

Line 19

Code:

$ns namtrace-all-wireless $namFile 
	$val(x) $val(y)

must be :

Code:

$ns namtrace-all-wireless $namFile $val(x) $val(y)

Line 42

Code:

$n(1) set Y_ 20.0

Edit to

Code:

$n(1) set y_ 20.0

Line 50

Code:

set sink[new Agent/TCPSink]

Edit to

Code:

set sink [new Agent/TCPSink]

Line 61

Code:

	close $traceFile; close $nameFile

Edit to

Code:

	close $traceFile; close $namFile