通达信顶底背离MACD副图指标源码

　　VAR2:=EMA(SLOPE(O,21)+O,55);

　　VAR3:=EMA(SLOPE(H,21)+H,55);

　　VAR4:=EMA(SLOPE(L,21)+L,55);

　　VAR5:=EMA(C,3);

　　VAR6:=EMA(O,3);

　　VAR7:=EMA(H,3);

　　VAR8:=EMA(L,3);

　　VAR9:=VAR1-VAR5,LINETHICK2;

　　VAR10:=VAR2-VAR6,LINETHICK2;

　　VAR11:=VAR3-VAR7,LINETHICK2;

　　VAR12:=VAR4-VAR8,LINETHICK2;

　　ZJC:=REVERSE(VAR9);

　　ZJO:=REVERSE(VAR10);

　　ZJH:=REVERSE(VAR11);

　　ZJL:=REVERSE(VAR12);

　　DIF:EMA(ZJC*5,12)-EMA(ZJC*5,26);

　　DEA:EMA(DIF,9);

　　MACD:(DIF-DEA)*2,COLORSTICK;

　　STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,0,0),COLORRED;

　　STICKLINE(MACD<REF(MACD,1) AND MACD>0,0,MACD,0,0),COLORMAGENTA;

　　STICKLINE(MACD>REF(MACD,1) AND MACD<0,0,MACD,0,0),COLORYELLOW;

　　STICKLINE(MACD<REF(MACD,1) AND MACD<0,0,MACD,0,0),COLORLIGREEN;

　　STICKLINE(ZJC> ZJO,ZJH,ZJL,0.0,0),COLORFF66FF;

　　STICKLINE(ZJC> ZJO,ZJC,ZJO,2.1,0),COLORAA00AA;

　　STICKLINE(ZJC> ZJO,ZJC,ZJO,1.9,0),COLORCC11CC;

　　STICKLINE(ZJC> ZJO,ZJC,ZJO,1.6,0),COLORFF22FF;

　　STICKLINE(ZJC> ZJO,ZJC,ZJO,1.2,0),COLORFF44FF;

　　STICKLINE(ZJC> ZJO,ZJC,ZJO,0.7,0),COLORFF66FF;

　　STICKLINE(ZJC> ZJO,ZJC,ZJO,0.2,0),COLORFF99FF;

　　STICKLINE(ZJC<=ZJO,ZJL,ZJC,0.0,0),COLORGREEN;

　　STICKLINE(ZJC<=ZJO,ZJO,ZJC,2.1,0),COLOR005500;

　　STICKLINE(ZJC<=ZJO,ZJO,ZJC,1.9,0),COLOR007700;

　　STICKLINE(ZJC<=ZJO,ZJO,ZJC,1.6,0),COLOR009900;

　　STICKLINE(ZJC<=ZJO,ZJO,ZJC,1.2,0),COLOR00BB00;

　　STICKLINE(ZJC<=ZJO,ZJO,ZJC,0.7,0),COLOR00DD00;

　　STICKLINE(ZJC<=ZJO,ZJO,ZJC,0.2,0),COLOR44FF00;

　　ZTB:=(C-REF(C,1))/REF(C,1)*100>9.9;

　　DRAWTEXT(ZTB,IF(ZJC<0,ZJC*0.9,ZJC*1.1),'涨停板')COLORYELLOW;

　　STICKLINE(ZTB,ZJC,ZJO,2.1,0),COLOR006666;

　　STICKLINE(ZTB,ZJC,ZJO,1.9,0),COLOR008888;

　　STICKLINE(ZTB,ZJC,ZJO,1.6,0),COLOR00AAAA;

　　STICKLINE(ZTB,ZJC,ZJO,1.2,0),COLOR00CCCC;

　　STICKLINE(ZTB,ZJC,ZJO,0.7,0),COLOR00EEEE;

　　STICKLINE(ZTB,ZJC,ZJO,0.2,0),COLOR33FFFF;

　　DTB:=(C-REF(C,1))/REF(C,1)*100<-9.9;

　　DRAWTEXT(DTB,IF(ZJC>0,ZJC*0.9,ZJC*1.1),'跌停板')COLORFF8800;

　　STICKLINE(DTB,ZJO,ZJC,2.1,0),COLORFF0000;{蓝色}

　　STICKLINE(DTB,ZJO,ZJC,1.9,0),COLORFF2200;

　　STICKLINE(DTB,ZJO,ZJC,1.6,0),COLORFF4400;

　　STICKLINE(DTB,ZJO,ZJC,1.2,0),COLORFF6600;

　　STICKLINE(DTB,ZJO,ZJC,0.7,0),COLORFF8800;

　　STICKLINE(DTB,ZJO,ZJC,0.2,0),COLORFFAA00;