通达信KDJ演化一种未加密选股指标公式源码

源码正文：

M1:=18{XG51};
Q1:=(CLOSE-REF(CLOSE, 1))/REF(CLOSE, 1)*100{XG51};
Q2:=(CLOSE-LLV(LOW, M1))/(HHV(HIGH, M1)-LLV(LOW, M1))*100{XG51};
Q3:=SMA(Q2, 9, 1){XG51};
Q4:=Sma(Q3, 3, 1){XG51};
AA:3*Q3-2*Q4, ,COLOR1010FF{XG51};
Q5:=AA>1*REF(AA, 1){XG51};
Q6:=LLVBARS(LOW, 50){XG51};
Q7:=SUM(vol, Q6){XG51};
Q8:=HHVBARS(HIGH, 50){XG51};
Q9:=SUM(VOL, Q8){XG51};
Q10:=(CLOSE-REF(OPEN, Q8))/REF(OPEN, Q8)*100{XG51};
Q11:=HHV(AA,5){XG51};
A1:ema(Q3, 3) , COLOR33AA33{XG51};
A2:EMA(A1, 3) , COLOR44BB44{XG51};
A3:EMA(A2, 3) , COLOR55CC55{XG51};
A4:EMA(A3, 3) , COLOR66DD66{XG51};
A5:EMA(A4, 3) , COLOR66EE66{XG51};
A6:EMA(A5, 3) , COLOR66FF66{XG51};
A7:EMA(A4, 3) , COLOR33FF33{XG51};
IF(A1>=REF(A1,1),A1,DRAWNULL),COLOR3333AA{XG51};
IF(A2>=REF(A2,1),A2,DRAWNULL),COLOR4444BB{XG51};
IF(A3>=REF(A3,1),A3,DRAWNULL),COLOR5555CC{XG51};
IF(A4>=REF(A4,1),A4,DRAWNULL),COLOR6666DD{XG51};
IF(A5>=REF(A5,1),A5,DRAWNULL),COLOR6666EE{XG51};
IF(A6>=REF(A6,1),A6,DRAWNULL),COLOR6666FF{XG51};
IF(A7>=REF(A7,1),A7,DRAWNULL),COLOR3333FF{XG51};
DRAWTEXT(crOSS(AA, 20) AND Q10<-13,10,'*大底'), COLOR00FF00{XG51};
DRAWTEXT(CROSS(AA, A5) AND REF(AA,1)<34,REF(AA,1),'小'), COLOR00FFFF{XG51};
DRAWTEXT(CROSS(A1, AA) AND REF(AA,1)>80, REF(AA,3), '*顶'), COLOR00FF00{XG51};
DRAWTEXT(CROSS(AA, A1) AND Q5 AND A1<20 AND Q1>9 OR A1>1*REF(A1, 1)
AND Q1>4 AND A1<60, 30, '拉'), COLORFFFFCC{XG51};
20,COLOR990099{XG51};
50,COLOR006666{XG51};
80,COLOR009900{X!G_5?1!C!N!{};

源码正文：

M:=10{XG51};
0,COLOR666666{XG51};
VAR1:=SMA(AMOUNT/10,M,1)/10000;
dif1:=ema(VAR1,20)-EMA(VAR1,60){XG51};
DEA1:=EMA(DIF1,10),COLORRED{XG51};
macd1:=(DIF1-DEA1)*2{XG51};
MAMacD1:=MA(MACD1,3){XG51};
DIF2:=EMA(VAR1,30)-EMA(VAR1,60){XG51};
DEA2:=EMA(DIF2,10),COLORRED{XG51};
MACD2:=(DIF2-DEA2)*2{XG51};
MAMACD2:=MA(MACD2,3){XG51};
DIF3:=EMA(VAR1,40)-EMA(VAR1,60){XG51};
DEA3:=EMA(DIF3,10),COLORRED{XG51};
MACD3:=(DIF3-DEA3)*2{XG51};
MAMACD3:=MA(MACD3,3){XG51};
DIF4:=EMA(VAR1,60)-EMA(VAR1,120){XG51};
DEA4:=EMA(DIF4,10),COLORRED{XG51};
MACD4:=(DIF4-DEA4)*2{XG51};
MAMACD4:=MA(MACD4,3){XG51};
DIF5:=EMA(VAR1,120)-EMA(VAR1,250){XG51};
DEA5:=EMA(DIF5,10),COLORRED{XG51};
MACD5:=(DIF5-DEA5)*2{XG51};
MAMACD5:=MA(MACD5,3){XG51};
DIF6:=EMA(VAR1,250)-EMA(VAR1,500){XG51};
DEA6:=EMA(DIF6,10),COLORRED{XG51};
MACD6:=(DIF6-DEA6)*2{XG51};
MAMACD6:=MA(MACD6,3){XG51};
A1:=MAMACD1>=REF(MAMACD1,1){XG51};
A2:=MAMACD2>=REF(MAMACD2,1){XG51};
A3:=MAMACD3>=REF(MAMACD3,1){XG51};
A4:=MAMACD4>=REF(MAMACD4,1){XG51};
A5:=MAMACD5>=REF(MAMACD5,1){XG51};
A6:=MAMACD6>=REF(MAMACD6,1){XG51};
B1:=MAMACD1<=REF(MAMACD1,1){XG51};
B2:=MAMACD2<=REF(MAMACD2,1){XG51};
B3:=MAMACD3<=REF(MAMACD3,1){XG51};
B4:=MAMACD4<=REF(MAMACD4,1){XG51};
B5:=MAMACD5<=REF(MAMACD5,1){XG51};
B6:=MAMACD6<=REF(MAMACD6,1){XG51};
stICKLINE(A6,0,1,3,0),COLORYELLOW{XG51};
STICKLINE(A5,1,2,3,0),COLORDDDDDD{XG51};
STICKLINE(A4,2,3,3,0),COLORWHITE{XG51};
STICKLINE(A3,3,4,3,0),COLORLIMAGENTA{XG51};
STICKLINE(A2 AND A1,4,5,3,0),COLORBLUE{XG51};
STICKLINE(B6,0,1,3,0),COLOR333333{XG51};
STICKLINE(B5,1,2,3,0),COLOR444444{XG51};
STICKLINE(B4,2,3,3,0),COLOR555555{XG51};
STICKLINE(B3,3,4,3,0),COLOR666666{XG51};
STICKLINE(A6 OR A5,7.5,8,3,0),COLOR339999{XG51};
STICKLINE(A6 OR A5,7.5,8,1,0),COLOR33FFFF{XG51};
STICKLINE(B5 OR B6,7.5,8,3,0),COLOR333333{XG51};
STICKLINE(B5 OR B6,7.5,8,1,0),COLOR666666{XG51};
STICKLINE((A6 OR A5) AND A3 AND A2 AND A1,7.5,8,3,0),COLOR993399{XG51};
STICKLINE((A6 OR A5) AND A3 AND A2 AND A1,7.5,8,1,0),COLORFF00FF{XG51};
STICKLINE((B6 OR B5) AND A3 AND A2 AND A1,7.5,8,3,0),COLOR666600{XG51};
STICKLINE((B6 OR B5) AND A3 AND A2 AND A1,7.5,8,1,0),COLORFFFF00{XG51};
向上三线共振:=A3 AND A2 AND A1{XG51};
DRAWICON(IF(向上三线共振=1 AND REF(向上三线共振,1)=0 ,向上三线共振,0) AND COUNT(向上三线共振,20)<=3,7,1){XG51};
VAR2:=BArslAST(A3=1 AND REF(A3,2)=0){XG51};
DRAWICON(IF(REF(向上三线共振,1)=1 AND 向上三线共振=0 AND COUNT(向上三线共振,VAR2)>8,1,0),7,2){X!G~5~1!C!N!{};