#xgraph

Tcl Code For Xgraph For Wireless

eived_pkts 0 set sent_pkts 0 set interval 1.0 set last_time 0.0 while {[gets $tracefile line] >= 0} { set fields [split $line " "] set event [lindex $fields 0] set time [lindex $fields 1] set pkt_type [lindex $fields 3] set pkt_size [lindex $fields 5] if {$event == "s&quo