通达信DMI,MACD.RSI背离未加密选股指标公式源码

源码正文：

N:=14{XG51};
MM:=6{XG51};
RSV:=(CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10))*100{XG51};
K:=SMA(RSV,3,1){XG51};
D:=Sma(K,3,1){XG51};
J:=3*K-2*D{XG51};
difF:=ema(CLOSE,12) - EMA(CLOSE,26){XG51};
DEA:=EMA(DIFF,9){XG51};
macd:=2*(DIFF-DEA), COLORstICK{XG51};
LC:=REF(CLOSE,1){XG51};
rsi1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(Abs(CLOSE-LC),6,1)*100{XG51};
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100{XG51};
RSI3:=SMA(MAX(CLOSE-LC,0),24,1)/SMA(ABS(CLOSE-LC),24,1)*100{XG51};
A1:=BArslAST(REF(crOSS(DIFF,DEA),1)){XG51};
B1:=REF(CLOSE,A1+1)>CLOSE AND REF(DIFF,A1+1)<DIFF AND CROSS(DIFF,DEA){XG51};
MacD底背离:FILTER(B1>0,5){XG51};
STICKLINE(FILTER(B1>0,5),0,10,1,0),COLOR00FF00{XG51};
DRAWTEXT(FILTER(B1>0,5),10,'MACD底背'),COLOR00FF00{XG51};
A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1)){XG51};
B3:=REF(CLOSE,A3+1)>CLOSE AND REF(RSI1,A3+1)<RSI1 AND CROSS(RSI1,RSI2){XG51};
RSI底背离:FILTER(B3>0,5),LINETHICK0{XG51};
STICKLINE(FILTER(B3>0,5),0,30,1,0),COLORFFFF00{XG51};
DRAWTEXT(FILTER(B3>0,5),30,'RSI底背'),COLORFFFF00{XG51};
C1:=BARSLAST(REF(CROSS(DEA,DIFF),1)){XG51};
D1:=REF(CLOSE,C1+1)<CLOSE AND REF(DIFF,C1+1)>DIFF AND CROSS(DEA,DIFF){XG51};
MACD顶背离:FILTER(D1>0,5),LINETHICK0{XG51};
STICKLINE(FILTER(D1>0,5),100,80,1,0),COLOR0066FF{XG51};
DRAWTEXT(FILTER(D1>0,5),80,'MACD顶背'),COLOR0066FF{XG51};
C3:=BARSLAST(REF(CROSS(RSI2,RSI1),1)){XG51};
D3:=REF(CLOSE,C3+1)<CLOSE AND REF(RSI1,C3+1)>RSI1 AND CROSS(RSI2,RSI1){XG51};
RSI顶背离:FILTER(D3>0,5),LINETHICK0{XG51};
STICKLINE(FILTER(D3>0,5),100,80,1,0),COLOR15F70A{XG51};
DRAWTEXT(FILTER(D3>0,5),80,'RSI顶背'),COLOR15F70A{XG51};
TR1:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),21){XG51};
HD :=HIGH-REF(HIGH,1){XG51};
LD :=REF(LOW,1)-LOW{XG51};
DMP:=EMA(IF(HD>0 AND HD>LD,HD,0),21){XG51};
DMM:=EMA(IF(LD>0 AND LD>HD,LD,0),21){XG51};
pdi:= DMP*100/TR1{XG51};
mdi:= DMM*100/TR1{XG51};
ADX: EMA((PDI-MDI)/(MDI+PDI)*100,6)*2{XG51};
ADXR:EMA(ADX,6){XG51};
Adma:=EMA(ADX,20){XG51};
OMD:(ADX-2*ADMA+ADXR)/2, COLORSTICK{XG51};
DRAWBAND(ADX,RGB(155,50,50),ADXR,RGB(0,100,50)){XG51};
STICKLINE(OMD>REF(OMD,1) AND OMD>0,0,OMD,1,0),COLORWHITE{XG51};
STICKLINE(OMD>REF(OMD,1) AND OMD<0,0,OMD,1,0),COLORCYAN{XG51};
STICKLINE(OMD<REF(OMD,1),0,OMD,1,0),COLORCBCBC0{XG51};
STICKLINE(OMD>=0 OR OMD<=0,0,0,50,1),COLORRED{XG51};
ADX1:ADX,COLORWHITE{XG51};
ADXR1:ADXR,COLORBLUE{XG51};
DM1:=BARSLAST(REF(CROSS(ADX1,ADXR1),1)){XG51};
DM2:=REF(CLOSE,DM1+1)>CLOSE AND REF(ADX1,DM1+1)<ADX1 AND CROSS(ADX1,ADXR1){XG51};
DMI底背离:FILTER(DM2>0,5),LINETHICK0{XG51};
DRAWTEXT(FILTER(DM2>0,5),ADX1,'DMI底背'),COLORFFFF00{XG51};
DM3:=BARSLAST(REF(CROSS(ADXR1,ADX1),1)){XG51};
DM4:=REF(CLOSE,DM3+1)<CLOSE AND REF(ADX1,DM3+1)>ADX1 AND CROSS(ADXR1,ADX1){XG51};
DMI顶背离:FILTER(DM4>0,5),LINETHICK0{XG51};
DRAWTEXT(FILTER(DM4>0,5),ADX1,'DMI顶背'),COLORCYAN{X_G_5.1_C_N_{};

源码正文：

VAR1:=(HHV(HIGH,5)-LLV(LOW,5)){XG51};
VAR2:=(HHV(HIGH,9)-CLOSE){XG51};
VAR3:=(CLOSE-LLV(LOW,9)){XG51};
VAR4:=VAR2/VAR1*100-70 {XG51};
VAR5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
VAR6:=(2*C+H+L)/4{XG51};
VAR7:=SMA((VAR3/VAR1*100),3,1);
VAR8:=LLV(LOW,34){XG51};
VAR9:=Sma(VAR7,3,1)-SMA(VAR4,9,1){XG51};
VAR10:= IF(VAR9>100,VAR9-100,0){XG51};
VARA:=HHV(HIGH,34){XG51};
主力: 3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1),LINETHICK2{XG51};
见底信号: 10, LINETHICK2,COLORWHITE {XG51};
买入准备: IF(主力<=10,50,10), LINETHICK2{XG51};
买入时机: IF(crOSS(主力,见底信号),100,10), LINETHICK2,COLORBLUE{XG51};
防线B:ema((VAR6-VAR8)/(VARA-VAR8)*100,8),COLOR3366FF{XG51};
B1:EMA(防线B,5){XG51};
吃嘛嘛香:stICKLINE(防线B>0 AND 防线B-B1<0,13,4,1,0),COLORWHITE{XG51};
出击:STICKLINE(防线B-B1>0,防线B,B1,1,1),LINETHICK2,COLORWHITE{XG51};
少妇多情:STICKLINE(防线B>0 AND 防线B-B1>=0,98,100,1,0),COLOR00FF00{XG51};
频约娇媚:STICKLINE(防线B>0 AND 防线B-B1<0,98,100,1,0),COLORWHITE{XG51};
STICKLINE(防线B>0 AND 防线B-B1>=0,49,50,1,0),COLOR3366FF{XG51};
STICKLINE(防线B>0 AND 防线B-B1<0,49,50,1,0),COLORWHITE{XG51};
照赚照赔:STICKLINE(防线B>0 AND 防线B-B1>=0,13,4,0.1,0),COLOR00FF00{XG51};
妙趣横生:STICKLINE(防线B-B1<0,防线B,B1,0.1,1),COLORCYAN{X_G+5_1_C_N_{};