同花顺冷暖KDJ未加密选股指标公式源码

同花顺冷暖KDJ未加密选股指标公式源码

源码正文：

N:=9;
M1:=3;
M2:=3;
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:SMA(RSV,M1,1);
D:Sma(K,M2,1);
J:3*K-2*D;
D: ema(0.667*REF(K,1)+0.333*K,2),colorgreen,LINETHICK1;
TT:=(2*CLOSE+OPEN+HIGH+LOW);
主导动能:TT/EMA(TT,4)-1,COLORstICK;
FF:=主导动能;
STICKLINE(FF,0,FF,3.2,0),COLOR33CFDD;
STICKLINE(FF,0,FF,2.8,0),COLOR33DFDD;
STICKLINE(FF,0,FF,2,0),COLOR33EFDD;
STICKLINE(FF,0,FF,1,0),COLOR33FFDD;
STICKLINE(FF<0,0,FF,3.2,0),COLOR00CC00;
STICKLINE(FF<0,0,FF,2.8,0),COLOR00DD00;
STICKLINE(FF<0,0,FF,2,0),COLOR00EE00;
STICKLINE(FF<0,0,FF,1,0),COLOR00FF00;
STICKLINE(FF>REF(FF,1)AND FF<0,0,FF,3.2,0),COLORFF9900;
STICKLINE(FF>REF(FF,1)AND FF<0,0,FF,2.8,0),COLORFFAA00;
STICKLINE(FF>REF(FF,1)AND FF<0,0,FF,2,0),COLORFFBB00;
STICKLINE(FF>REF(FF,1)AND FF<0,0,FF,1,0),COLORFFCC00;
STICKLINE(FF>REF(FF,1)AND FF>0,0,FF,3.2,0),COLOR0000CC;
STICKLINE(FF>REF(FF,1)AND FF>0,0,FF,2.8,0),COLOR0000DD;
STICKLINE(FF>REF(FF,1)AND FF>0,0,FF,2,0),COLOR0000EE;
STICKLINE(FF>REF(FF,1)AND FF>0,0,FF,1,0),COLOR0000FF;
A:=EMA(C,14),colorwhite,LINETHICK1;
B:=(A-REF(A,1))/REF(A,1)*100,NODRAW;
支撑:IF(B>=0,REF(EMA(C,14),BArslAST(crOSS(B,0))+1),DRAWNULL),colorred,LINETHICK2;
阻力:IF(B<0,REF(EMA(C,14),BARSLAST(CROSS(0,B))+1),DRAWNULL),colorgreen,LINETHICK2;
MA3:MA(C,2);
MA5:MA(C,5);
DRAWGBK(C<MA(C,9),STRIP(RGB(0,100,0),RGB(0,100,0),1));
DRAWGBK(C>MA(C,9)AND C/MA(C,9)<1.10,STRIP(RGB(100,0,0),RGB(100,0,0),1));
DRAWGBK(C/MA(C,9)>1.1,STRIP(RGB(120,0,120),RGB(120,0,120),1));
短趋势线:MA(CLOSE,13),colorred,LINETHICK2;
涨:IF(短趋势线>REF(短趋势线,1),短趋势线,DRAWNULL),colorred,LINETHICK2;
平:=IF(短趋势线=REF(短趋势线,1),短趋势线,DRAWNULL),COLOR00FFFF,LINETHICK2;
跌:IF(短趋势线<REF(短趋势线,1),短趋势线,DRAWNULL),COLOR80FF00,LINETHICK2;

同花顺背离出黑马未加密选股指标公式源码

源码正文：

difF:ema(CLOSE,8) - Ema(CLOSE,24);
DEA:EMA(DIFF,6);
macd:2*(DIFF-DEA),COLORstICK,colorbrown;
A1:=BArslAST(REF(crOSS(DIFF,DEA),1));
B1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)<DIFF AND CROSS(DIFF,DEA);
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;
LC:=REF(CLOSE,1);
rsi1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(Abs(CLOSE-LC),6,1)*100;
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;
A2:=BARSLAST(REF(CROSS(K,D),1));
B2:=REF(C,A2+1)>C AND REF(K,A2+1)<K AND CROSS(K,D);
A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));
B3:=REF(C,A3+1)>C AND REF(RSI1,A3+1)<RSI1 AND CROSS(RSI1,RSI2);
C1:=BARSLAST(REF(CROSS(DEA,DIFF),1));
D1:=REF(C,C1+1)<C AND REF(DIFF,C1+1)>DIFF AND CROSS(DEA,DIFF);
C2:=BARSLAST(REF(CROSS(D,K),1));
D2:=REF(C,C2+1)<C AND REF(K,C2+1)>K AND CROSS(D,K);
C3:=BARSLAST(REF(CROSS(RSI2,RSI1),1));
D3:=REF(C,C3+1)<C AND REF(RSI1,C3+1)>RSI1 AND CROSS(RSI2,RSI1);
LL:= CONST(LLV(MacD, 180));
HH:= CONST(HHV(MACD, 180));
MACD底背:IF(B1>0, 1,0),NODRAW,colorred;
RSI底背:IF(B3>0, 1,0),NODRAW,COLORPURPLE;
kdj底背:IF(B2>0, 1,0),NODRAW,COLORFF00FF;
MACD顶背:IF(D1>0, 1,0),NODRAW,COLOR00FF00;
kdJ顶背:IF(D2>0, 1,0),NODRAW,COLORFFCC66;
RSI顶背:IF(D3>0,1,0),NODRAW,colorblack;
STICKLINE(B1>0, LL,0,2,0), colorred;
STICKLINE(B2>0, LL * 0.75 ,0,2,0), COLORFF00FF;
STICKLINE(B3>0, LL * 0.5, 0,2,0), COLORPURPLE;
STICKLINE(D1>0,0,HH,2,0), COLOR00FF00;
STICKLINE(D2>0,0,HH * 0.75,2,0), COLORFFCC66;
STICKLINE(D3>0,0,HH * 0.75,2,0), colorblack;
M1 := EMA( CLOSE, 9 );
M2 := EMA( CLOSE, 18 );
MD : M1 - M2, colorwhite, LINETHICK3;
MM := EMA( MD, 3 );
吸 : IF( MD >= MM AND MD < 0, MD, DRAWNULL ), colorlired, LINETHICK3;
拉 : IF( MD >= MM AND MD >= 0, MD, DRAWNULL ), colorred, LINETHICK3;
派 : IF( MD < MM AND MD >= 0, MD, DRAWNULL ), colorgreen, LINETHICK3;
落 : IF( MD < MM AND MD < 0, MD, DRAWNULL ), colorwhite, LINETHICK3;
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
MACD:=2*(DIFF-DEA/2);
AH:=HHV(MACD,13*1);
AL:=LLV(MACD,13*0.3);
STICKLINE(MACD>0 ,MACD,0,1,0),COLOR0000AA,LINETHICK1;
STICKLINE(MACD<0 ,MACD,0,1,0),COLOR008800,LINETHICK1;
趋势线:=EMA(MACD,34,1);
PARTLINE(趋势线,趋势线>REF(趋势线,1),RGB(255,255,0),趋势线<REF(趋势线,1),RGB(0,80,255)),LINETHICK1;
FILLRGN(趋势线,REF(趋势线,1),趋势线>REF(趋势线,1),RGB(255,255,0),趋势线<=REF(趋势线,1),RGB(0,88,255));
K:=SMA(MACD,2,1);
D:=SMA(K,2,1);
J:SMA(D,2,1);
STICKLINE(MACD>0,0.000001,0.000003,15,0),colorred;
STICKLINE(MACD<0,0.000001,0.000003,15,0),colorgreen;
PARTLINE(K,K>REF(K,1),RGB(255,0,0),K<REF(K,1),RGB(0,255,0)),LINETHICK1;
PARTLINE(D,D>REF(D,1),RGB(255,0,0),D<REF(D,1),RGB(0,255,0)),LINETHICK1;
PARTLINE(J,J>REF(J,1),RGB(255,0,0),J<REF(J,1),RGB(0,255,0)),LINETHICK2;
STICKLINE(REF(MACD,1)<MACD,MACD,REF(MACD,1),7,0),coloryellow;
STICKLINE(MACD=AH,AH,K,8,0),LINETHICK1,colorred;
STICKLINE(REF(MACD,2)>MACD,MACD,REF(MACD,1),8,1),colorgreen;