通达信与众不同的CDP指标源码
通达信与众不同的CDP指标源码
CDP1:=REF(H+L+C,1)/3,COLORWHITE,LINETHICK1;
AH1:=CDP1+REF(H-L,1),COLORYELLOW,LINETHICK1;
NH1:=CDP1*2-REF(L,1),COLORLIRED,LINETHICK2;
AL1:=CDP1*2-REF(H,1),COLORLIGREEN,LINETHICK2;
NL1:=CDP1-REF(H-L,1),COLORRED,LINETHICK1;
DRAWTEXT(ISLASTBAR,NH1,'NH'),COLOR7B007B;
DRAWTEXT(ISLASTBAR,AL1,'AL'),COLOR066821;
DRAWTEXT(C>CDP1 AND AH1< REF(AH1,1),CDP1-0.2,'买'),COLORWHITE;
DRAWTEXT(C>NH1 AND NH1< REF(NH1,1),CDP1-0.1,'进'),COLORYELLOW;
{DRAWTEXT(C>CDP AND CDP< REF(CDP,1),CDP-0.2,'入'),COLORYELLOW;}
DRAWTEXT(C>CDP1 AND AH1< REF(AH1,1) AND NL1> REF(NL1,1),NL1,'买'),COLORCYAN;
CDP:EMA(EMA(CDP1,3),3),LINETHICK2;
AH:EMA(EMA(AH1,2),5),COLORYELLOW,LINETHICK1;
NH:EMA(EMA(NH1,2),5),COLORLIRED,LINETHICK2;
AL:EMA(EMA(AL1,2),5),COLORLIGREEN,LINETHICK2;
NL:EMA(EMA(NL1,2),5),COLORRED,LINETHICK1;
F:=100*(C-REF(C,1))/REF(C,1);
P1:=IF(C<REF(O,1) AND F<0,1,0);
P2:=IF(C<REF(O,2) AND F<0,1,0);
TT3:=P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1 ;
DRAWTEXT(CROSS(88,RSI),HIGH * 1.02,'顶'),COLOR00FFFF;
STICKLINE(TT3,OPEN,CLOSE,2.5,0),COLORYELLOW; {粉红块;}
F1:=IF(C>REF(C,1),100*VOL/CAPITAL,0);
F2:=IF(C<REF(C,1),100*VOL/CAPITAL,0);
XX:=-SUM(F2,5);
YY:=SUM(F1,5);
ZZ:=XX+YY;
DRAWTEXT(XX=ZZ,L-0.3,'★'),COLORYELLOW;
