
等级: 新手上路
- 注册:
- 2022-4-8
- 曾用名:
|
N:=9;M1:=3;M2:=3;
{KDJ}
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:SMA(RSV,M1,1);
D:SMA(K,M2,1);
J:2*(K-D),NODRAW;
STICKLINE(J>=0,0,J,0.5,0),COLORRED;
STICKLINE(J<0,0,J,0.5,0),COLORLIGREEN;
;{/////////////正向柱底背离部分///////////////////////}绿时间:=BARSLASTCOUNT(J<0);前绿至今:=BARSLAST(CROSS(J,0)),NODRAW;柱底背点X:=绿时间>=1 AND LLV(LOW,绿时间)<REF(LLV(LOW,绿时间),前绿至今+1) AND LLV(J,绿时间)>REF(LLV(J,绿时间),前绿至今+1),NODRAW;柱底背点:柱底背点X AND COUNT(柱底背点X,绿时间)=1,COLORRED,NODRAW;柱底背保持:EVERY(柱底背点X,BARSLAST(柱底背点)),NODRAW;STICKLINE(柱底背点,0,J,5,0),COLORRED;STICKLINE(柱底背保持,0,J,2,0),COLORYELLOW;{/////////////正向柱顶背离部分///////////////////////}红时间:=BARSLASTCOUNT(J>0);前红至今:=BARSLAST(CROSS(0,J)),NODRAW;柱顶背点X:=红时间>=1 AND HHV(H,红时间)>REF(HHV(H,红时间),前红至今+1) AND HHV(J,红时间)<REF(HHV(J,红时间),前红至今+1),NODRAW;柱顶背点:柱顶背点X AND COUNT(柱顶背点X,红时间)=1,NODRAW,COLORBLUE;柱顶背保持:EVERY(柱顶背点X,BARSLAST(柱顶背点)),NODRAW,COLORGREEN;STICKLINE(柱顶背点,0,J,4,0),COLORYELLOW;STICKLINE(柱顶背保持,0,J,2,0),COLORGREEN;{/////////////正向线底背离部分///////////////////////}线底背点X:=绿时间>=1 AND LLV(LOW,绿时间)<REF(LLV(LOW,绿时间),前绿至今+1) AND LLV(K,绿时间)>REF(LLV(K,绿时间),前绿至今+1) AND K>0 AND REF(LLV(K,绿时间),前绿至今+1)>0,NODRAW;线底背点:线底背点X AND COUNT(线底背点X,绿时间)=1,NODRAW,COLORRED;线底背保持:EVERY(线底背点X,BARSLAST(线底背点)),COLORYELLOW,NODRAW;IF(线底背点,K,DRAWNULL),COLORRED,CIRCLEDOT,LINETHICK6,;IF(线底背保持,K,DRAWNULL),COLORYELLOW,LINETHICK5,NODRAW,;{/////////////正向线顶背离部分///////////////////////}线顶背点X:=红时间>=1 AND HHV(H,红时间)>REF(HHV(H,红时间),前红至今+1) AND HHV(K,红时间)<REF(HHV(K,红时间),前红至今+1) AND K>0 AND REF(HHV(K,红时间),前红至今+1)>0,NODRAW;线顶背点:线顶背点X AND COUNT(线顶背点X,红时间)=1,NODRAW,COLORBLUE;线顶背保持:EVERY(线顶背点X,BARSLAST(线顶背点)),COLORGREEN,NODRAW;IF(线顶背点,K,DRAWNULL),COLORYELLOW,CIRCLEDOT,LINETHICK6;IF(线顶背保持,K,DRAWNULL),COLORYELLOW,LINETHICK6,NODRAW;
STICKLINE(线顶背保持,K,D,1,0),COLORGREEN;
STICKLINE(线底背保持,K,D,1,0),COLORGREEN;
RSV3:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K3:SMA(RSV3,M1,1),NODRAW;
D3:SMA(K3,M2,1),NODRAW;
J3:3*K3-2*D3,COLORFF00FF,LINETHICK1,NODRAW;
{/////////////反向底背离部分///////////////////////}绿时间L:=BARSLASTCOUNT(J<0);前绿至L:=BARSLAST(CROSS(J,0)),NODRAW;反底背点X:=绿时间>=1 AND LLV(LOW,绿时间)>REF(LLV(LOW,绿时间),前绿至今+1) AND LLV(J,绿时间)<REF(LLV(J,绿时间),前绿至今+1),NODRAW;反底背点:反底背点X AND COUNT(反底背点X,绿时间)=1,NODRAW;反底背保持:EVERY(反底背点X,BARSLAST(反底背点)),NODRAW;STICKLINE(反底背点,0,J,1,0),COLORYELLOW;STICKLINE(反底背保持,0,J,1,0),COLORGREEN;{/////////////反向顶背离部分///////////////////////}红时间L:=BARSLASTCOUNT(J>0);前红至今L:=BARSLAST(CROSS(0,J)),NODRAW;反顶背点X:=红时间>=1 AND HHV(H,红时间)<REF(HHV(H,红时间),前红至今+1) AND HHV(J,红时间)>REF(HHV(J,红时间),前红至今+1),NODRAW;反顶背点:反顶背点X AND COUNT(反顶背点X,红时间)=1,NODRAW;反顶背保持:EVERY(反顶背点X,BARSLAST(反顶背点)),NODRAW;STICKLINE(反顶背点,0,J,1,0),COLORGREEN;STICKLINE(反顶背保持,0,J,1,0),COLORFF00FF;
STICKLINE(反底背点,10,15,5,0),COLORFF00FF,LINETHICK2,NODRAW;
STICKLINE(反底背保持,10,15,5,0),COLORFF00FF,LINETHICK2,NODRAW;
STICKLINE(反顶背点,85,90,5,0),COLORFF00FF,LINETHICK2,NODRAW;
STICKLINE(反顶背保持,85,90,5,0),COLORFF00FF,LINETHICK2,NODRAW;
{MACD积背离}JC:= D-K;绿柱面积:=IF(J<0,SUM(J,BARSLAST(JC<0)),0);红柱面积:=IF(J>0,SUM(J,BARSLAST(JC>0)),0);本次最低价:=LLV(L,BARSLAST(JC<0));本次最高价:=HHV(H,BARSLAST(JC>0));X1:=IF (J<0,BARSLAST(CROSS(K,D)),0);前次绿柱面积:=REF(绿柱面积,X1+1);前次最低价:=REF(本次最低价,X1+1);{WWW.88GS.COM}Y1:=IF((绿柱面积<0 AND ABS(绿柱面积)<ABS(前次绿柱面积) AND 本次最低价<前次最低价 ),1,0);RS1:= J<0 AND REF(J,1)<0 AND C<前次最低价AND ABS(绿柱面积)<ABS(前次绿柱面积) AND ABS(J)<ABS(REF(J,1));底背驰:= IF (CROSS(K,D),REF(Y1,1),0);DRAWTEXT(底背驰,D*0.8,'W'),COLORFF80FF;X2:=IF (J>0,BARSLAST(CROSS(D,K)),0);前次红柱面积:=REF(红柱面积,X2+1);前次最高价:=REF(本次最高价,X2+1);Y2:=IF((红柱面积>0 AND 红柱面积<前次红柱面积 AND 本次最高价>前次最高价 ),1,0);RS2:= J>0 AND REF(J,1)>0 AND C>前次最高价 AND ABS(红柱面积)<ABS(前次红柱面积) AND ABS(J)<ABS(REF(J,1));顶背驰:= IF (CROSS(D,K),REF(Y2,1),0);DRAWTEXT(顶背驰,D*0.8,'A'),COLORYELLOW;
|
|