a1:ma(c,10),LINETHICK0;;
a2:ma(c,30),LINETHICK0;;
ts:=barslast((a1>ref(a2,1))=0),LINETHICK1;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
jc:CROSS(j,ref(j,1));
//kk:=count(jc,0);
fj:jc*c,LINETHICK1;
BL:=HHV(H,0);
HBL:=BL[DATACOUNT];
bla:=if(fj>0,fj,hbl);
zdj:if(ts,llv(bla,ts),0);
zgj:if(ts,hhv(fj,ts),0);