通达信牛头背离未加密选股指标公式源码

通达信牛头背离未加密选股指标公式源码

源码正文：

N:=21{XG51};
M:=6{XG51};
M1:=20{XG51};
TR1:=ema(maX(MAX(HIGH-LOW,Abs(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N){XG51};
HD :=HIGH-REF(HIGH,1){XG51};
LD :=REF(LOW,1)-LOW{XG51};
DMP:=EMA(IF(HD>0 AND HD>LD,HD,0),N){XG51};
DMM:=EMA(IF(LD>0 AND LD>HD,LD,0),N){XG51};
pdi:= DMP*100/TR1{XG51};
mdi:= DMM*100/TR1{XG51};
ADX: EMA((PDI-MDI)/(MDI+PDI)*100,M)*2{XG51};
ADXR:EMA(ADX,M){XG51};
Adma:EMA(ADX,M1){XG51};
ADX1:ADX,COLORWHITE{XG51};
ADXR1:ADXR,COLORCYAN{XG51};
A1:=BArslAst(REF(crOSS(ADX,ADXR),1)){XG51};
B1:=REF(C,A1+1)>C AND REF(ADXR,A1+1)<ADXR AND CROSS(ADX,ADXR){XG51};
DRAWTEXT(B1>0,ADX-0.1,'底背离'),COLORFF00FF{XG51};
C1:=BARSLAST(REF(CROSS(ADXR,ADX),1)){XG51};
D1:=REF(C,C1+1)<C AND REF(ADX,C1+1)>ADX AND CROSS(ADXR,ADX){XG51};
DRAWTEXT(D1> 0,ADX+0.1,'顶背离'){X_G?5_1_C_N_{};

通达信短线判断未加密选股指标公式源码

源码正文：

VARA:=ema(C,5){XG51};
VARC:=Ema(IF(L>=VARA,VARA,0),5){XG51};
VARD:IF(VARC>100,VARC,VARC){XG51};
顶部发作:VARD,COLORWHITE{XG51};
VARE:=EMA(IF(H<=VARA,VARA,0),5){XG51};
VARF:IF(VARE<100,VARE,VARE){XG51};
底部发作:VARF,COLORCYAN{X!G.5!1!C!N!{};