fakecomplete.tcl

采用蚂蚁算法实现ad hoc网络路由协议,平台为ns2

source runsimulation.tcl

foreach val(filebase) [glob log/proa*] {
    set completeFile [open $val(filebase)/COMPLETE "w"]
    puts $completeFile ""
    close $completeFile
}