通达信主力成本KDJ未加密选股指标公式源码

通达信主力成本KDJ未加密选股指标公式源码

源码正文：

主力成本:dma(((2*C+H+L)/4+(2*H+L+C)/4+(2*L+C+H)/4)/3*90,HSL/90)/90,NODRAW{XG51};
M1:=C/L>1.035{XG51};
M2:=BARSSINCEN(M1,30){XG51};
A1:=(ma(C,2)/REF(主力成本,M2)-1)*100{XG51};
K:SMA(A1,3,1),COLORRED{XG51};
D:SMA(K,3,1),COLORBLUE{XG51};
J:K*3-D*2,COLORLIMAGENTA{XG51};
DRAWTEXT(crOSS(K,0),K,'上穿主力成本，介入'),COLORLIMAGENTA{XG51};
DRAWTEXT(K<-5 AND K=LLV(K,20),K,'长线分批抄底'),COLORLIMAGENTA{XG51};
DRAWTEXT(K>0 AND K<15 AND CROSS(K,D),K,'加油'),COLORLIMAGENTA{X~G~5?1~C~N~{};

通达信小周期画框主图未加密选股指标公式源码

源码正文：

A:=BArslAst(DATE!=REF(DATE,1))+1{XG51};
T:=BARSLAST(crOSS(A=1,0.5)){XG51};
T1:=REF(A,T+1)+A{XG51};
T2:=REF(T1,T+1)+A{XG51};
T3:=REF(T2,T+1)+A{XG51};
T4:=REF(T3,T+1)+A{XG51};
T5:=REF(T4,T+1)+A{XG51};
T6:=REF(T5,T+1)+A{XG51};
T7:=REF(T6,T+1)+A{XG51};
T8:=REF(T7,T+1)+A{XG51};
T9:=REF(T8,T+1)+A{XG51};
H1:=FINDHIGH(H,0,A,1){XG51};
H2:=FINDHIGH(H,A,REF(A,T+1),1){XG51};
H3:=FINDHIGH(H,T1,REF(A,T+1),1){XG51};
H4:=FINDHIGH(H,T2,REF(A,T+1),1){XG51};
H5:=FINDHIGH(H,T3,REF(A,T+1),1){XG51};
H6:=FINDHIGH(H,T4,REF(A,T+1),1){XG51};
H7:=FINDHIGH(H,T5,REF(A,T+1),1){XG51};
H8:=FINDHIGH(H,T6,REF(A,T+1),1){XG51};
H9:=FINDHIGH(H,T7,REF(A,T+1),1){XG51};
H10:=FINDHIGH(H,T8,REF(A,T+1),1){XG51};
L1:=FINDLOW(L,0,A,1){XG51};
L2:=FINDLOW(L,A,REF(A,T+1),1){XG51};
L3:=FINDLOW(L,T1,REF(A,T+1),1){XG51};
L4:=FINDLOW(L,T2,REF(A,T+1),1){XG51};
L5:=FINDLOW(L,T3,REF(A,T+1),1){XG51};
L6:=FINDLOW(L,T4,REF(A,T+1),1){XG51};
L7:=FINDLOW(L,T5,REF(A,T+1),1){XG51};
L8:=FINDLOW(L,T6,REF(A,T+1),1){XG51};
L9:=FINDLOW(L,T7,REF(A,T+1),1){XG51};
L10:=FINDLOW(L,T8,REF(A,T+1),1){XG51};
STICKLINE(RANGE(CURRBARSCOUNT,1,CONST(A)),CONST(H1),CONST(H1),8,0),COLORBLUE{XG51};
STICKLINE(RANGE(CURRBARSCOUNT,1,CONST(A)),CONST(L1),CONST(L1),8,0),COLORBLUE{XG51};
STICKLINE(CURRBARSCOUNT=1 OR CURRBARSCOUNT=CONST(A),CONST(L1),CONST(H1),0,0),COLORBLUE{XG51};
STICKLINE(RANGE(CURRBARSCOUNT,CONST(A)+1,CONST(T1)),CONST(H2),CONST(H2),8,0),COLORBLUE{XG51};
STICKLINE(RANGE(CURRBARSCOUNT,CONST(A)+1,CONST(T1)),CONST(L2),CONST(L2),8,0),COLORBLUE{XG51};
STICKLINE(CURRBARSCOUNT=CONST(T1) OR CURRBARSCOUNT=CONST(A)+1,CONST(L2),CONST(H2),0,0),COLORBLUE{XG51};
STICKLINE(RANGE(CURRBARSCOUNT,CONST(T1)+1,CONST(T2)),CONST(H3),CONST(H3),8,0),COLORBLUE{XG51};
STICKLINE(RANGE(CURRBARSCOUNT,CONST(T1)+1,CONST(T2)),CONST(L3),CONST(L3),8,0),COLORBLUE{XG51};
STICKLINE(CURRBARSCOUNT=CONST(T2) OR CURRBARSCOUNT=CONST(T1)+1,CONST(L3),CONST(H3),0,0),COLORBLUE{XG51};
STICKLINE(RANGE(CURRBARSCOUNT,CONST(T2)+1,CONST(T3)),CONST(H4),CONST(H4),8,0),COLORBLUE{XG51};
STICKLINE(RANGE(CURRBARSCOUNT,CONST(T2)+1,CONST(T3)),CONST(L4),CONST(L4),8,0),COLORBLUE{XG51};
STICKLINE(CURRBARSCOUNT=CONST(T3) OR CURRBARSCOUNT=CONST(T2)+1,CONST(L4),CONST(H4),0,0),COLORBLUE{XG51};
STICKLINE(RANGE(CURRBARSCOUNT,CONST(T3)+1,CONST(T4)),CONST(H5),CONST(H5),8,0),COLORBLUE{XG51};
STICKLINE(RANGE(CURRBARSCOUNT,CONST(T3)+1,CONST(T4)),CONST(L5),CONST(L5),8,0),COLORBLUE{XG51};
STICKLINE(CURRBARSCOUNT=CONST(T4) OR CURRBARSCOUNT=CONST(T3)+1,CONST(L5),CONST(H5),0,0),COLORBLUE{XG51};
STICKLINE(RANGE(CURRBARSCOUNT,CONST(T4)+1,CONST(T5)),CONST(H6),CONST(H6),8,0),COLORBLUE{XG51};
STICKLINE(RANGE(CURRBARSCOUNT,CONST(T4)+1,CONST(T5)),CONST(L6),CONST(L6),8,0),COLORBLUE{XG51};
STICKLINE(CURRBARSCOUNT=CONST(T5) OR CURRBARSCOUNT=CONST(T4)+1,CONST(L6),CONST(H6),0,0),COLORBLUE{XG51};
STICKLINE(RANGE(CURRBARSCOUNT,CONST(T5)+1,CONST(T6)),CONST(H7),CONST(H7),8,0),COLORBLUE{XG51};
STICKLINE(RANGE(CURRBARSCOUNT,CONST(T5)+1,CONST(T6)),CONST(L7),CONST(L7),8,0),COLORBLUE{XG51};
STICKLINE(CURRBARSCOUNT=CONST(T6) OR CURRBARSCOUNT=CONST(T5)+1,CONST(L7),CONST(H7),0,0),COLORBLUE{XG51};
STICKLINE(RANGE(CURRBARSCOUNT,CONST(T6)+1,CONST(T7)),CONST(H8),CONST(H8),8,0),COLORBLUE{XG51};
STICKLINE(RANGE(CURRBARSCOUNT,CONST(T6)+1,CONST(T7)),CONST(L8),CONST(L8),8,0),COLORBLUE{XG51};
STICKLINE(CURRBARSCOUNT=CONST(T7) OR CURRBARSCOUNT=CONST(T6)+1,CONST(L8),CONST(H8),0,0),COLORBLUE{XG51};
STICKLINE(RANGE(CURRBARSCOUNT,CONST(T7)+1,CONST(T8)),CONST(H9),CONST(H9),8,0),COLORBLUE{XG51};
STICKLINE(RANGE(CURRBARSCOUNT,CONST(T7)+1,CONST(T8)),CONST(L9),CONST(L9),8,0),COLORBLUE{XG51};
STICKLINE(CURRBARSCOUNT=CONST(T8) OR CURRBARSCOUNT=CONST(T7)+1,CONST(L9),CONST(H9),0,0),COLORBLUE{XG51};
STICKLINE(RANGE(CURRBARSCOUNT,CONST(T8)+1,CONST(T9)),CONST(H10),CONST(H10),8,0),COLORBLUE{XG51};
STICKLINE(RANGE(CURRBARSCOUNT,CONST(T8)+1,CONST(T9)),CONST(L10),CONST(L10),8,0),COLORBLUE{XG51};
STICKLINE(CURRBARSCOUNT=CONST(T9) OR CURRBARSCOUNT=CONST(T8)+1,CONST(L10),CONST(H10),0,0),COLORBLUE{X-G-5+1-C-N-{};