美化后的《机构动态》源码
-
相关简介：C/C++ www.zegu.cn 择股网提供 Code 复制内容到剪贴板 datelim:=1; a1:=(VOL/CLOSE)/3*datelim; a2:=SUM((IF(((a140)AND(CLOSE(REF(CLOSE,1)))),a1,0)),0)*datelim; a3:=SUM((IF(((a140)AND(CLOSE(REF(CLOSE,1)))),a1,0)),0)*datelim; a4:=SUM((IF(((a140)AND(CLOSE(REF(CL
-
文章来源：择股网作者：股海网发布时间：2010-10-18浏览次数：
C/C++ www.zegu.cn 择股网提供 Code复制内容到剪贴板
- datelim:=1;
- a1:=(VOL/CLOSE)/3*datelim;
- a2:=SUM((IF(((a1>40) AND (CLOSE>(REF(CLOSE,1)))),a1,0)),0)*datelim;
- a3:=SUM((IF(((a1>40) AND (CLOSE<(REF(CLOSE,1)))),a1,0)),0)*datelim;
- a4:=SUM((IF(((a1<40) AND (CLOSE>(REF(CLOSE,1)))),a1,0)),0)*datelim;
- a5:=SUM((IF(((a1<40) AND (CLOSE<(REF(CLOSE,1)))),a1,0)),0)*datelim;
- 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,linethick2,COLORMAGENTA,precis0;
- 机构卖盘:a3,linethick2,ColorGREEN,precis0;
- 散户买盘:a4,dotline,linethick1,COLORcyan,precis0;
- 散户卖盘:a5,dotline,linethick1,COLORblue,precis0;
- DRAWTEXTREL(1003,50,'机构买盘'),linethick2,COLORMAGENTA;
- DRAWTEXTREL(1003,320,'机构卖盘'),linethick2,ColorGREEN;
- DRAWTEXTREL(1003,570,'散户买盘'),linethick2,COLORcyan;
- DRAWTEXTREL(1003,870,'散户卖盘'),linethick2,COLORblue;
- 0,dotline,linethick1,layer0;
- con1:=机构买盘>0 and ref(机构买盘,1)=0 and 机构买盘-机构卖盘>50;
- con2:=机构卖盘>0 and ref(机构卖盘,1)=0 and 机构买盘-机构卖盘<50;
- if ((BARSTATUS=2) ) Then DRAWTEXTREL(1020,-50,''+FLOOR(a7)+'%'),linethick1,COLORMAGENTA;
- if ((BARSTATUS=2) ) Then DRAWTEXTREL(1020,200,''+FLOOR(a8)+'%'),linethick1,ColorGREEN;
- if ((BARSTATUS=2) ) Then DRAWTEXTREL(1020,460,''+FLOOR(a9)+'%'),linethick1,coloryellow;
上一篇：彩色分时成交量源码
下一篇：大智慧 童牧野鬼变脸 长中短线皆宜
☟问题反馈 ☞┄┄┄┄┄┄┄┄┄┄→收藏资源:
现在就去充值积分
加入VIP可下载100以下的所有资源
栏目导航