通达信MACD/KDJ/RSI/DMI顶底背离未加密选股指标公式源码

源码正文：

difF1:=ema(CLOSE,12)-Ema(CLOSE,26){XG51};
DEA1:=EMA(DIFF1,9){XG51};
DRAWBAND(DEA1,DRAWNULL,DIFF1,RGB(250,0,0)){XG51};
DIFF:EMA(CLOSE,12)-EMA(CLOSE,26),COLORBLUE{XG51};
DEA:EMA(DIFF,9),COLORGREEN{XG51};
macd:2*(DIFF-DEA),COLORstICK{XG51};
TR1:=SUM(MAX(MAX(HIGH-LOW,Abs(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14){XG51};
HD:=HIGH-REF(HIGH,1){XG51};
LD:=REF(LOW,1)-LOW{XG51};
PDM:=SUM(IF(HD>0 AND HD>LD,HD,0),14){XG51};
MDM:=SUM(IF(LD>0 AND LD>HD,LD,0),14){XG51};
pdi:=PDM*100/TR{XG51};
mdi:=MDM*100/TR{XG51};
A1:=BArslAST(REF(crOSS(DIFF,DEA),1)){XG51};
B1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)<DIFF AND CROSS(DIFF,DEA){XG51};
A2:=BARSLAST(REF(CROSS("kdj.K"(9,3,3),"kdJ.D"(9,3,3)),1)){XG51};
B2:=REF(C,A2+1)>C AND REF("KDJ.K"(9,3,3),A2+1)<"KDJ.K"(9,3,3) AND CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)){XG51};
A3:=BARSLAST(REF(CROSS("rsi.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1)){XG51};
B3:=REF(C,A3+1)>C AND REF("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)){XG51};
C1:=BARSLAST(REF(CROSS(DEA,DIFF),1)){XG51};
D1:=REF(C,C1+1)<C AND REF(DIFF,C1+1)>DIFF AND CROSS(DEA,DIFF){XG51};
C2:=BARSLAST(REF(CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)),1)){XG51};
D2:=REF(C,C2+1)<C AND REF("KDJ.K"(9,3,3),C2+1)>"KDJ.K"(9,3,3) AND CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)){XG51};
C3:=BARSLAST(REF(CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)),1)){XG51};
D3:=REF(C,C3+1)<C AND REF("RSI.RSI1"(6,12,24),C3+1)>"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)){XG51};
C4:=BARSLAST(REF(CROSS(MDI,PDI),1)){XG51};
D4:=REF(C,C+1)<C AND REF(MDI,C4+1)>MDI AND CROSS(MDI,PDI){XG51};
A4:=BARSLAST(REF(CROSS(PDI,MDI),1)){XG51};
B4:=REF(C,A4+1)>C AND REF(PDI,A4+1)<PDI AND CROSS(PDI,MDI){XG51};
MacD底背:IF(B1>0,1,0),COLORWHITE,NODRAW{XG51};
KDJ底背:IF(B2>0,1,0),COLORFF00FF,NODRAW{XG51};
RSI底背:IF(B3>0,1,0),COLORBLUE,NODRAW{XG51};
dmi底背:IF(B4>0,1,0),COLORGRAY,NODRAW{XG51};
MACD顶背:IF(D1>0,1,0),COLOR00FF00,NODRAW{XG51};
KDJ顶背:IF(D2>0,1,0),COLORFFCC66,NODRAW{XG51};
RSI顶背:IF(D3>0,1,0),COLORRED,NODRAW{XG51};
DMI顶背:IF(D4>0,1,0),COLORLICYAN,NODRAW{XG51};
STICKLINE(B1>0,-0.1,0,2,0),COLORWHITE{XG51};
STICKLINE(B2>0,-0.1,-0.2,2,0),COLORFF00FF{XG51};
STICKLINE(B3>0,-0.1,0,2,0),COLORBLUE{XG51};
STICKLINE(B4>0,-0.1,-0.2,2,0),COLORGRAY{XG51};
STICKLINE(D1>0,0.1,0,2,0),COLOR00FF00{XG51};
STICKLINE(D2>0,0.1,0.2,2,0),COLORFFCC66{XG51};
STICKLINE(D3>0,0.1,0,2,0),COLORRED{XG51};
STICKLINE(D4>0,0.1,0.2,2,0),COLORLICYAN{X=G_5_1=C=N={};

源码正文：

dif55:(ema(CLOSE,30)-Ema(CLOSE,90))*0.55{XG51};
DEA55:(EMA(DIF55,26)){XG51};
macd周:(DIF55-DEA55)*2, COLORstICK{XG51};
DRAWBAND(DEA55,RGB(135,200,0),DIF55,RGB(255,0,0)){XG51};
YUWEI:=MA(CLOSE,1)-MA(CLOSE,6){XG51};
线上:=YUWEI>0{XG51};
线下:=YUWEI<0{XG51};
线下绿柱:=YUWEI<0 AND YUWEI<REF(YUWEI,1){XG51};
线下红柱:=YUWEI<0 AND YUWEI>REF(YUWEI,1){XG51};
资金买:=crOSS(YUWEI,0){XG51};
上证YUWEI:=MA("999999$CLOSE",1)-MA("999999$CLOSE",6){XG51};
上证线上:=上证YUWEI>0{XG51};
上证线下:=上证YUWEI<0{XG51};
上证线下绿柱:=上证YUWEI<0 AND 上证YUWEI<REF(上证YUWEI,1){XG51};
上证线下红柱:=上证YUWEI<0 AND 上证YUWEI>REF(上证YUWEI,1){XG51};
上证资金买:=CROSS(上证YUWEI,0){XG51};
资金逆市进入值:=COUNT(线上,8)-COUNT(上证线上,8){XG51};
助推资金进入:资金逆市进入值>=4 AND CLOSE>OPEN{XG51};
N:=18{XG51};
M1:=3{XG51};
M2:=3{XG51};
RSV:=(CLOSE - LLV(LOW,N))/(HHV(HIGH,N) - LLV(LOW,N))*100{XG51};
K:=EMA(RSV,M1){XG51};
D:=EMA(K,M2){XG51};
J:=(3*K-2*D){XG51};
kdj1:=REF(COUNT(J<REF(J,1),5)>=3,1) AND REF(J,1)<20{XG51};
kdJ2:=J>REF(J,1){XG51};
VAR22:=REF(LOW,1){XG51};
VAR33:=SMA(Abs(LOW-VAR22),3,1)/SMA(MAX(LOW-VAR22,0),3,1)*100{XG51};
VAR44:=EMA(IF(CLOSE*1.3,VAR33*10,VAR33/10),3){XG51};
VAR55:=LLV(LOW,13){XG51};
VAR66:=HHV(VAR44,13){XG51};
VAR77:=IF(MA(CLOSE,34),1,0){XG51};
VAR888:=EMA(IF(LOW<=VAR55,(VAR44+VAR66*2)/2,0),3)/618*VAR77{XG51};
VAR999:=IF(VAR888>100,100,VAR888){XG51};
吸筹:=VAR999,LINETHICK1,COLORCD7F32 {XG51};
吸筹下:=吸筹 < REF(吸筹,1){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),COLORFF6666,LINETHICK2{XG51};
趋势线上:=趋势线 > REF(趋势线,1){XG51};
抄底资金进入:吸筹下 AND 趋势线上 AND CROSS(趋势线,吸筹) COLORBLUE{XG51};
QUAN:(CLOSE-dma(CLOSE,vol/SUM(VOL,13)))/DMA(CLOSE,VOL/SUM(VOL,13))*100<=-28 AND (CLOSE-DMA(CLOSE,VOL/SUM(VOL,34)))/DMA(CLOSE,VOL/SUM(VOL,34))*100<=-19
AND C/REF(C,25)<=1.1 AND IF((((HIGH > (LOW * 1.051)) AND (COUNT((HIGH > (LOW * 1.051)),5) > 1)) AND ((((CLOSE / MA(CLOSE,40)) * 100) < 78) OR
(((CLOSE / MA(CLOSE,60)) * 100) < 74))),2,0) AND
(SMA(MAX(C-REF(C,2),0),7,1)/SMA(ABS(C-REF(C,2)),7,1)*100)<15 AND IF(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,2,1)>REF(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,2,1),1)
AND REF(SMA((CLOSE-LLV(LOW,8))/
(HHV(HIGH,8)-LLV(LOW,8))*100,2,1),1)<REF(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,2,1),2)
AND SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,2,1)<23 ,1.5,0) AND FILTER((C/MA(C,48))<0.75 AND (C/MA(C,70))<0.70 AND
((C-L)/C>0.02 OR C>REF(C,1)*1.01) AND V<REF(V,1)*2.8 AND (COUNT(C<O*0.93,2)=2 OR COUNT(H/L>1.1,5)>3),3) {X_G*5!1_C_N_{};