dca-c.tcl

来自「clustering for ns-2 simulation」· TCL 代码 · 共 18 行

#============================
# Load Library.
#============================
source "template/config/lib.tcl"

#============================
# Load Algorithms's Defaults.
#============================
source "template/defaults/sensors.default"
source "template/defaults/DCA.default"
source "template/defaults/CONNECTOR.default"

set pathCompleto [lindex $argv 0]
begin-simulation $pathCompleto
declareModule {Agent/DCA} {Utility/CLUSTERING} {DCA} {DCA}
declareModule {Agent/MYCONNECTOR} {Utility/BACKBONE} {CONNECTOR} {CONNECTOR}
start-simulation