通达信红兰带趋势未加密选股指标公式源码

源码正文：

分水岭: dma(ema(CLOSE,12),SUM(vol,5)/3/CAPITAL),COLOR00FFFF,LINETHICK2{XG51};
CCC:C,COLORFFFFFF{XG51};
UPPER : ma(CLOSE,14)*1.06,POINTDOT,COLORFF99FF,LINETHICK2{XG51};
LOWER : MA(CLOSE,14)*0.94,POINTDOT,COLORFF00FF,LINETHICK2{XG51};
MID:(UPPER+LOWER)/2,NODRAW,COLOR00FFFF,LINETHICK1{XG51};
VAR1:=(2*CLOSE+HIGH+LOW+OPEN)/5{XG51};
A1: (EMA(VAR1,1)+EMA(VAR1,2)+EMA(VAR1,3)+EMA(VAR1,4))/4,COLORGREEN,LINETHICK1{XG51};
W1:=(EMA(VAR1,1)+EMA(VAR1,2)+EMA(VAR1,3)+EMA(VAR1,4))/4{XG51};
A2: EMA(A1,2),COLORGREEN,LINETHICK1{XG51};
W2:=EMA(A1,2){XG51};
A3: EMA(A2,2),COLORGREEN,LINETHICK1{XG51};
W3:=EMA(A2,2){XG51};
A4: EMA(A3,2),COLORGREEN,LINETHICK1{XG51};
W4:=EMA(A3,2){XG51};
A5: EMA(A4,2),COLORGREEN,LINETHICK1{XG51};
W5:=EMA(A4,2){XG51};
A6: EMA(A5,2),COLORGREEN,LINETHICK1{XG51};
W6:= EMA(A5,2){XG51};
A7: EMA(A6,2),COLORGREEN,LINETHICK1{XG51};
W7:= EMA(A6,2){XG51};
IF(W1>REF(W1,1),A1,DRAWNULL),COLORWHITE,LINETHICK1{XG51};
IF(W2>REF(W2,1),A2,DRAWNULL),COLORWHITE,LINETHICK1{XG51};
IF(W2>REF(W3,1),A3,DRAWNULL),COLORWHITE,LINETHICK1{XG51};
IF(W2>REF(W4,1),A4,DRAWNULL),COLORWHITE,LINETHICK1{XG51};
IF(W2>REF(W5,1),A5,DRAWNULL),COLORWHITE,LINETHICK1{XG51};
IF(W2>REF(W6,1),A6,DRAWNULL),COLORWHITE,LINETHICK1{XG51};
IF(W2>REF(W7,1),A7,DRAWNULL),COLORWHITE,LINETHICK1{XG51};
DRAWICON(crOSS(CCC,LOWER ) AND CROSS(CCC,A3 ),LOWER,23){XG51};
DRAWICON(CROSS(UPPER,CCC),UPPER,15){XG51};
DRAWTEXT(CROSS(CCC,UPPER),UPPER,'A'),COLORBLUE{X~G-5-1~C~N~{};

源码正文：

RSV:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100{XG51};
K1:=SMA(RSV,3,1){XG51};
D1:=Sma(K1,3,1){XG51};
KK:=INTPART(K1){XG51};
DD:=INTPART(D1){XG51};
TFXXS:=KK+DD{XG51};
TGLXS:=(TFXXS-REF(TFXXS,1)){XG51};
换手率:vol/CAPITAL*100,LINETHICK0{XG51};
看好点位找背离:MA(TFXXS,5)-换手率{XG51};
点位留给有心人:MA(TFXXS,15)+换手率{XG51};
stICKLINE(TGLXS>0 AND TGLXS>REF(TGLXS,1),100,TGLXS+100,2.5,0),COLOR0000AA{XG51};
STICKLINE(TGLXS>0 AND TGLXS>REF(TGLXS,1),100,TGLXS+100,1.5,0),COLOR0022CC{XG51};
STICKLINE(TGLXS>0 AND TGLXS>REF(TGLXS,1),100,TGLXS+100,0.5,0),COLOR0055FF{XG51};
STICKLINE(TGLXS<0 AND TGLXS>REF(TGLXS,1),100,TGLXS+100,2.5,0),COLORAA00BB{XG51};
STICKLINE(TGLXS<0 AND TGLXS>REF(TGLXS,1),100,TGLXS+100,1.5,0),COLORCC22BB{XG51};
STICKLINE(TGLXS<0 AND TGLXS>REF(TGLXS,1),100,TGLXS+100,0.5,0),COLORFF55BB{XG51};
STICKLINE(TGLXS>0 AND TGLXS<=REF(TGLXS,1),100,TGLXS+100,2.5,0),COLOR00AAFF{XG51};
STICKLINE(TGLXS>0 AND TGLXS<=REF(TGLXS,1),100,TGLXS+100,1.5,0),COLOR00CCFF{XG51};
STICKLINE(TGLXS>0 AND TGLXS<=REF(TGLXS,1),100,TGLXS+100,0.5,0),COLOR00FFFF{XG51};
STICKLINE(TGLXS<0 AND TGLXS<=REF(TGLXS,1),100,TGLXS+100,2.5,0),COLORFF7700{XG51};
STICKLINE(TGLXS<0 AND TGLXS<=REF(TGLXS,1),100,TGLXS+100,1.5,0),COLORFFAA22{XG51};
STICKLINE(TGLXS<0 AND TGLXS<=REF(TGLXS,1),100,TGLXS+100,0.5,0),COLORFFFF55{XG51};
STICKLINE(TGLXS=0 AND REF(TGLXS,1)>=0,100,TGLXS+100,8,0),COLORGRAY{XG51};
STICKLINE(TGLXS=0 AND REF(TGLXS,1)<0,100,TGLXS+100,8,0),COLORRED{X=G_5-1=C=N={};