ns-energy-resource.tcl

来自「无线传感器网络中,基于协商的SPIN路由协议在NS-2下仿真实现的源代码」· TCL 代码 · 共 10 行

# Energy Resource
# Note: energyLevel_ is measured in Joules

Resource/Energy instproc setParams {args} {
    $self instvar energyLevel_ alarmLevel_
    set energyLevel_ [lindex $args 0]
    set alarmLevel_ [lindex $args 1]
}