n=9;m1=3;m2=3;
RSV=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
k:SMA(RSV,M1,1),colorwhite;
d:SMA(k,M2,1),colorcyan;
j:(3*k-2*d);
RSV1=(CLOSE-LLV(LOW,N*4))/(HHV(HIGH,N*4)-LLV(LOW,N*4))*100;
K1:=SMA(RSV1,M1*4,1);
d1:=SMA(K1,M2*4,1);
j1:3*K1-2*d1,NODRAW;
RSV2:=(CLOSE-LLV(LOW,N*20))/(HHV(HIGH,N*20)-LLV(LOW,N*20))*100;
K2:=SMA(RSV2,M1*20,1);
D2:=SMA(K2,M2*20,1);
J2:3*K2-2*D2,NODRAW;
FILLRGN(J2,D2,D2<j2,colorred,D2>j2,colorgreen);
STICKLINE(D1<j1,D1,j1,6,0),colormagenta;
STICKLINE(D1>j1,D1,j1,6,0),colorblue;
//{日线KJ上移分析}
日上移:=K>REF(K,1) AND J>REF(J,1) AND (J<K OR CROSS(J,K)) ;
//{周线KJ上移分析}
周上移:=K1>REF(K1,1) AND J1>REF(J1,1) ;
//{月线J上移分析}
月上移:=J2>REF(J2,1) ;
DRAWTEXT(日上移 AND 周上移 AND 月上移 ,J,'牛' );