股票论坛

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

请老师帮忙把公式做成选股器,谢谢!

[复制链接]

知府

Rank: 3Rank: 3

听众
1
跳转到指定楼层
楼主
发表于 2016-9-11 10:46 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
10爱心果
请老师帮忙把公式做成选股器,要求同时出现“智取妖底、稳健关注、急进买入”选股,谢谢!

A1:=((MA(C,60)-L)/MA(C,20))*200;
B1:=((MA(C,60)-L)/MA(C,60))*200;
C1:=((MA(C,30)-L)/MA(C,60))*200;
M1:=REF(CLOSE,1);
M2:=SMA(MAX(CLOSE-M1,0),7,1)/SMA(ABS(CLOSE-M1),7,1)*100;
G1:=FILTER(REF(M2,1)<20 AND M2>REF(M2,1),5);
TU:=C/MA(C,40)<0.74;
PER1:=5;
MMA:=EMA(C,PER1);
SMMA:=EMA(MMA,PER1);
IMPETMMA:=MMA - REF(MMA,1);
IMPETSMMA:=SMMA - REF(SMMA,1);
DIVMA:= ABS(MMA - SMMA);
TDJ:=(H-L)/REF(C,1)>0.05;
AVERIMPET:= (IMPETMMA+IMPETSMMA)/2;
TDF:= POW(DIVMA,1)*POW(AVERIMPET,3);
NTDF:=TDF/HHV(ABS(TDF),PER1*3);
YUL:=COUNT(TDJ,5)>1;
启动:=TU AND TDJ AND YUL;
确定:=CROSS(NTDF,-0.9);
波段:=FILTER((G1 AND C1>20 OR C>REF(C,1)) AND REF(启动,1),10);
选股:=FILTER(REF(启动,1) AND (确定 OR C>REF(C,1)) AND "MACD.MACD">-1.5,10);
妖底:COUNT(选股,13)>=1 AND 波段,LINETHICK2,COLORGRAY;


STICKLINE(妖底>0.1,0,0.19,4.8,0),COLORWHITE;
STICKLINE(妖底>0.1,0,0.19,4.8,0),COLORYELLOW;
STICKLINE(妖底>0.1,0,0.16,5,1),COLORYELLOW;
STICKLINE(妖底>0.1,0.16,0.6,4,1),COLORBLUE;
STICKLINE(妖底>0.1,0,0.1,7,0),COLORBROWN;
STICKLINE(妖底>0.1,0,0.05,8,0),COLORRED;
STICKLINE(妖底>0.1,0.6,0.985,0.1,0);
STICKLINE(妖底>0.1,0.985,0.989,0,0);
DRAWTEXT(妖底>0.1,0.5,'智取妖底'),COLORYELLOW;
DRAWICON(妖底>0.1,0.56,34),COLORRED;
DRAWICON(妖底>0.1,0.41,31),COLORRED;
DRAWTEXT(妖底>0.1,0.346,'稳健关注'),COLORRED;
DRAWTEXT(妖底>0.1,0.216,'急进买入'),COLORRED;
DRAWICON(妖底>0.1,0.267,38),COLORRED;

最佳答案

查看完整内容

{妖底预警} A1:=((MA(C,60)-L)/MA(C,20))*200; B1:=((MA(C,60)-L)/MA(C,60))*200; C1:=((MA(C,30)-L)/MA(C,60))*200; M1:=REF(CLOSE,1); M2:=SMA(MAX(CLOSE-M1,0),7,1)/SMA(ABS(CLOSE-M1),7,1)*100; G1:=FILTER(REF(M2,1)REF(M2,1),5); TU:=C/MA(C,40)0.05; AVERIMPET:= (IMPETMMA+IMPETSMMA)/2; TDF:= POW(DIVMA,1)*POW(AVERIMPET,3); NTDF:=TDF/HHV(ABS(TDF),PER1*3); YUL:=COUNT(TDJ,5)>1; 启动:=TU AND TDJ AND ...

爵★★★

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

听众
2

爵★★★爵★★★爵★★★

沙发
发表于 2016-9-11 10:46 | 只看该作者
{妖底预警}

A1:=((MA(C,60)-L)/MA(C,20))*200;
B1:=((MA(C,60)-L)/MA(C,60))*200;
C1:=((MA(C,30)-L)/MA(C,60))*200;
M1:=REF(CLOSE,1);
M2:=SMA(MAX(CLOSE-M1,0),7,1)/SMA(ABS(CLOSE-M1),7,1)*100;
G1:=FILTER(REF(M2,1)<20 AND M2>REF(M2,1),5);
TU:=C/MA(C,40)<0.74;
PER1:=5;
MMA:=EMA(C,PER1);
SMMA:=EMA(MMA,PER1);
IMPETMMA:=MMA - REF(MMA,1);
IMPETSMMA:=SMMA - REF(SMMA,1);
DIVMA:= ABS(MMA - SMMA);
TDJ:=(H-L)/REF(C,1)>0.05;
AVERIMPET:= (IMPETMMA+IMPETSMMA)/2;
TDF:= POW(DIVMA,1)*POW(AVERIMPET,3);
NTDF:=TDF/HHV(ABS(TDF),PER1*3);
YUL:=COUNT(TDJ,5)>1;
启动:=TU AND TDJ AND YUL;
确定:=CROSS(NTDF,-0.9);
波段:=FILTER((G1 AND C1>20 OR C>REF(C,1)) AND REF(启动,1),10);
选股:=FILTER(REF(启动,1) AND (确定 OR C>REF(C,1)) AND "MACD.MACD">-1.5,10);
妖底:COUNT(选股,13)>=1 AND 波段;

回复

使用道具 举报

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

本版积分规则

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

GMT+8, 2024-11-28 01:11 , Processed in 0.132372 second(s), 21 queries .

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

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