股资源-股票学习站-学炒股-股票课程-炒股教程-分析选股指标-入门基础知识

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
    上一主题 下一主题

    [通达信] 「指标」增强版MACD背离买卖点提示副图指标 通达信 贴图 无未来 无漂移

     
        [-----复制链接-----]

    积分
    11057
    楼主
    2024-1-7 20:33:36
    【资料名称】:增强版MACD背离买卖点提示副图指标 通达信 贴图 无未来 无漂移介绍
    【资料描述】:

    增强版MACD背离买卖点提示副图指标 通达信 贴图 无未来 无漂移

    之前发的是文华的,这个是通达信的MACD指标。里面加了背离画线和背离提示,加了买卖点,指标没有未来函数,信号不漂移。

    {MACD背离画线}

    SJ:=1;
    {减4天,上方时间提前2天,30号到期28号提示}
    DIFF:(EMA(CLOSE,12)*SJ - EMA(CLOSE,26)*SJ);
    DEA:EMA(DIFF,9)*SJ;
    MACD2:(2 * (DIFF - DEA))*SJ,COLORSTICK;
    J:=CROSS(DIFF,DEA);
    S:=CROSS(DEA,DIFF);
    JC:=COUNT(J,BARSLAST(CROSS(DIFF>0&&DEA>0,0.5)))=1&&J;
    SC:=COUNT(S,BARSLAST(CROSS(0.5,DIFF>0&&DEA>0)))=1&&S;
    JC2:=COUNT(S,BARSLAST(CROSS(0.5,DIFF>0&&DEA>0)))=2&&S;
    SC2:=COUNT(J,BARSLAST(CROSS(DIFF>0&&DEA>0,0.5)))=2&&J;
    N1:=SUMBARS(CROSS(DEA,DIFF),1);
    N2:=SUMBARS(CROSS(DIFF,DEA),1);
    DRAWTEXT(N2=1&&N1>5&&N1<=13*SJ&&EVERY(DIFF>0&&DEA*SJ>0 ,N1)&&JC,DIFF,'多'),COLORRED;


    M:=SUMBARS((DIFF<0&&CROSS(0,DEA))||(CROSS(0,DIFF)&&DEA<0),1);
    M1:=SUMBARS(CROSS(DIFF,DEA),1);
    M2:=SUMBARS(CROSS(DEA,DIFF),1);
    DRAWTEXT(M2=1&&M1*SJ>5&&M1<=13*SJ&&EVERY(DIFF<0&&DEA<0,N2) &&SC,DIFF,'空'),COLORGREEN;


    NDTJ:=SUMBARS(N2=1&&N1>5&&N1<=13&&EVERY(DIFF>0&&DEA>0,N1),1);
    NKTJ:=SUMBARS(M2=1&&M1>5&&M1<=13&&EVERY(DIFF<0&&DEA<0,N2),1);
    DRAWTEXT(NDTJ<=4*SJ&&CROSS(DEA,DIFF) AND JC2,DIFF,'风险'),COLORRED;
    DRAWTEXT(NKTJ<=4*SJ&&CROSS(DIFF,DEA) AND SC2,DIFF,'风险'),COLORGREEN;

    JC222:=CROSS(DIFF,DEA);
    SC222:=CROSS(DEA,DIFF);
    N133:=BARSLAST(JC222)+1;
    N233:=BARSLAST(SC222)+1;
    HH:=REF(HHV(H,N133),N233);

    HH2:=REF(REF(HH,1),N233);
    MHD:=VALUEWHEN(SC222,HHV(DIFF,N133));
    MHD2:=VALUEWHEN(SC222,REF(MHD,1));

    LL:=REF(LLV(L,N233),N133);
    LL2:=REF(REF(LL,1),N133);
    MLD:=VALUEWHEN(JC222,LLV(DIFF,N233));
    MLD2:=VALUEWHEN(JC222,REF(MLD,1));

    A:=MACD<0&&HH>HH2&&MHD<MHD2;
    B:=MACD>0&&LL<LL2&&MLD>MLD2;

    A1:=BACKSET(CROSS(A,0.5),REF(HHVBARS(DIFF,N133),1)+1+1);
    A2:=BACKSET(CROSS(A,0.5),REF(HHVBARS(DIFF,N133),SUMBARS(SC222,2))+SUMBARS(SC222,2)+1);
    B1:=BACKSET(CROSS(B,0.5),REF(LLVBARS(DIFF,N233),1)+1+1);
    B2:=BACKSET(CROSS(B,0.5),REF(LLVBARS(DIFF,N233),SUMBARS(JC222,2))+SUMBARS(JC222,2)+1);
    DRAWLINE(CROSS(A2,0.5),DIFF,CROSS(A1,0.5),DIFF,0),COLORRED,LINETHICK2;
    DRAWLINE(CROSS(B2,0.5),DIFF,CROSS(B1,0.5),DIFF,0),COLORGREEN,LINETHICK2;


    VAR6:=(2*CLOSE+HIGH+LOW)/4;
    VAR8:=LLV(LOW,20);
    VARAA:=HHV(HIGH,26);
    B8:=EMA((VAR6-VAR8)/(VARAA-VAR8)*100,8);
    B18:=EMA(B8,5);
    K22:=B8>80 AND CROSS(B18,B8);
    K1:=BARSLAST(K22);
    K2:=REF(K1,1);
    K底:=B8<20 AND CROSS(B8,B18);
    K底1:=BARSLAST(K底);
    K底2:=REF(K底1,1);
    DRAWTEXT(REF(B8,1)*SJ>80 AND CROSS(B18,B8) AND REF(B8,1)<REF(B8,K2+2) AND REF(C,1)>REF(C,K2+2),DEA,'顶背离'),COLORCYAN;
    DRAWTEXT(B8<25*SJ AND CROSS(B8,B18) AND B8>REF(B8,K底2) AND C<REF(C,K底2),DEA,'底背离'),COLORFF00FF;







    gd58207


    【下载地址隐藏】:                    点:回复可见地址
    游客,如果您要查看本帖隐藏内容请回复


    回复

    举报

    发新帖

    GMT+8, 2025-2-17 22:40

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