完美KDJ（无未来，源码）

以下是完美KDJ（无未来，源码）

本人只是组合一下，很完美，能有效过滤KDJ假信号。

C/C++ Code复制内容到剪贴板N:= 9 ; M1 := 3 ; M2 := 3 ; M3:= 5 ; RSV:= (CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100; FASTK:=SMA(RSV,M1,1); K:SMA(FASTK,M2,1); D:SMA(K,M3,1); J:3*K-2*D; partline(j,j>ref(j,1),rgb(255,0,0),j<ref(j,1),rgb(0,255,0)); BB:=count(J<ref(J,1),5)=5; B:(ref(BB,1) and J>=ref(J,1) and j<30)*10,LINETHICK0; LB:if(B,LLV(L,10),0),linethick0; DRAWICON(B,J*0.99,1),ALIGN1; BIAS:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100; XG:((CROSS(K,D)AND D<16 AND BIAS<-6))*80; j:=3*k-2*d; PARTLINE(J,J>ref(J,1),RGB(255,50,0),J<ref(J,1),RGB(0,255,255)),linethick2; DIF:=EMA(CLOSE,12)-EMA(CLOSE,26); DEA:=EMA(DIF,9); VAR1:=HHV(DEA,53); VAR2:=LLV(DEA,55); VAR3:=DEA-(DIF-DEA); UP:=IF(DIF>VAR1 AND DEA=VAR1,MAX(LLV(VAR1,10),VAR3),VAR1); DN:=IF(DIF<VAR2 AND DEA=VAR2,MIN(HHV(VAR2,10),VAR3),VAR2); PARTLINE(104,DIF>UP,RGB(0,180,0)),LINETHICK3,LAYER7; PARTLINE(-5,DIF<DN,RGB(0,180,0)),LINETHICK3,LAYER7;