[ns] Goodput script

[Ghassan Akrem]

Dear NS users..
 
I'm search for workable script to measure the goodput for one or more TCP 
variant
 
any one can help to provide this tcl script?
 
Thanks