这是源代码

a1:=(VOL/CLOSE)/3;
a2:=SUM((IF(((a1>40) AND (CLOSE>(REF(CLOSE,1)))),a1,0)),0);
a3:=SUM((IF(((a1>40) AND (CLOSE<(REF(CLOSE,1)))),a1,0)),0);
a4:=SUM((IF(((a1<40) AND (CLOSE>(REF(CLOSE,1)))),a1,0)),0);
a5:=SUM((IF(((a1<40) AND (CLOSE<(REF(CLOSE,1)))),a1,0)),0);
a6:=((a2+a3)+a4)+a5;
a7:=IF((BARSTATUS=2),((100*a2)/a6),0);
a8:=((IF((BARSTATUS=2),((100*a3)/a6),0)));
a9:=((IF((BARSTATUS=2),((100*a4)/a6),0)));
a10:=((IF((BARSTATUS=2),((100*a5)/a6),0)));
机构买盘:(a2),linethick3,ColorFF55FF;
机构卖盘:(a3),linethick3,ColorFFFF55;
散户买盘:(a4),Color5555FF;
散户卖盘:(a5),Color55FF55;
DRAWTEXTREL(1003,870,'机构买盘'),linethick2,ColorFF55FF;
DRAWTEXTREL(1003,570,'机构卖盘'),linethick2,ColorFFFF55;
DRAWTEXTREL(1003,320,'散户买盘'),linethick2,Color5555FF;
DRAWTEXTREL(1003,50,'散户卖盘'),linethick2,Color55FF55;
if ((BARSTATUS=2) ) Then DRAWTEXTREL(1020,750,''+FLOOR(a7)+'%'),linethick2,ColorFF55FF;
if ((BARSTATUS=2) ) Then DRAWTEXTREL(1020,460,''+FLOOR(a8)+'%'),linethick2,ColorFFFF55;
if ((BARSTATUS=2) ) Then DRAWTEXTREL(1020,200,''+FLOOR(a9)+'%'),linethick2,Color5555FF;
if ((BARSTATUS=2) ) Then DRAWTEXTREL(1020,-50,''+FLOOR(a10)+'%'),linethick2,Color55FF55;

在此基础上如果可以加即时量比大于1.5就更好了
我在此先谢过老师了·

[ 本帖最后由 文化匪 于 2012-6-4 10:41 编辑 ]

如果互助答疑不能解决需求，可以到《威客任务》发布有偿悬赏。

相关标签： 股票论坛, 股票, 选股公式, 炒股公式, 股票公式

版权声明：该帖版权归原文作者所有，仅代表该作者观点，如有侵权，请点击此处查看处理方式。