Hello

You can declare ragent_ for instance in your tcl script like this:

                set ragent_($i) [$node_($i) set ragent_]
                $ns at $var "$ragent_($i) Myfunction"

Then in your tcl script you can also have the ragent_ reference like this:

puts "mubashir $ragent_(0)"
puts "mubashir $ragent_(1)"

And you can have access to this ragent_ in either you AODV.cc or DSR.cc
protocol by utilizing it by defining Myfunction in command

AODV::command(int argc, const char*const* argv) {

if(strncasecmp(argv[1], "Myfunction", 2) == 0) {
//do what ever you want
}
      return TCL_OK;
    }

Hope it helps

Regards

-- 
Mubashir Husain Rehmani

Mobile : 00 33 (0)6 32 00 89 35

Reply via email to