通达信波段四种背离未加密选股指标公式源码

通达信波段四种背离未加密选股指标公式源码

源码正文：

SJ:=1{XG51};
严重超买:100*SJ,COLORWHITE,DOTLINE{XG51};
超买:80,COLORWHITE,DOTLINE{XG51};
超卖:20,COLOR00FF00,DOTLINE{XG51};
严重超卖:0*SJ,COLOR00FF00,DOTLINE{XG51};
macd顶背:0,COLOR00FF00{XG51};
maCD底背:0,COLORWHITE{XG51};
kdj顶背:0,COLORFFCC66{XG51};
kdJ底背:0,COLORFF00FF{XG51};
rsi顶背:0,COLORFFFFFF{XG51};
RSI底背:0,COLORBLUE{XG51};
dmi顶背:0,COLORYELLOW{XG51};
DMI底背:0,COLOR0099FF{XG51};
TRR := 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/TRR{XG51};
mdi:= MDM*100/TRR{XG51};
A1:=BArslAst(REF(crOSS("MacD.dif"(12,26,9),"MACD.DEA"(12,26,9)),1))*SJ{XG51};
B1:=REF(C,A1+1)>C AND REF("MACD.DIF"(12,26,9),A1+1)<"MACD.DIF"(12,26,9) AND CROSS("MACD.DIF"(12,26,9),"MACD.DEA"(12,26,9))*SJ{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))*SJ{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))*SJ{XG51};
C1:=BARSLAST(REF(CROSS("MACD.DEA"(12,26,9),"MACD.DIF"(12,26,9)),1)){XG51};
D1:=REF(C,C1+1)<C AND REF("MACD.DIF"(12,26,9),C1+1)>"MACD.DIF"(12,26,9) AND CROSS("MACD.DEA"(12,26,9),"MACD.DIF"(12,26,9))*SJ{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))*SJ{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))*SJ{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};
DRAWTEXT(B4>0,5,'DMI底背'),COLOR0099FF{XG51};
DRAWTEXT(D4>0,95,'DMI顶背'),COLORYELLOW{XG51};
DRAWTEXT(B1>0,15,'MACD底背'),COLORWHITE{XG51};
DRAWTEXT(B2>0,10,'KDJ底背')*SJ,COLORFF00FF{XG51};
DRAWTEXT(B3>0,18,'RSI底背')*SJ,COLORBLUE{XG51};
DRAWTEXT(D1>0,85,'MACD顶背')*SJ,COLOR00FF00{XG51};
DRAWTEXT(D2>0,90,'KDJ顶背')*SJ,COLORFFCC66{XG51};
DRAWTEXT(D3>0,96,'RSI顶背')*SJ,COLORFFFFFF{XG51};
STICKLINE(B1>0,20,0,0,0),COLORWHITE{XG51};
STICKLINE(B2>0,20,0,0,0),COLORFF00FF{XG51};
STICKLINE(B3>0,20,0,0,0),COLORBLUE{XG51};
STICKLINE(D1>0,80,100,0,0),COLOR00FF00{XG51};
STICKLINE(D2>0,100,80,0,0),COLORFFCC66{XG51};
STICKLINE(D3>0,100,80,0,0),COLORRED{XG51};
STICKLINE(B4>0,20,0,0,0),COLOR0099FF{XG51};
STICKLINE(D4>0,100,80,0,0),COLORYELLOW{XG51};
VAR188:=((CLOSE - LLV(LOW,34))/(HHV(HIGH,34) - LLV(LOW,34)))*(100){XG51};
VAR288:=REVERSE(VAR188){XG51};
VAR388:=SMA(VAR188,9,1){XG51};
K88:=SMA(VAR388,3,1)*SJ{XG51};
D88:=SMA(K88,3,1)*SJ{XG51};
STICKLINE((K88 >= D88),K88,D88,1,0),COLOR0000FF{XG51};
STICKLINE((K88 <= D88),K88,D88,1,0),COLOR00FF00{X~G-5!1~C~N~{};

通达信捕捞线新版未加密选股指标公式源码

源码正文：

WY1001:=(2*CLOSE+HIGH+LOW)/3{XG51};
WY1002:=ema(WY1001,3){XG51};
WY1003:=Ema(WY1002,3){XG51};
WY1004:=EMA(WY1003,3){XG51};
XYS0:=(WY1004-REF(WY1004,1))/REF(WY1004,1)*100{XG51};
stICKLINE(XYS0>=0,XYS0,0,2,0),COLORWHITE{XG51};
STICKLINE(XYS0<0,XYS0,0,2,0),COLOR205F20{XG51};
STICKLINE(XYS0<-1,XYS0,0,2,0),COLOR2D872D{XG51};
STICKLINE(XYS0<-1.5,XYS0,0,2,0),COLOR40C040{XG51};
STICKLINE(XYS0<-2,XYS0,0,2,0),COLORCYAN{XG51};
PJGJ:=AMOUNT/vol/100{XG51};
SSRYDJX:=MA(PJGJ,15){XG51};
SSRCJL:=EMA(VOL,15){XG51};
SSRCJE:=EMA(AMOUNT,15){XG51};
SSRCBJX:=SSRCJE/SSRCJL/100{XG51};
捕捞线:=(CLOSE-SSRCBJX)/SSRCBJX*100{XG51};
XYSHSL:=EMA(VOL/CAPITAL*100,12){XG51};
STICKLINE(XYSHSL>6.1 AND 捕捞线>5 ,1.2 ,0 ,2 ,0 ),COLORLIMAGENTA{XG51};
STICKLINE(XYSHSL>3.8 AND 捕捞线>5 ,0.9 ,0 ,2 ,0 ),COLORBLUE{XG51};
STICKLINE(XYSHSL>2.1 AND 捕捞线>5 ,0.6 ,0 ,2 ,0 ),COLORGREEN{XG51};
STICKLINE(XYSHSL>1.8 AND 捕捞线>5 ,0.3 ,0 ,2 ,0 ),COLORYELLOW{XG51};
龙骨:MA(XYS0,1),COLORCYAN,LINETHICK3{XG51};
龙筋:MA(XYS0,2),COLORRED,LINETHICK1{XG51};
IF((龙骨>REF(龙骨,1)),龙骨,DRAWNULL),COLORBLUE,LINETHICK3{XG51};
金叉:=crOSS(龙骨, 龙筋);DRAWICON(金叉,龙筋,38){X_G_5-1_C_N_{};