nds102.tcl

来自「采用蚂蚁算法实现ad hoc网络路由协议,平台为ns2」· TCL 代码 · 共 25 行

source runsimulation.tcl

set val(numnodes) 50
set val(fixednodes) 8
set val(servernodes) 8
set val(numflows) 5

set val(simtime) 30

set val(pausetime) 5
set val(maxspeed) 1

set val(scenario) 1
set val(seed) 4
set val(routingprotocol) AODV

set val(traffictype) cbr
set val(nodemovefile) movement/scen-$val(maxx)x$val(maxy)-$val(numnodes):${val(fixednodes)}-${val(pausetime)}s-${val(maxspeed)}ms-${val(scenario)}
set val(trafficfile) traffic/scen-$val(maxx)x$val(maxy)-$val(numnodes)-${val(numflows)}:${val(servernodes)}-${val(traffictype)}-${val(scenario)}

set val(exptname) test1

setupOutput
doOneSimulationRun