同花顺DMI背离未加密选股指标公式源码

同花顺DMI背离未加密选股指标公式源码

源码正文：

N:=21;
M:=6;
M1:=20;
TR1:=ema(maX(MAX(HIGH-LOW,Abs(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N);
HD :=HIGH-REF(HIGH,1);
LD :=REF(LOW,1)-LOW;
DMP:=EMA(IF(HD>0 AND HD>LD,HD,0),N);
DMM:=EMA(IF(LD>0 AND LD>HD,LD,0),N);
pdi:= DMP*100/TR1;
mdi:= DMM*100/TR1;
ADX: EMA((PDI-MDI)/(MDI+PDI)*100,M)*2;
ADXR:EMA(ADX,M);
Adma:EMA(ADX,M1);
OMD:(ADX-2*ADMA+ADXR)/2, COLORstICK;
DRAWBAND(ADX,RGB(155,50,50),ADXR,RGB(0,100,50));
STICKLINE(OMD>REF(OMD,1) AND OMD>0,0,OMD,1,0),colorred;
STICKLINE(OMD>REF(OMD,1) AND OMD<0,0,OMD,1,0),colorgreen;
STICKLINE(OMD<REF(OMD,1),0,OMD,1,0),COLORCBCBC0;
STICKLINE(OMD>=0 OR OMD<=0,0,0,50,1),colorwhite;
ADX1:ADX,colorred;
ADXR1:ADXR,colorgreen;
ADMA1:ADMA;
强:IF(ADX1>=ADXR1,ADX1,DRAWNULL),colorred,LINETHICK3;
买入:IF(OMD>0 AND OMD-REF(OMD,1)>0,30,0);
A1:=BArslAST(REF(crOSS(ADX,ADXR),1));
B1:=REF(C,A1+1)>C AND REF(ADXR,A1+1)<ADXR AND CROSS(ADX,ADXR);
DRAWTEXT(B1>0,ADX-0.1,'底背离'),COLORFF00FF;
STICKLINE(B1,0,ADX,0.5,0),COLOR0000FF;
C1:=BARSLAST(REF(CROSS(ADXR,ADX),1));
D1:=REF(C,C1+1)<C AND REF(ADX,C1+1)>ADX AND CROSS(ADXR,ADX);
DRAWTEXT(D1> 0,ADX+0.1,'顶背离'),COLOR00FF00;
STICKLINE(D1,0,ADX,0.5,0),COLOR00FFFF;
110;
0;
-110;

同花顺勇哥KD未加密选股指标公式源码

源码正文：

J:=kdj.J;
K:=kdJ.K;
TT:=crOSS(J,K);
TA:=SUMBARS(TT,2)-1;
TB:=COUNT(TT,20)>1;
TC:=K>REF(K,TA);
XG:TT AND TB AND TC;