Hi

   for logging of the position of mobile nodes the following code will work
sure..i
tested it and proved


proc log-movement {} {

global logtimer ns_ ns

set ns $ns_

source ../mobility/timer.tcl

Class LogTimer -superclass Timer

LogTimer instproc timeout {} {

global opt node_;

for {set i 0} {$i \< $opt(nn)} {incr i} {

$node_($i) log-movement

}

$self sched 0.1

}

set logtimer [new LogTimer]

$logtimer sched 0.1

}



-- 
Resmy Baby
08DI005
NIE

Reply via email to