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