股票论坛

 找回密码
 免费注册
搜索
热搜: 活动 交友 discuz
查看: 3011|回复: 2
打印 上一主题 下一主题

请高手做一个分时预警,谢谢!

[复制链接]

知府

Rank: 3Rank: 3

听众
1
跳转到指定楼层
楼主
发表于 2016-11-22 21:45 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
10爱心果
请高手做一个分时预警,当“机构买”显示大于50%进行预警选股,谢谢!
成交额:=V*C/100,NODRAW;{万元}
A2:=SUM((IF(((成交额/8>20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);
A3:=SUM((IF(((成交额/8>20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);
A4:=SUM((IF(((成交额/8<20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);
A5:=SUM((IF(((成交额/8<20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);
A6:=((A2+A3)+A4)+A5;
A7:=IF((ISLASTBAR),((100*A2)/A6),0);
A8:=IF((ISLASTBAR),((100*A3)/A6),0);
A9:=IF((ISLASTBAR),((100*A4)/A6),0);
A10:=IF((ISLASTBAR),((100*A5)/A6),0);
机构买:(A2),LINETHICK6,COLORRED;
机构卖:(A3),LINETHICK6,COLORFFFF55;
机构进出:=机构买-机构卖,NODRAW;
散户买:(A4),COLOR5555FF;{细红线}
散户卖:(A5),COLOR55FF55;{细绿线}
强势:=((100*A2)/A6>50);
STICKLINE(强势,机构买*1.02,机构买*1.1,1,0),COLORYELLOW;
拉升:=((100*A2)/A6-(100*A3)/A6)>18 AND (100*A2)/A6-(100*A5)/A6>18;
STICKLINE(拉升,机构买*1.1,机构买*1.2,1,0),COLORFF00FF;
DRAWTEXT(ISLASTBAR=1,机构买*0.95,'●机构买'),LINETHICK2,COLORRED;
DRAWTEXT(ISLASTBAR=1,机构卖*0.95,'○机构卖'),LINETHICK2,COLORFFFF55;
DRAWTEXT(机构进出>0 AND REF(机构进出,1)<=0,机构买*1.02,'●机买'),COLORRED;
DRAWTEXT(机构进出<0 AND REF(机构进出,1)>=0,机构买*0.98,'○机卖'),COLORFFFF55;

DD1:=1;
AAA1:=STRCAT(STRCAT('机构买',CON2STR((100*A2)/A6,0)),'%%');
AAA2:=STRCAT(STRCAT('机构卖',CON2STR((100*A3)/A6,0)),'%%');
AAA3:=STRCAT(STRCAT('散户买',CON2STR((100*A4)/A6,0)),'%%');
AAA4:=STRCAT(STRCAT('散户卖',CON2STR((100*A5)/A6,0)),'%%');
DRAWTEXT_FIX(DD1=1,0,0.02,0,AAA1),COLORRED;
DRAWTEXT_FIX(DD1=1,0,0.13,0,AAA2),COLORFFFF55;
DRAWTEXT_FIX(DD1=1,0,0.24,0,AAA3),COLOR5555FF;
DRAWTEXT_FIX(DD1=1,0,0.35,0,AAA4),COLOR55FF55;

最佳答案

查看完整内容

本来昨晚想做这个, 但是研究了下,这个指标本身意义不大,所以就没写。

爵府★★★●

Rank: 21Rank: 21Rank: 21Rank: 21Rank: 21Rank: 21

听众
3
沙发
发表于 2016-11-22 21:45 | 只看该作者
本来昨晚想做这个, 但是研究了下,这个指标本身意义不大,所以就没写。
回复

使用道具 举报

知府

Rank: 3Rank: 3

听众
1
板凳
 楼主| 发表于 2016-11-24 11:36 | 只看该作者
谢谢
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

QQ|站点首页|手机版|小黑屋|帮助中心|桂ICP备14001964号

GMT+8, 2024-11-28 00:59 , Processed in 0.156698 second(s), 21 queries .

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表