加载中…[转载][转载]谐波交易者sdccn [通达信MACD选股交易系统]
(2020-01-02 11:31:43)
标签：
转载 |
分类： MACD源码 |
1、MACD双回试选出4连板牛股[V2.1,附源码,通达信]![[转载][转载]谐波交易者sdccn <wbr>[通达信MACD选股交易系统]](//simg.sinajs.cn/blog7style/images/common/sg_trans.gif "此博文包含图片")
(2011-04-19 19:52:00)
6、自用MACD公式[附源码,通达信]
(2011-04-19 19:52:00)
说明：近日符合MACD双回试选股的股票越来越多，V2.1版增加了量价关系限制条件。
{MACD双回试选股-通达信V2.1
SDCCN}
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD:=(DIF-DEA)*2;
A1:=BARSLAST(REF(CROSS(DIF,DEA),1));
DIF多头发散:=DIF/REF(DIF,1)>1.03 AND
DIF>0;
N:=4;
DIF1:=EMA(CLOSE,12*N)-EMA(CLOSE,26*N);
DIF1多头发散:=DIF1/REF(DIF1,1)>1.03 AND
DIF1>0;
量价关系:=C>REF(C,1) AND
VOL/REF(VOL,1)>2;
XUANGU:A1>=5 AND A1<=13 AND
CROSS(DIF,DEA) AND DIF多头发散 AND DIF1多头发散 AND 量价关系;
2、MACD双回试选股[V2.0,附源码,通达信] (2011-04-07
08:07:06)
5、MACD底背共振选股后的二次遴选
(2011-04-07
08:07:06)
30日选出的维科精华，今天又是1个涨停板了！
MACD双回试选股[V2.0]增加了大周期共振选股条件。
{MACD双回试选股V2.0-通达信
SDCCN}
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD:=(DIF-DEA)*2;
N:=4;
DIF1:=EMA(CLOSE,12*N)-EMA(CLOSE,26*N);
A1:=BARSLAST(REF(CROSS(DIF,DEA),1));
DIF多头发散:=DIF/REF(DIF,1)>1.03 AND
DIF>0;
DIF1多头发散:=DIF1/REF(DIF1,1)>1.03 AND
DIF1>0;
XUANGU:A1>5 AND A1<=13 AND
CROSS(DIF,DEA) AND DIF多头发散 AND DIF1多头发散
3、MACD底背共振选股[附源码,通达信]
(
{MACD底背共振选股-通达信 SDCCN}
{选股思路：小周期MACD底背，大周期MACD放大}
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD:=2*(DIF-DEA);
N:=4;
DIF1:=EMA(CLOSE,12*N)-EMA(CLOSE,26*N);
DEA1:=EMA(DIF1,9*N);
MACD1:=2*(DIF1-DEA1);
{小周期MACD底背}
A1:=BARSLAST(REF(CROSS(DIF,DEA),1));
MACD底背:=L<REF(L,A1+1) AND DEA>REF(DEA,A1+1) AND CROSS(DIF,DEA) AND A1>=5 AND DEA<0;
{大周期MACD放大}
MACD放大:=MACD1>REF(MACD1,1);
XUANGU:MACD底背 && MACD放大;
{MACD底背共振选股-通达信 SDCCN}
{选股思路：小周期MACD底背，大周期MACD放大}
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD:=2*(DIF-DEA);
N:=4;
DIF1:=EMA(CLOSE,12*N)-EMA(CLOSE,26*N);
DEA1:=EMA(DIF1,9*N);
MACD1:=2*(DIF1-DEA1);
{小周期MACD底背}
A1:=BARSLAST(REF(CROSS(DIF,DEA),1));
MACD底背:=L<REF(L,A1+1) AND DEA>REF(DEA,A1+1) AND CROSS(DIF,DEA) AND A1>=5 AND DEA<0;
{大周期MACD放大}
MACD放大:=MACD1>REF(MACD1,1);
XUANGU:MACD底背 && MACD放大;
4、{MACD双回试选股_通达信 SDCCN}
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD:=(DIF-DEA)*2;
A1:=BARSLAST(REF(CROSS(DIF,DEA),1));
A2:=BARSLAST(CROSS(DIF,DEA));
XUANGU:A1>=5 AND A1<=13 AND
A2<=3 AND DEA>0;
5、MACD底背共振选股后的二次遴选
MACD底背共振选股后，再使用其他常用指标如RSI、KDJ、TOW进行二次遴选，若有多个指标同时发出买入信号，则该股的成功概率就大。
下面实例是使用宝塔线三平底翻红进行二次遴选，选出泰亚股份002517、恒生电子600570，拭目以待！
（纯技术形态选股，不考虑基本面。）
6、自用MACD公式[附源码,通达信]
自用MACD公式，添加了黄白线背离信号和红绿柱缩放信号。
（1）{MACD_通达信_附图 SDCCN}
DIF:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:EMA(DIF,9);
MACD:=(DIF-DEA)*2,COLORSTICK;
STICKLINE(MACD>=0 AND
MACD>=REF(MACD,1),0,MACD,0,0),COLORRED;
STICKLINE(MACD>=0 AND MACD<
REF(MACD,1),0,MACD,0,0),COLORCYAN;
STICKLINE(MACD<0
STICKLINE(MACD<0
STICKLINE(DIF<0,0,0,4,0),COLORGREEN; {空头}
STICKLINE(DIF>0,0,0,4,0),COLORRED; {多头}
DRAWTEXT(CROSS(DEA,DIF) AND
DIF<0,0,'*'),COLORWHITE; {死叉}
DRAWTEXT(CROSS(DIF,DEA) AND
DIF>0,0,'*'),COLORYELLOW; {金叉}
{MACD顶底背离_TDX}
{股价创新低,而DEA值没有创新低,为底背离,应买入}
A1:=BARSLAST(REF(CROSS(DIF,DEA),1)); {前1个金叉距当前的周期数}
底背离:=L<REF(L,A1+1) AND
DEA>REF(DEA,A1+1) AND CROSS(DIF,DEA) AND
A1>4 AND
DEA<=0,COLORRED,NODRAW;
DRAWICON(底背离,DEA*1.2,1);
{股价创新高,而DEA值没有创新高,为顶背离,应卖出}
A2:=BARSLAST(REF(CROSS(DEA,DIF),1)); {前1个死叉距当前的周期数}
顶背离:=H>REF(H,A2+1) AND
DEA<REF(DEA,A2+1) AND CROSS(DEA,DIF) AND
A2>4 AND
DEA>0,COLORGREEN,NODRAW;
DRAWICON(顶背离,DEA*1.2,2);
（2）{MACD扩展_通达信_附图 SDCCN}
{参数 N 1/10/4}
DIF:EMA(CLOSE,12*N)-EMA(CLOSE,26*N);
DEA:EMA(DIF,9*N);
MACD:(DIF-DEA)*2,COLORSTICK;
STICKLINE(MACD>=0 AND
MACD>=REF(MACD,1),0,MACD,0,0),COLORRED;
STICKLINE(MACD>=0 AND MACD<
REF(MACD,1),0,MACD,0,0),COLORCYAN;
STICKLINE(MACD<0
STICKLINE(MACD<0
STICKLINE(DIF<0,0,0,4,0),COLORGREEN; {空头}
STICKLINE(DIF>0,0,0,4,0),COLORRED; {多头}
DRAWTEXT(CROSS(DEA,DIF) AND
DIF<0,0,'*'),COLORWHITE; {死叉}
DRAWTEXT(CROSS(DIF,DEA) AND
DIF>0,0,'*'),COLORYELLOW; {金叉}
{MACD顶底背离_TDX}
{股价创新低,而DEA值没有创新低,为底背离,应买入}
A1:=BARSLAST(REF(CROSS(DIF,DEA),1)); {前1个金叉距当前的周期数}
底背离:=L<REF(L,A1+1) AND
DEA>REF(DEA,A1+1) AND CROSS(DIF,DEA) AND
A1>4 AND
DEA<=0,COLORRED,NODRAW;
DRAWICON(底背离,DEA*1.2,1);
{股价创新高,而DEA值没有创新高,为顶背离,应卖出}
A2:=BARSLAST(REF(CROSS(DEA,DIF),1)); {前1个死叉距当前的周期数}
顶背离:=H>REF(H,A2+1) AND
DEA<REF(DEA,A2+1) AND CROSS(DEA,DIF) AND
A2>4 AND
DEA>0,COLORGREEN,NODRAW;
DRAWICON(顶背离,DEA*1.2,2);
喜欢
0
赠金笔