通达信波段背离金叉选股指标公式源码

通达信波段背离金叉选股指标公式源码

源码正文：

月K:="kdj.K#MONTH"COLOR0080FF{XG51};
月D:="kdJ.D#MONTH"{XG51};
周K:="KDJ.K#WEEK"{XG51};
周D:="KDJ.D#WEEK"{XG51};
日K:="KD.K"{XG51};
日D:="KD.D"{XG51};
日金叉:IF(crOSS(日K,日D),5,-9),COLORRED{XG51};
周金叉:IF(CROSS(周K,周D),12,-9),COLORWHITE{XG51};
月金叉:IF(CROSS(月K,月D),15,-9),COLOR0080FF{XG51};
周死叉:IF(CROSS(周D,周K),18,-9),COLORFFFF00{XG51};
月死叉:IF(CROSS(月D,月K),22,-9),COLORCYAN{XG51};
stICKLINE(CROSS(日K,日D),-3,-9,1.5,0),COLORFFFFFF{XG51};
STICKLINE(CROSS(周K,周D),3,-3,1.5,0),COLOR0000FF{XG51};
difF:=ema(CLOSE,10) - Ema(CLOSE,22){XG51};
DEA :=EMA(DIFF,7.5){XG51};
AA1:=BArslAST(REF(CROSS(DIFF,DEA),1)){XG51};
BB1:=(REF(L,AA1+1)>L OR REF(C,AA1+1)>C) AND REF(L,DIFF)>REF((L,DIFF),AA1+1) AND CROSS(DIFF,DEA){XG51};
AAA2:=BARSLAST(REF(CROSS(DEA,DIFF),1)){XG51};
BBB1:=(REF(C,AAA2+1)<C OR REF(H,AAA2+1)<H) AND REF((H,DIFF),AAA2+1)>(H,DIFF) AND CROSS(DEA,DIFF){XG51};
AA2:=BARSLAST(REF(CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)),1)){XG51};
BB2:=REF(C,AA2+1)>C AND REF("KDJ.K"(9,3,3),AA2+1)<"KDJ.K"(9,3,3) AND CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)){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};
AA3:=BARSLAST(REF(CROSS("rsi.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1)){XG51};
BB3:=REF(C,AA3+1)>C AND REF("RSI.RSI1"(6,12,24),AA3+1)<"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)){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};
MacD底背:IF(BB1>0,0,0),COLOR208FFF{XG51};
MACD顶背:IF(BBB1>0,0,0),COLOR00FF00{XG51};
KDJ底背:IF(BB2>0,0,0),COLOR0000FF{XG51};
KDJ顶背:IF(D2>0,0,0),COLORFFCC66{XG51};
RSI底背:IF(BB3>0,0,0),COLORFF9F00{XG51};
RSI顶背:IF(D3>0,0,0),COLORFFFFFF{XG51};
STICKLINE(BB1>0,45,50,3,0),COLOR208FFF{XG51};
STICKLINE(BBB1>0,55,50,3,0),COLOR00FF00{XG51};
STICKLINE(BB2>0,45,50,2.5,0),COLOR0000FF{XG51};
STICKLINE(D2>0,55,50,2.5,0),COLORFFCC66{XG51};
STICKLINE(BB3>0,45,50,1.5,0),COLORFF9F00{XG51};
STICKLINE(D3>0,55,50,1.5,0),COLORRED{XG51};
AS1:=BARSLAST(REF(CROSS(DIFF,DEA),1)){XG51};
底背离:REF(DIFF,AS1+1)<DIFF AND REF(DEA,AS1+1)<DEA AND REF(L,AS1+1)>L AND CROSS(DIFF,DEA),NODRAW,COLOR00FF00{XG51};
STICKLINE(底背离,45,50,1,0),COLOR00FFFF{XG51};
106,COLORFFFFFF{XG51};
顶:82,COLORFFFF00,LINETHICK1{XG51};
顶A:92,COLOR999599,LINETHICK5{XG51};
低:1,COLOR208FFF,LINETHICK0{XG51};
低A:9,COLORFFF000,LINETHICK1{XG51};
50,COLOR888888,DOTLINE,LINETHICK1{XG51};
0,COLORFF00FF{XG51};
JQZD:=LLV(LOW,9){XG51};
JQZG:=HHV(HIGH,9){XG51};
RSV:=EMA((CLOSE-JQZD)/(JQZG-JQZD)*100,3){XG51};
K:EMA(RSV,3){XG51};
D:MA(K,3){XG51};
DRAWBAND(K,RGB(155,77,77),D,RGB(77,188,77)){XG51};
DRAWTEXT(ISLASTBAR AND K>REF(K,1),K,'▲'),COLORFFAAFF;
DRAWTEXT(ISLASTBAR AND K<REF(K,1),K,'▼'),COLORFFAAFF{XG51};
LOWV:=EMA(LLV(LOW,34),3){XG51};
HIGHV:=EMA(HHV(HIGH,34),3){XG51};
RSVB:=EMA((CLOSE-LOWV)/(HIGHV-LOWV)*100,3){XG51};
KB:=SMA(RSVB,10,1){XG51};
DB:=SMA(KB,8,1){XG51};
JB:3*KB-2*DB,COLOR00FFFF,LINETHICK1,DOTLINE{XG51};
DRAWTEXT(ISLASTBAR AND JB>REF(JB,1),JB,'▲'),COLOR00FFFF;
DRAWTEXT(ISLASTBAR AND JB<REF(JB,1),JB,'▼'),COLOR00FFFF{XG51};
周JA:"skdj.K#WEEK"COLORWHITE{XG51};
QA1:=EMA(LLV(LOW,9),3){XG51};
QA2:=EMA(HHV(HIGH,9),3){XG51};
QA3:=EMA(C,2){XG51};
RSVA:=EMA((QA3-QA1)/(QA2-QA1)*100,3){XG51};
KA:=SMA(RSVA,3,1){XG51};
DA:=SMA(KA,3,1){XG51};
JA:=3*KA-2*DA{XG51};
LC := REF(CLOSE,1){XG51};
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(Abs(CLOSE-LC),6,1)*100{XG51};
TYPP:=(HIGH+LOW+CLOSE)/3{XG51};
cci20:=(TYPP-MA(TYPP,14))/(0.015*AVEDEV(TYPP,14)){XG51};
STICKLINE(CCI20>=150,101,98,1.5,0) ,COLOR508FFF{XG51};
STICKLINE(RSI1>76,104,102,1.5,0) ,COLORFFFF00{XG51};
STICKLINE(JA>90,106,104,1.5,0) ,COLOR0000FF{XG51};
RSI5:=((SMA(MAX((CLOSE - LC),0),5,1) / SMA(ABS((CLOSE - LC)),5,1)) * 100){XG51};
R:=SUM(MAX(MAX((HIGH - LOW),ABS((HIGH - REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),10){XG51};
HD:=(HIGH - REF(HIGH,1)){XG51};
LD:=(REF(LOW,1) - LOW){XG51};
DMP:=SUM(IF(((HD > 0) AND (HD > LD)),HD,0),10){XG51};
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),10){XG51};
pdi:=((DMP * 100) / R){XG51};
mdi:=((DMM * 100) / R){XG51};
ADX:=MA(((ABS((MDI - PDI)) / (MDI + PDI)) * 100),5){XG51};
AV:=(RSI5 + ADX){XG51};
DXR:=(((ADX + REF(ADX,5)) / 2) + RSI5){XG51};
wr10:=((100 * (HHV(HIGH,10) - CLOSE)) / (HHV(HIGH,10) - LLV(LOW,10))){XG51};
NEWvol:=(RSI5 - WR10){XG51};
JDDB:=(AV + NEWVOL){XG51};
STICKLINE((JDDB < 0),9,13,2.5,0),COLORWHITE{XG51};
QSX:=LLV(JDDB,1){XG51};
STICKLINE((QSX >230 ),94,90,2.5,0),COLORCYAN{X!G+5_1!C!N!{};