[ns] Urgent: Please Help

[Sunil Kumar Singh]

Hi all, 

For my MIP simulation, I am introducing another variable(active_test) in
MN. This variable's value I modify based on certain conditions. I only 
want to start transmitting when the value of active_test is 1. For this I 
define the following procedure in ns-source.tcl. But this does not work. 
Can anyone tell me whats wrong?



Application/FTP instproc startaftercheck {node} {
	puts "Inside startaftercheck"
	$node instvar active_test
	$node send_check
	while { $active_test != 3} {
		if { $active_test == 1} { 
		puts "Starting to send packets" 
		[$self agent] send -1
		break
		} elseif { $active_test == 2 } {
		break
		}
	}
}



Thanks in advance,
Sunil




--