[求助] 公式改编麻烦老师改成v6能用的,非常感谢 (文华财经WH6赢顺V6.7)

投资者咨询:[求助] 公式改编麻烦老师改成v6能用的,非常感谢 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2019-7-28 17:21

 

 

 

 

{顶底指标}
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1)COLORRED,LINETHICK1;
D:=SMA(K,3,1)COLORBLUE,LINETHICK1;
J:=3*K-2*D,COLORLICYAN,LINETHICK2;
顶背离:=IF(H>REF(HHV(H,10),1) AND J<HHV(J,15) AND (CROSS(100,J)),1,0),COLORBLUE,NODRAW;
顶背离1:=IF(H>REF(HHV(H,10),1) AND J<HHV(J,15) AND J<REF(J,1),1,0)AND J<100,COLORBLUE,NODRAW;
DRAWTEXT(顶背离,H,'顶'),COLORLIMAGENTA;
DRAWTEXT(顶背离1,H,'顶'),COLORLIMAGENTA;
DRAWICON(J<100 AND REF(J,1)>100,H,2);

底背离:=IF(L<REF(L,1) AND J>REF(LLV(J,15),1) AND J>REF(J,1) AND J<=25 AND J>0,1,0),COLORMAGENTA,NODRAW;
底背离1:=IF(L<REF(L,1) AND J>LLV(J,15) AND CROSS(J,0),1,0),COLORLIGREEN,NODRAW;
J值上拐:=IF(CROSS(J,0),1,0),COLORBLACK,NODRAW;
DRAWTEXT(底背离,L*0.99,'底'),COLORRED;
DRAWTEXT(J值上拐,L*0.99,'底'),COLORRED;
DRAWTEXT(底背离1,L*0.99,'底'),COLORRED;

 

TC1:=IF(H=HHV(H,48),H,DRAWNULL);
TC2:=CONST(BARSLAST(TC1=H))+1;
UPPER:=CONST(IF(TC2=1,H,REF(H,TC2-1)));
BC1:=IF(L=LLV(L,48),L,DRAWNULL);
BC2:=CONST(BARSLAST(BC1=L))+1;
LOWER:=CONST(IF(BC2=1,L,REF(L,BC2-1)));
LP:=CURRBARSCOUNT<=BC2 AND L=LOWER;{低点定位}
HP:=CURRBARSCOUNT<=TC2 AND H=UPPER;{高点定位}
DRAWTEXT(LP,L*0.99,'�I波段底'),COLORLIGREEN;{波段底文字提示}
DRAWTEXT(HP,H*1.0051,'←波段顶'),COLORMAGENTA;{波段顶文字提示};

STICKLINE(HP,OPEN,CLOSE,0.5,0),COLORGREEN;
STICKLINE(LP,OPEN,CLOSE,0.5,0),COLORYELLOW;

技术人员回复
日期:2019-7-28 18:24
 参考:

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1),COLORRED,LINETHICK1;
D:=SMA(K,3,1),COLORBLUE,LINETHICK1;
J:=3*K-2*D,COLORCYAN,LINETHICK2;
顶背离:=IF(H>REF(HHV(H,10),1) AND J<HHV(J,15) AND (CROSS(100,J)),1,0),COLORBLUE,NODRAW;
顶背离1:=IF(H>REF(HHV(H,10),1) AND J<HHV(J,15) AND J<REF(J,1),1,0) AND J<100,COLORBLUE,NODRAW;
DRAWTEXT(顶背离,H,'顶'),COLORMAGENTA; 
DRAWTEXT(顶背离1,H,'顶'),COLORMAGENTA; 
DRAWICON(J<100 AND REF(J,1)>100,H,2);

底背离:=IF(L<REF(L,1) AND J>REF(LLV(J,15),1) AND J>REF(J,1) AND J<=25 AND J>0,1,0),COLORMAGENTA,NODRAW;
底背离1:=IF(L<REF(L,1) AND J>LLV(J,15) AND CROSS(J,0),1,0),COLORLIGHTGREEN,NODRAW;
J值上拐:=IF(CROSS(J,0),1,0),COLORBLACK,NODRAW;
DRAWTEXT(底背离,L*0.99,'底'),COLORRED; 
DRAWTEXT(J值上拐,L*0.99,'底'),COLORRED; 
DRAWTEXT(底背离1,L*0.99,'底'),COLORRED;

 

TC1:=IF(H=HHV(H,48),H,NULL);
TC2:=REFX1(BARSLAST(TC1=H),9999)+1;
UPPER:=REFX1(IF(TC2=1,H,REF(H,TC2-1)),9999);
BC1:=IF(L=LLV(L,48),L,NULL);
BC2:=REFX1(BARSLAST(BC1=L),9999)+1;
LOWER:=REFX1(IF(BC2=1,L,REF(L,BC2-1)),9999);
CURRBARSCOUNT:=REFX1(BARPOS,9999)-BARPOS+1;
LP:=CURRBARSCOUNT<=BC2 AND L=LOWER;
{低点定位}
HP:=CURRBARSCOUNT<=TC2 AND H=UPPER;

DRAWTEXT(LP,L*0.99,'�I波段底'),COLORLIGHTGREEN;

DRAWTEXT(HP,H*1.0051,'←波段顶'),COLORMAGENTA;

STICKLINE(HP,OPEN,CLOSE,0.5,0),COLORGREEN;
STICKLINE(LP,OPEN,CLOSE,0.5,0),COLORYELLOW;