請教大大kd+高低線
請教大大:
1.如何在以下kd+格線各加上低點20及高點80的高低格線
2.kd背離時顯示圖示哭笑臉即價格突破前高時kd質無法突破前高時哭笑.反之笑臉..thanks
NHH:=HHV( HIGH , N ) ;
NLL:=LLV( LOW , N ) ;
CC:=CLOSE ;
RSV:=( ( CC - NLL ) / ( NHH - NLL ) ) * 100 ;
K:SMA( RSV , M1 , 1 ) ;
D:SMA( K , M2 , 1 ),Color0099FF;
JXA:=K-REF(K,1)>=0;
PARTLINE(JXA=1,K),ColorRed;
{====================================================}
RR:=( ( CC - NLL ) / ( NHH - NLL ) ) * 100 ;
RK:=REF( K , 1 ) ;
RD:=REF( D , 1 ) ;
X:=( ( NHH - NLL ) * RK ) / 100 + NLL ;
Y:=( ( NHH - NLL ) * ( RD * M1 - RK * ( M1 - 1 ) ) ) / 100 + NLL ;
今關K:X , Linethick0 , ColorFFFF00 ;
今關D:Y , Linethick0 , ColorFFFF00 ;
AHH:=HHV( Refx(HIGH,1) , N ) ;
BLL:=LLV( Refx(LOW,1) , N ) ;
KK:=SMA( RSV , M1 , 1 ) ;
DD:=SMA( K , M2 , 1 ) ;
<%
VHH=FFL.VarData("AHH")
VLL=FFL.VarData("BLL")
VKK=FFL.VarData("KK")
VDD=FFL.VarData("DD")
LT=UBound( VHH )
for m=0 to LT
VHH( m )=VHH( LT )
VLL( m )=VLL( LT )
VKK( m )=VKK( LT )
VDD( m )=VDD( LT )
next
FFL.VarData("AHH")=VHH
FFL.VarData("BLL")=VLL
FFL.VarData("KK")=VKK
FFL.VarData("DD")=VDD
%>
XX:=( ( AHH - BLL ) * KK ) / 100 + BLL ;
YY:=( ( AHH - BLL ) * ( DD * M1 - KK * ( M1 - 1 ) ) ) / 100 + BLL ;
估明關K:XX, Linethick0 , ColorFFFF00 ;
估明關D:YY, Linethick0 , ColorFFFF00 ;
DRAWTEXT(CROSS(K,D),D,'買') PXDN15 colorred;
DRAWTEXT(CROSS(D,K),k,'賣') PXUP30 colorgreen;
__________________
小和
|