搜索
由繁至简的炒股秘籍股票配资送值得信赖我出资你炒股赚大钱自己操盘配资财源滚滚
查看: 3925|回复: 2

[技术求助] 求均线分笔动能公式的选股公式

[复制链接]

签到天数: 3 天

缠学根据大盘学缠论

发表于 2017-4-21 00:04 | 显示全部楼层

求均线分笔动能公式的选股公式

来自:MACD论坛(bbs.macd.cn) 作者:为了为了 浏览:3925 回复:2

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
求老师高物写个选股公式,条件满足把当下绿色细线股选出来,并满足1.前一绿线为粗线2.低点较前一绿色线低点低,在此跪谢先.均线分笔动能公式源码如下
MD6:MA(C,3);MD5:MA(C,8);MD4:MA(C,21);MD3:MA(C,55);MD2:MA(C,144);MD1:MA(C,377);L1:=IF(MD2>=MD1,1,0);L2:=IF(MD3>MD2 OR (MD3=MD2 AND L1=0),1,0);L3:=IF(MD4>MD3 OR (MD4=MD3 AND L2=0),1,0);L4:=IF(MD5>MD4 OR (MD5=MD4 AND L3=0),1,0);L5:=IF(MD6>MD5 OR (MD6=MD5 AND L4=0),1,0);L6:=IF(C>MD6 OR (C=MD6 AND L5=0),1,0);LL1:=L1+L2*2+L3*4;LL2:=L4+L5*2+L6*4;GG:=IF(LL2=7 OR LL2=3,H,0.5*L);GD:=IF(LL2=0 OR LL2=4,L,1.5*H);均线顶0:=LL2=7 OR (LL2=3 AND (REF(LL2,1)=7 OR REF(LL2,1)=3) AND (H>REF(H,1) )) ;均线底0:=LL2=0 OR (LL2=4 AND (REF(LL2,1)=0 OR REF(LL2,1)=4) AND (L<REF(L,1))) ;GG2:=IF(均线顶0,H,0.9*H);GD2:=IF(均线底0,L,1.1*L);均线顶A:=FILTERX(均线顶0 AND GG2=HHV(GG2,BARSLAST(均线底0)),BARSLAST(均线底0));均线底A:=FILTERX(均线底0 AND GD2=LLV(GD2,BARSLAST(均线顶0)),BARSLAST(均线顶0));均线顶:=FILTERX(均线顶A AND GG2=HHV(GG2,BARSLAST(均线底A)),BARSLAST(均线底A));均线底:=FILTERX(均线底A AND GD2=LLV(GD2,BARSLAST(均线顶A)),BARSLAST(均线顶A));顶高:=REF(H,BARSLAST(均线顶));底底:=REF(L,BARSLAST(均线底));{修正顶A:=均线顶 OR ((LL2=1 OR LL2=3 OR LL2=5) AND BARSLAST(均线顶)<BARSLAST(均线底) AND H=HHV(H,BARSLAST(均线顶)+1));修正底A:= 均线底 OR ((LL2=2 OR LL2=4 OR LL2=6) AND BARSLAST(均线底)<BARSLAST(均线顶) AND L=LLV(L,BARSLAST(均线底)+1));GG3:=IF(修正顶A,H,0.9*H);GD3:=IF(修正底A,L,1.1*L);修正顶:=FILTERX(修正顶A AND GG3=HHV(GG3,BARSLAST(修正底A)),BARSLAST(修正底A));修正底:=FILTERX(修正底A AND GD2=LLV(GD3,BARSLAST(修正顶A)),BARSLAST(修正顶A));}修正顶:=均线顶;修正底:=均线底;X1:=IF(修正底,BARSLAST(修正顶),IF(修正顶,BARSLAST(修正底),0));EREA:=IF(修正底,SQRT(X1)*(REF(H,X1)-L),IF(修正顶,(H-REF(L,X1))*SQRT(X1),0));Y1:=REF(X1,X1)+X1;EREA2:=REF(EREA,Y1);V1:=IF(修正底 OR 修正顶, SUM(V,X1)/10000,0);DRAWNUMBER(修正底 ,L*0.97,V1),COLORYELLOW;DRAWNUMBER(修正底 ,L*0.98,EREA),COLORRED;DRAWTEXT(修正底 ,L*0.99,CON2STR(L,2)),COLORGREEN;DRAWNUMBER( 修正顶,H*1.03,V1),COLORYELLOW;DRAWNUMBER( 修正顶,H*1.02,EREA),COLORRED;DRAWTEXT( 修正顶,H*1.01,CON2STR(H,2)),COLORLIRED;DRAWLINE(修正底,LOW,修正顶 AND EREA > EREA2, HIGH,0),COLORMAGENTA,LINETHICK3;DRAWLINE(修正底,LOW,修正顶 AND EREA <= EREA2 , HIGH,0),COLORMAGENTA,LINETHICK1;DRAWLINE(修正顶,HIGH,修正底 AND EREA > EREA2 , LOW,0),COLORGREEN,LINETHICK3;DRAWLINE(修正顶,HIGH,修正底 AND EREA <= EREA2 , LOW,0),COLORGREEN,LINETHICK1;{DRAWICON(均线顶,H,5);DRAWICON(均线底,L,6);};



金币:
奖励:
热心:
注册时间:
2007-2-7

回复 使用道具 举报

签到天数: 3 天

缠学根据大盘学缠论

 楼主| 发表于 2017-4-21 16:32 | 显示全部楼层
出现绿色细线时的选股指标我已经弄出来了,怎么样满足后面 两个条件?
选股指标如下
MD6:=MA(C,3);
MD5:=MA(C,8);
MD4:=MA(C,21);
MD3:=MA(C,55);
MD2:=MA(C,144);
MD1:=MA(C,377);
L1:=IF(MD2>=MD1,1,0);
L2:=IF(MD3>MD2 OR (MD3=MD2 AND L1=0),1,0);
L3:=IF(MD4>MD3 OR (MD4=MD3 AND L2=0),1,0);
L4:=IF(MD5>MD4 OR (MD5=MD4 AND L3=0),1,0);
L5:=IF(MD6>MD5 OR (MD6=MD5 AND L4=0),1,0);
L6:=IF(C>MD6 OR (C=MD6 AND L5=0),1,0);
LL1:=L1+L2*2+L3*4;
LL2:=L4+L5*2+L6*4;
GG:=IF(LL2=7 OR LL2=3,H,0.5*L);
GD:=IF(LL2=0 OR LL2=4,L,1.5*H);
均线顶0:=LL2=7 OR (LL2=3 AND (REF(LL2,1)=7 OR REF(LL2,1)=3) AND (H>REF(H,1) )) ;
均线底0:=LL2=0 OR (LL2=4 AND (REF(LL2,1)=0 OR REF(LL2,1)=4) AND (L<REF(L,1))) ;
GG2:=IF(均线顶0,H,0.9*H);
GD2:=IF(均线底0,L,1.1*L);
均线顶A:=FILTERX(均线顶0 AND GG2=HHV(GG2,BARSLAST(均线底0)),BARSLAST(均线底0));
均线底A:=FILTERX(均线底0 AND GD2=LLV(GD2,BARSLAST(均线顶0)),BARSLAST(均线顶0));
均线顶:=FILTERX(均线顶A AND GG2=HHV(GG2,BARSLAST(均线底A)),BARSLAST(均线底A));
均线底:=FILTERX(均线底A AND GD2=LLV(GD2,BARSLAST(均线顶A)),BARSLAST(均线顶A));
顶高:=REF(H,BARSLAST(均线顶));
底底:=REF(L,BARSLAST(均线底));
{
修正顶A:=均线顶 OR ((LL2=1 OR LL2=3 OR LL2=5) AND BARSLAST(均线顶)<BARSLAST(均线底) AND H=HHV(H,BARSLAST(均线顶)+1));
修正底A:= 均线底 OR ((LL2=2 OR LL2=4 OR LL2=6) AND BARSLAST(均线底)<BARSLAST(均线顶) AND L=LLV(L,BARSLAST(均线底)+1));
GG3:=IF(修正顶A,H,0.9*H);
GD3:=IF(修正底A,L,1.1*L);
修正顶:=FILTERX(修正顶A AND GG3=HHV(GG3,BARSLAST(修正底A)),BARSLAST(修正底A));
修正底:=FILTERX(修正底A AND GD2=LLV(GD3,BARSLAST(修正顶A)),BARSLAST(修正顶A));}
修正顶:=均线顶;
修正底:=均线底;
X1:=IF(修正底,BARSLAST(修正顶),IF(修正顶,BARSLAST(修正底),0));
EREA:=IF(修正底,SQRT(X1)*(REF(H,X1)-L),IF(修正顶,(H-REF(L,X1))*SQRT(X1),0));
Y1:=REF(X1,X1)+X1;
EREA2:=REF(EREA,Y1);
XG:修正顶,HIGH,修正底 AND EREA <= EREA2;
金币:
奖励:
热心:
注册时间:
2007-2-7

回复 使用道具 举报

发表于 2017-4-23 13:55 | 显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽
金币:
奖励:
热心:
注册时间:
2016-10-14

回复 使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

本站声明:1、本站所有广告均与MACD无关;2、MACD仅提供交流平台,网友发布信息非MACD观点与意思表达,因网友发布的信息造成任何后果,均与MACD无关。
MACD俱乐部(1997-2019)官方域名:macd.cn   MACD网校(2006-2019)官方域名:macdwx.com
值班热线[9:00—17:30]:18292674919   24小时网站应急电话:18292674919
找回密码、投诉QQ:89918815 友情链接QQ:95008905 广告商务联系QQ:17017506 电话:18292674919
增值电信业务经营许可证: 陕ICP19026207号—2  陕ICP备20004035号

举报|意见反馈|Archiver|手机版|小黑屋|MACD俱乐部 ( 陕ICP备20004035号 )

GMT+8, 2024-3-29 15:45 , Processed in 0.077128 second(s), 10 queries , Redis On.

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

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