[ns] nam won't display

[Bing Mei]

Thanks for quick response Sidney.

I am trying to learn mobile wireless network simulation.  I know 
example1b.tcl is not mobile or wireless, but I used it as my first try just 
because it is so simple for a very ns beginner like me.

Can you direct me to some other places where I can find simple code that 
works with the new version of ns-2?  Thanks much.

Bing


----- Original Message ----- 
From: "Sidney Doria" <ssdoria at gmail.com>
To: "Bing Mei" <bmei at ncsu.edu>
Sent: Thursday, December 18, 2008 12:03 AM
Subject: Re: [ns] nam won't display


Greis' tutorial is broken for new versions of NS-2.

What do you what to learn? How to do a new protocol? simple cabled
networks simulations? Wireless? sattelite?

Sidney Doria
UFCG / BRAZIL

2008/12/18 Bing Mei <bmei at ncsu.edu>:
>
> Greetings.
>
> I am a new ns-2 user and haven't got luck even with my first simple 
> simulation run.  After installing ns-allinone-2.33, I tried to run the 
> example1b.tcl (from Marc Greis' tutorial) but got the following message. 
> Can anybody tell me what the problem is and how to fix it?
>
> BTW, I am using Windows XP.  And the nam trace file "out.nam" seemed to be 
> created correctly by the program.
>
> Many thanks.
>
> ---------------------------------------------------------------------------------------------------------------
> $ nam:
> [code omitted because of length]
> : no event type or button # or keysym
>     while executing
> "bind Listbox <MouseWheel> {
> %W yview scroll [expr {- <%D / 120> * 4}] units
> }"
>      invoked from within
> "if {[tk windowingsystem] eq "classic" || [tk windowingsystem] eq "aqua"} 
> {
> %W yview scroll [expr {- <%D>}] units
> }
> bind Li..."
>
> ---------------------------------------------------------------------------------------------------------------
>
>
> The source code is as follows (example1b.tcl from Marc Greis' tutorial):
> -------------------------------------------------------------------------------------------------
> #Create a simulator object
> set ns [new Simulator]
>
> #Open the nam trace file
> set nf [open out.nam w]
> $ns namtrace-all $nf
>
> #Define a 'finish' procedure
> proc finish {} {
>        global ns nf
>        $ns flush-trace
>  #Close the trace file
>        close $nf
>  #Execute nam on the trace file
>        exec nam out.nam &
>        exit 0
> }
>
> #Create two nodes
> set n0 [$ns node]
> set n1 [$ns node]
>
> #Create a duplex link between the nodes
> $ns duplex-link $n0 $n1 1Mb 10ms DropTail
>
> #Create a UDP agent and attach it to node n0
> set udp0 [new Agent/UDP]
> $ns attach-agent $n0 $udp0
>
> # Create a CBR traffic source and attach it to udp0
> set cbr0 [new Application/Traffic/CBR]
> $cbr0 set packetSize_ 500
> $cbr0 set interval_ 0.005
> $cbr0 attach-agent $udp0
>
> #Create a Null agent (a traffic sink) and attach it to node n1
> set null0 [new Agent/Null]
> $ns attach-agent $n1 $null0
>
> #Connect the traffic source with the traffic sink
> $ns connect $udp0 $null0
>
> #Schedule events for the CBR agent
> $ns at 0.5 "$cbr0 start"
> $ns at 4.5 "$cbr0 stop"
> #Call the finish procedure after 5 seconds of simulation time
> $ns at 5.0 "finish"
>
> #Run the simulation
> $ns run
> --------------------------------------------------------------------------------------------
>
> Thanks very much.
>
> Bing
>



-- 
Sidney Doria
Redes ad hoc móveis
Mestrado em Computação
UFCG
Brasil

"Nessa jornada, o conhecimento será o seu escudo..."
(Mestre dos Magos no episódio do grimoire de ouro)