通达信MACDKDJ金叉选股指标公式

     相关简介:  通达信macdkdj金叉选股指标公式                              

　　授权方式：免费版

　　指标评级：★★★★★

　　指标分类：策略

　　画线方法：副图/主图

未来函数检测结果:

         暂未发现存在未来函数

通达信MACDKDJ金叉选股指标公式源码：

    SHORT:=5;
    LONG:=25;
    M:=10;
    0;
    DIFF:=(EMA(CLOSE,SHORT)/EMA(CLOSE,LONG)-1)*100;
    partline(diff,diff>ref(diff,1),rgb(255,0,0),diff<ref(diff,1),rgb(0,255,0)),linethick2;
    DEA:EMA(DIFF,M),coloryellow;
    MACD:3*(DIFF-DEA),COLORSTICK;
    macdx:macd;
    partline(macdx,macdx>ref(macdx,1),rgb(255,0,0),macdx<ref(macdx,1),rgb(0,255,0));
    Var1:=EMA(CLOSE,35)-EMA(CLOSE,17);
    Var2:=EMA(Var1,5);
    jgdx:TROUGHBARS(3,10,1)<1ANDCROSS(Var1,Var2),colorred;
    {zds:=hhvall(macdx);
    RSV:=((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*zds)-(zds/2);
    K:=SMA(RSV,3,1);
    D:=SMA(K,3,1);
    Jb:=3*K-2*D;
    zdjb:=hhvall(jb);
    j:jb*zds/zdjb;
    DRAWTEXTABS(40,5,'图中白色线为KDJ的J线'),Colorred;}
    {difa:=abs(diff);
    diff角度:=atan((difa/ref(difa,2)-1)*100)*180/3.1415926535;
    DRAWTEXTABS(40,10,'■diff角度:'+NUMTOSTRN(diff角度,2)+''),ColorFFFF00;}
    {drawtextabs(440,10,'！！注意：日K线的bbiday的颜色变化和MACD的背离信号！！'),colorred;}
    {diffday:"macd.diff#day";}
    jc:=cross(diff,dea);
    sc:=cross(dea,diff);
    djck:=(count(jc,barslast(diff>0)));
    ssjc:=(count(jc,barslast(diff<0)));
    usck:=(count(sc,barslast(diff<0)));
    jcd:=if(jc,dea,0);{金叉点}
    scd:=if(sc,dea,0);{死叉点}
    drawtext(jcanddiff<0,jcd,numtostr(djck)+'金叉'),colorred;
    drawtext(jcanddiff>0,jcd,numtostr(ssjc)+'金叉'),colorred;
    drawtext(scanddiff>0,scd,numtostr(usck)+'死叉'),colorgreen;
    A1:=BARSLAST(ref(cross(diff,dea)anddea<0,1));
    B1:=ref(c,A1+1)>candref(diff,A1+1)<diffandcross(diff,dea)anddea<0;
    DRAWTEXT(FILTER(B1>0,5),diff-0.01,'*MACD底背离'),COLOryellow;
    C1:=BARSLAST(ref(cross(dea,diff),1))anddea>0;
    D1:=ref(c,C1+1)<candref(diff,C1+1)>diffandcross(dea,diff)anddea>0;
    DRAWTEXT(FILTER(D1>0,5),diff+0.01,'*MACD顶背离'),COLORred;
    {gd:=if(diff<ref(diff,1)andref(diff,1)<ref(diff,2)andref(diff,2)>ref(diff,3)andref(diff,3)>ref(diff,4),ref(diff,2),0);
    gdk:=count(gd>0,barslast(diff<0));
    drawtext(gd>0anddiff>0,ref(diff,2),numtostr(gdk)+'拐点'),coloryellow;}
    {0007--MACD金死叉间最大、最小值}
    A1:=CROSS("MACD.MACD",0);
    A2:=BARSLAST(A1);
    A3:=HHVBARS("MACD.MACD",A2+1);
    A4:=BACKSET(REF(A3>=1,1)AND"MACD.MACD"<0,A3);
    A5:=BACKSET(REF(A4=0,1)ANDA4=1,2);
    高值:IF(FILTER(A5,2),"MACD.MACD",0);
    DRAWICON(高值>0,高值,4);
    B1:=CROSS(0,"MACD.MACD");
    B2:=BARSLAST(B1);
    B3:=LLVBARS("MACD.MACD",B2+1);
    B4:=BACKSET(REF(B3>=1,1)AND"MACD.MACD">0,B3);
    B5:=BACKSET(REF(B4=0,1)ANDB4=1,2);
    低值:IF(FILTER(B5,2),"MACD.MACD",0);
    DRAWICON(低值<0,低值,5);
    {A1:=BARSLAST(ref(cross(diff,dea),1));
    B1:=ref(c,A1+1)>candref(diff,A1+1)<diffandcross(diff,dea);
    DRAWTEXT(FILTER(B1>0,5),0,'MACD'),COLORGREEN,ALIGN0;;
    Stickline(FILTER(B1>0,5),-1,0,1,0),COLORGREEN;
    {A2:=BARSLAST(ref(cross("kdj.k","kdj.d"),1));
    B2:=ref(c,A2+1)>candref("kdj.k",A2+1)<"kdj.k"andcross("kdj.k","kdj.d");
    DRAWTEXT(FILTER(B2>0,5),0.5,'KDJ'),COLORYELLOW,ALIGN0;;
    Stickline(FILTER(B2>0,5),0.5,-1,1,0),COLORYELLOW;
    A3:=BARSLAST(ref(cross("RSI.RSI1","RSI.RSI2"),1));
    B3:=ref(c,A3+1)>candref("RSI.RSI1",A3+1)<"RSI.RSI1"andcross("RSI.RSI1","RSI.RSI2");
    DRAWTEXT(FILTER(B3>0,5),-0.25,'RSI'),COLORCYAN,ALIGN0;;
    Stickline(FILTER(B3>0,5),-1,-0.25,1,0),COLORCYAN;}
    {C1:=BARSLAST(ref(cross(dea,diff),1));
    D1:=ref(c,C1+1)<candref(diff,C1+1)>diffandcross(dea,diff);
    DRAWTEXT(FILTER(D1>0,5),-0.5,'MACD'),COLORwhite,ALIGN0;
    Stickline(FILTER(D1>0,5),-0.5,1,1,0),COLORwhite;
    {C2:=BARSLAST(ref(cross("kdj.d","kdj.k"),1));
    D2:=ref(c,C2+1)<candref("kdj.k",C2+1)>"kdj.k"andcross("kdj.d","kdj.k");
    DRAWTEXT(FILTER(D2>0,5),0,'KDJ'),COLORwhite,ALIGN0;
    Stickline(FILTER(D2>0,5),1,0,1,0),COLORwhite;
    C3:=BARSLAST(ref(cross("RSI.RSI2","RSI.RSI1"),1));
    D3:=ref(c,C3+1)<candref("RSI.RSI1",C3+1)>"RSI.RSI1"andcross("RSI.RSI2","RSI.RSI1");
    DRAWTEXT(FILTER(D3>0,5),0.25,'RSI'),COLORMAGENTA,ALIGN0;;
    Stickline(FILTER(D3>0,5),1,0.25,1,0),COLORMAGENTA;};
    DIF:EMA(CLOSE,12)-EMA(CLOSE,26),LINETHICK0;
    DEA:EMA(DIF,9),LINETHICK0;
    RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
    K:SMA(RSV,9,3),LINETHICK0;
    D:SMA(K,9,3),LINETHICK0;
    J:3*K-2*D,LINETHICK0;
    KM:=CROSS(DIF,DEA)ANDCROSS(K,D)ANDCROSS(J,D);
    STICKLINE(KM,0,100,3,0),COLORYELLOW;
    DRAWICON(KM,92,25);
    DRAWTEXT(KM,43,'★KM金叉共振'),COLORYELLOW;
    SHORT:=12;
    LONG:=26;
    MID:=9;
    DIF:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
    DEA:=EMA(DIF,MID);
    MACD:=(DIF-DEA)*2;
    N1:=6;
    N2:=12;
    N3:=24;
    LC:=REF(CLOSE,1);
    RSI1:=SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100;
    RSI2:=SMA(MAX(CLOSE-LC,0),N2,1)/SMA(ABS(CLOSE-LC),N2,1)*100;
    RSI3:=SMA(MAX(CLOSE-LC,0),N3,1)/SMA(ABS(CLOSE-LC),N3,1)*100;
    TJ1:=CROSS(DIF,DEA);
    MA5:=MA(C,5);
    TJ3:=CROSS(C,MA5);
    TJ4:=C/REF(C,1)>=1.02;
    TJ2:=CROSS(RSI1,RSI2);
    S1:=IF(NAMELIKE('S'),0,1);
    S2:=IF(NAMELIKE('*'),0,1);
    QQ:=DYNAINFO(4)>0;
    QT:=S1ANDS2ANDQQ;
    XG:TJ1ANDTJ2ANDTJ3ANDTJ4ANDQT;
    L1:=6;L2:=12;L3:=24;
    BIAS1:(CLOSE-MA(CLOSE,L1))/MA(CLOSE,L1)*100;
    BIAS2:(CLOSE-MA(CLOSE,L2))/MA(CLOSE,L2)*100;
    BIAS3:(CLOSE-MA(CLOSE,L3))/MA(CLOSE,L3)*100;
    DRAWTEXT(CROSS(BIAS1,BIAS2),BIAS2,'★金'),COLORYELLOW;
    DRAWTEXT(CROSS(BIAS2,BIAS1),BIAS1,'★死'),COLORBLUE;

通达信MACDKDJ金叉选股指标公式源码注释翻译结果

    SHORT赋值:5
    LONG赋值:25
    M赋值:10
    0
    DIFF赋值:(收盘价的SHORT日指数移动平均/收盘价的LONG日指数移动平均-1)*100
    PARTLINE(DIFF,DIFF>
    1日前的DIFF,自定色,DIFF<
    1日前的DIFF,自定色),线宽为2
    输出DEA:DIFF的M日指数移动平均,画黄色
    输出平滑异同平均线:3*(DIFF-DEA),COLORSTICK
    输出MACDX:MACD
    PARTLINE(MACDX,MACDX>
    1日前的MACDX,自定色,MACDX<
    1日前的MACDX,自定色)
    VAR1赋值:收盘价的35日指数移动平均-收盘价的17日指数移动平均
    VAR2赋值:VAR1的5日指数移动平均
    输出JGDX:收盘价10%之字转向的前1个波谷位置<
    1ANDCROSS(VAR1,VAR2),画红色
    JC赋值:DIFF上穿DEA
    SC赋值:DEA上穿DIFF
    DJCK赋值:(统计上次DIFF>距今天数日中满足JC的天数
    0)))
    SSJC赋值:(统计上次DIFF<距今天数日中满足JC的天数
    0)))
    USCK赋值:(统计上次DIFF<距今天数日中满足SC的天数
    0)))
    JCD赋值:如果JC,返回DEA,否则返回0
    SCD赋值:如果SC,返回DEA,否则返回0
    当满足条件JCANDDIFF<时,在?位置书写文字
    0,JCD,NUMTOSTR(DJCK)+'金叉'),画红色
    当满足条件JCANDDIFF>时,在?位置书写文字
    0,JCD,NUMTOSTR(SSJC)+'金叉'),画红色
    当满足条件SCANDDIFF>时,在?位置书写文字
    0,SCD,NUMTOSTR(USCK)+'死叉'),画绿色
    A1赋值:上次?日前的DIFF上穿DEAANDDEA<距今天数
    0,1))
    B1赋值:A1+1日前的收盘价>
    CANDREF(DIFF,A1+1)<
    DIFFANDCROSS(DIFF,DEA)ANDDEA<
    0
    当满足条件B1>的?日过滤时,在?位置书写文字
    0,5),DIFF-0.01,'*MACD底背离'),画黄色
    C1赋值:上次1日前的DEA上穿DIFF距今天数ANDDEA>
    0
    D1赋值:C1+1日前的收盘价<
    CANDREF(DIFF,C1+1)>
    DIFFANDCROSS(DEA,DIFF)ANDDEA>
    0
    当满足条件D1>的?日过滤时,在?位置书写文字
    0,5),DIFF+0.01,'*MACD顶背离'),画红色
    A1赋值:"上穿?
    MACD.MACD"
    ,0)
    A2赋值:上次A1距今天数
    A3赋值:?日内"距今天数
    MACD.MACD"
    ,A2+1)
    A4赋值:若?日前的A3>则将最近?周期置为1
    =1,1)AND"
    MACD.MACD"
    <
    0,A3)
    A5赋值:若1日前的A4=0ANDA4=1则将最近2周期置为1
    输出高值:如果A5的2日过滤,返回",否则返回?
    MACD.MACD"
    ,0)
    当满足条件高值>时,在?位置画?号图标
    0,高值,4)
    B1赋值:0上穿"
    MACD.MACD"
    )
    B2赋值:上次B1距今天数
    B3赋值:?日内"距今天数
    MACD.MACD"
    ,B2+1)
    B4赋值:若?日前的B3>则将最近?周期置为1
    =1,1)AND"
    MACD.MACD"
    >
    0,B3)
    B5赋值:若1日前的B4=0ANDB4=1则将最近2周期置为1
    输出低值:如果B5的2日过滤,返回",否则返回?
    MACD.MACD"
    ,0)
    当满足条件低值<时,在?位置画?号图标
    0,低值,5)
    输出DIF:收盘价的12日指数移动平均-收盘价的26日指数移动平均,线宽为0
    输出DEA:DIF的9日指数移动平均,线宽为0
    RSV赋值:(收盘价-9日内最低价的最低值)/(9日内最高价的最高值-9日内最低价的最低值)*100
    输出K:RSV的9日[3日权重]移动平均,线宽为0
    输出D:K的9日[3日权重]移动平均,线宽为0
    输出J:3*K-2*D,线宽为0
    KM赋值:DIF上穿DEAANDCROSS(K,D)ANDCROSS(J,D)
    当满足条件KM时,在0和100位置之间画柱状线,宽度为3,0不为0则画空心柱.,画黄色
    当满足条件KM时,在92位置画25号图标
    当满足条件KM时,在43位置书写文字,画黄色
    SHORT赋值:12
    LONG赋值:26
    MID赋值:9
    DIF赋值:收盘价的SHORT日指数移动平均-收盘价的LONG日指数移动平均
    DEA赋值:DIF的MID日指数移动平均
    MACD赋值:(DIF-DEA)*2
    N1赋值:6
    N2赋值:12
    N3赋值:24
    LC赋值:1日前的收盘价
    RSI1赋值:收盘价-LC和0的较大值的N1日[1日权重]移动平均/收盘价-LC的绝对值的N1日[1日权重]移动平均*100
    RSI2赋值:收盘价-LC和0的较大值的N2日[1日权重]移动平均/收盘价-LC的绝对值的N2日[1日权重]移动平均*100
    RSI3赋值:收盘价-LC和0的较大值的N3日[1日权重]移动平均/收盘价-LC的绝对值的N3日[1日权重]移动平均*100
    TJ1赋值:DIF上穿DEA
    MA5赋值:收盘价的5日简单移动平均
    TJ3赋值:收盘价上穿MA5
    TJ4赋值:收盘价/1日前的收盘价>
    =1.02
    TJ2赋值:RSI1上穿RSI2
    S1赋值:如果模糊匹配品种名称,返回0,否则返回1
    S2赋值:如果模糊匹配品种名称,返回0,否则返回1
    QQ赋值:开盘价>
    0
    QT赋值:S1ANDS2ANDQQ
    输出XG:TJ1ANDTJ2ANDTJ3ANDTJ4ANDQT
    L1赋值:6
    L2赋值:12
    L3赋值:24
    输出BIAS1:(收盘价-收盘价的L1日简单移动平均)/收盘价的L1日简单移动平均*100
    输出BIAS2:(收盘价-收盘价的L2日简单移动平均)/收盘价的L2日简单移动平均*100
    输出BIAS3:(收盘价-收盘价的L3日简单移动平均)/收盘价的L3日简单移动平均*100
    当满足条件BIAS1上穿BIAS2时,在BIAS2位置书写文字,画黄色
    当满足条件BIAS2上穿BIAS1时,在BIAS1位置书写文字,画蓝色