关于RED如何启动ARED算法

[xianghuxuexia]

网上也搜了一下，但是就是不知道具体应该怎么修改，请高手指导，关于RED如何启动ARED算法 。谢谢。

[xianghuxuexia]

求指导啊 求指导啊 求指导啊

[xianghuxuexia]

网上说ared是ns2自带的，我按照网上的方法如下： ############################################################# 注：关于ARED：ARED其实NS2包中是自带的，在TCL脚本语言中使用RED算法时加入以下参数拥塞算法就变成ARED了，在压缩文件中有ared的完整应用TCL文件，自己看看吧。 #use new ared $redq set adaptive_ 1 （使adaptive_的值为1即启动ARED算法） #set new ared parameters $redq set thresh_ 10 $redq set maxthresh_ 30 $redq set limit_ 1000 $redq set mean_pktsize_500 $redq set q_weight_0.004 $redq set mark_p_ 0.1 $redq set interval_ 0.1 ################################################################### 我把上述代码复制到了自己写的tcl脚本中，运行，出错， root@zhangzhuo-desktop:/home/zhangzhuo# ns PID.tcl can't read "edq": no such variable while executing "$edq set adaptive_ 1 （使adaptive_的值为1即启动ARED算法）" (file "PID.tcl" line 38) root@zhangzhuo-desktop:/home/zhangzhuo# ns PID.tcl can't read "redq": no such variable while executing "$redq set adaptive_ 1 （使adaptive_的值为1即启动ARED算法）" (file "PID.tcl" line 38) 请问red怎么修改才可以启用ared？多谢。。。