通达信MACD买卖副图公式源码
明 :红箭头买入;白箭头持股;绿箭头卖出。
注:请将参数:
SHDRT 2 200 12 改为:
SHORT 2 200 12 (即D改为:O)
全部参数:
SHORT 2 200 12
LONG 2 200 26
MID 2 200 9
N1 2 100 6
LL1 2 100 20
LH1 2 100 80
(抱歉,后面漏掉参数: LL1 2 100 20
LH1 2 100 80 )
{MACD买卖}
M21:=MA(C,21);
M55:=MA(C,55);
A0:=M21>REF(M21,1) AND M55>REF(M55,1);
A1:=COUNT(V>REF(V,1),2)>=2;
A3:="KDJ.K">"KDJ.D";
A4:="MACD.DIF">0;
A5:="CCI.CCI">100;
A6:=C>"BOLL.BOLL";
S2:=DYNAINFO(4)>0;
A0 AND A1 AND A3 AND A4 AND A5 AND A6 AND S2;
SHORT:=12;
LONG:=26;
MID:=9;
DIF:EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
DEA:EMA(DIF,MID);
MACD:(DIF-DEA)*2,COLORSTICK;
IF(DIF<REF(DIF,1),DIF,DRAWNULL),COLORGREEN,LINETHICK2;
IF(DIF>=REF(DIF,1),DIF,DRAWNULL),COLORRED,LINETHICK2;
B1:=REF(C,A1+1)>C AND REF(DIF,A1+1)<DIF AND CROSS(DIF,DEA);
DRAWICON(B1>0,DIF*1.21,1);
C1:=BARSLAST(REF(CROSS(DEA,DIF),1));
D1:=REF(C,C1+1)<C AND REF(DIF,C1+1)>DIF AND CROSS(DEA,DIF);
DRAWICON(D1>0,DEA*1.21,2);
N1:=6;
LL1:=20;
LH1:=80;
WQ:="RSI.RSI1";
ENTERLONG:CROSS(WQ,LL1),COLORRED;
EXITLONG:CROSS(LH1,WQ),COLORGREEN;
DIFF:EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
ZERO:0;
GJ:=MAX(C,O);
STICKLINE(MACD>0 AND MACD>=REF(MACD,1),0,MACD,2,0),COLOR0000FF;
STICKLINE(MACD>0 AND MACD<REF(MACD,1),0,MACD,2,0),COLORFFFF00;
STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,2,0),COLORFF00FF;
STICKLINE(MACD<0 AND MACD<REF(MACD,1),0,MACD,2,0),COLOR00FF00;
L4:=LLV(GJ,4);
JL:=(HHV(DIFF,55)-LLV(DIFF,55))/5;
GT:=DEA>REF(DEA,1) AND REF(DEA,1)<REF(DEA,2);
A1Y:=BARSLAST(REF(GT,1));
底背离:=REF(L4,A1Y+1)>CLOSE AND DIFF>REF(DIFF,A1Y+1) AND GT;
DRAWLINE(A1Y=0,DEA,底背离,REF(DEA,A1Y),0),COLORRED,LINETHICK2;
DRAWLINE(底背离,DEA,底背离,REF(DEA,A1Y),0),COLORRED,LINETHICK2;
DRAWTEXT(底背离,REF(DEA,A1Y)*1.18,' 底背离'),COLORFF00FF;
H4:=HHV(GJ,4);
GT2:=DEA<REF(DEA,1) AND REF(DEA,1)>REF(DEA,2);
A2:=BARSLAST(REF(GT2,1));
顶背离:=REF(H4,A2+1)<H4 AND DIFF<REF(DIFF,A2+1) AND GT2;
DRAWLINE(A2=0,DEA,顶背离,REF(DEA,A2),0),COLORGREEN,LINETHICK2;
DRAWLINE(顶背离,DEA,顶背离,REF(DEA,A2),0),COLORGREEN,LINETHICK2;
DRAWTEXT(顶背离,REF(DEA,A2)*1.18,' 顶背离'),COLORGREEN;

未来函数检测结果如下:
该公式包含未来函数:DYNAINFO
定制指标公式、软件请联系QQ或微信同号:88652583
M21赋值:收盘价的21日简单移动平均
M55赋值:收盘价的55日简单移动平均
A0赋值:M21>1日前的M21 AND M55>1日前的M55
A1赋值:统计2日中满足成交量(手)>1日前的成交量(手)的天数>=2
A3赋值:"KDJ的K">"KDJ的D"
A4赋值:"平滑异同平均线的DIF">0
A5赋值:"CCI的CCI">100
A6赋值:收盘价>"BOLL的BOLL"
S2赋值:开盘价>0
A0 AND A1 AND A3 AND A4 AND A5 AND A6 AND S2
SHORT赋值:12
LONG赋值:26
MID赋值:9
输出DIF:收盘价的SHORT日指数移动平均-收盘价的LONG日指数移动平均
输出DEA:DIF的MID日指数移动平均
输出平滑异同平均线:(DIF-DEA)*2,COLORSTICK
如果DIF<1日前的DIF,返回DIF,否则返回无效数,画绿色,线宽为2
如果DIF>=1日前的DIF,返回DIF,否则返回无效数,画红色,线宽为2
B1赋值:A1+1日前的收盘价>收盘价 AND A1+1日前的DIF当满足条件B1>0时,在DIF*1.21位置画1号图标
C1赋值:上次1日前的DEA上穿DIF距今天数
D1赋值:C1+1日前的收盘价<收盘价 AND C1+1日前的DIF>DIF AND DEA上穿DIF
当满足条件D1>0时,在DEA*1.21位置画2号图标
N1赋值:6
LL1赋值:20
LH1赋值:80
WQ赋值:"RSI的RSI1"
多头买入:WQ上穿LL1,画红色
多头卖出:LH1上穿WQ,画绿色
输出DIFF:收盘价的SHORT日指数移动平均-收盘价的LONG日指数移动平均
输出ZERO:0
GJ赋值:收盘价和开盘价的较大值
当满足条件MACD>0ANDMACD>=1日前的MACD时,在0和MACD位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR0000FF
当满足条件MACD>0ANDMACD<1日前的MACD时,在0和MACD位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORFFFF00
当满足条件MACD<0ANDMACD>=1日前的MACD时,在0和MACD位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORFF00FF
当满足条件MACD<0ANDMACD<1日前的MACD时,在0和MACD位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR00FF00
L4赋值:4日内GJ的最低值
JL赋值:(55日内DIFF的最高值-55日内DIFF的最低值)/5
GT赋值:DEA>1日前的DEA AND 1日前的DEA<2日前的DEA
A1Y赋值:上次1日前的GT距今天数
底背离赋值:A1Y+1日前的L4>收盘价 AND DIFF>A1Y+1日前的DIFF AND GT
当满足条件A1Y=0时,在DEA位置画直线起点,当满足条件底背离时,在A1Y日前的DEA位置画直线终点,0表示是否延长.,画红色,线宽为2
当满足条件底背离时,在DEA位置画直线起点,当满足条件底背离时,在A1Y日前的DEA位置画直线终点,0表示是否延长.,画红色,线宽为2
当满足条件底背离时,在A1Y日前的DEA*1.18位置书写文字,COLORFF00FF
H4赋值:4日内GJ的最高值
GT2赋值:DEA<1日前的DEA AND 1日前的DEA>2日前的DEA
A2赋值:上次1日前的GT2距今天数
顶背离赋值:A2+1日前的H4当满足条件A2=0时,在DEA位置画直线起点,当满足条件顶背离时,在A2日前的DEA位置画直线终点,0表示是否延长.,画绿色,线宽为2
当满足条件顶背离时,在DEA位置画直线起点,当满足条件顶背离时,在A2日前的DEA位置画直线终点,0表示是否延长.,画绿色,线宽为2
当满足条件顶背离时,在A2日前的DEA*1.18位置书写文字,画绿色