通达信顶底结构副图副图指标公式源码

DIFF : EMA(CLOSE,12) - EMA(CLOSE,26);
DEA : EMA(DIFF,9);
MACD=2*(DIFF-DEA);
ZERO : 0;
GJ:=MAX(C,O);
STICKLINE(MACD>0 AND MACD>=REF(MACD,1),0,MACD,2,0),COLORRED;
STICKLINE(MACD>0 AND MACD< REF(MACD,1),0,MACD,2,0),COLORLIBLUE;
STICKLINE(MACD< 0 AND MACD>=REF(MACD,1),0,MACD,2,0),COLORLIRED;
STICKLINE(MACD< 0 AND MACD< REF(MACD,1),0,MACD,2,0),COLORGREEN;
L4:=LLV(GJ,4);
JL:=(HHV(DIFF,55)-LLV(DIFF,55))/5;
GT:=DEA>REF(DEA,1) AND REF(DEA,1)< REF(DEA,2);
A1:=BARSLAST(REF(GT,1));
底部结构:=REF(L4,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND GT;
DRAWLINE(A1=0,DEA,底部结构,REF(DEA,A1),0),COLORRED,LINETHICK2;
DRAWLINE(底部结构,DEA,底部结构,REF(DEA,A1),0),COLORRED,LINETHICK2;
DRAWTEXT(底部结构,REF(DEA,A1)*1.18,' 底部结构'),COLORRED;
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;
A0:=DIFF< 0 AND DEA< 0;
A11:=A0>REF(A0,1);
A3:=BARSLAST(A11);
A4:=COUNT(DEA>0 AND DIFF >0,A3)=0;
A5:=CROSS(DIFF ,DEA);
A6:=BARSLAST(A5);
A7:=REF(A6,A6+1)+A6;
A8:=(DIFF+DEA)/2;
A9:=(HIGH+LOW)/2;
A10:=A5 AND A7< A3 AND A4 AND A8>REF(A8,A7) AND A9< REF(A9,A7) AND MACD>0;