通达信主力控盘资金RSI选股公式源码(附图)

拾荒网 2125 0

 

 

RSI:=(SMA(MAX(CLOSE-REF(CLOSE,1),0),5,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100)+150;

主力筹码:100*WINNER(CLOSE*0.95),LINETHICK0,COLORFFFFFF;

A1:=CAPITAL/1000;

净流入:=VOL/A1,LINETHICK2,COLOR00FFFF;

净流动向:=(净流入-REF(净流入,1));

 

N3:=BARSLAST(CROSS(C,MA(C,20)));

N4:=BARSLAST((MA(C,20)-C)>0);

黑马跟踪:IF(N3<N4,N3+1,0),COLOR00FF00,LINETHICK0;

黑马:=IF(黑马跟踪>=1,黑马跟踪+300,300),COLOR0000FF,LINETHICK2;

黑马趋势:DRAWBAND(黑马,RGB(204,51,51),300,RGB(0,179,0));

 

VAR01:=(CLOSE*2+HIGH+LOW)*2;

VAR02:=EMA(VAR01,13)-EMA(VAR01,34);

VAR03:=EMA(VAR02,5);

主力控盘:((VAR02-VAR03)*20)-200,COLORFF00FF,LINETHICK2;

STICKLINE(主力控盘>=-200,主力控盘,-200,2,0),COLORRED;

STICKLINE(主力控盘<-200,主力控盘,-200,2,0),COLORGREEN;

 

V1:=(C*2+H+L)*500;

V2:=EMA(V1,13)-EMA(V1,34);

V3:=EMA(V2,5);

V4:=(V2-V3);

庄家秘密撤:=IF(V4<=0,V4,0)/10,COLOR00FF00,LINETHICK2;

庄家秘密进:IF(V4,V4,0)/10,COLORFF00FF,LINETHICK2;

STICKLINE(庄家秘密进>0,庄家秘密进,0,1,1),COLORFF66FF;

STICKLINE(庄家秘密撤<0,0,庄家秘密撤,1,1),COLORFFFF80;

 

RSV1:=(CLOSE-LLV(LOW,38))/(HHV(HIGH,38)-LLV(LOW,38))*250;

长K:SMA(RSV1,5,1),COLORRED;

长D:SMA(长K,10,1),COLOR66CC33;

STICKLINE(长K>长D,长K,长D,2,1),COLORRED;

STICKLINE(长K<=长D,长K,长D,2,1),COLOR669933;

STICKLINE(长K>=长D AND长K<REF(长K,1),长K,长D,2,1),COLORFF00FF;

STICKLINE(长K<=长D AND长K>REF(长K,1),长K,长D,2,1),COLORFFFF00;

 

RSV2:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*300;

K1:=SMA(RSV2,3,1);

D1:=SMA(K1,3,1);

J:=3*K1-2*D1;

庄筹线:=EMA(J,6)*2,COLORFFFFFF,LINETHICK2;

庄线动向:庄筹线-REF(庄筹线,1),COLORFFFF00,LINETHICK2;

 

A:=VOL*CLOSE;

B:=SUM(A,1)/SUM(VOL,1);

B12:=EMA(B,17);

资金:=(B-B12)*500/B,COLORRED,LINETHICK4;

资金1:IF(资金>0,-资金+270,270),COLORFF00FF,LINETHICK2;

主力资金:-(资金1-270),LINETHICK0;

资金动向:=-(资金1-REF(资金1,1)),LINETHICK0;

STICKLINE(资金1<270,270,资金1,0,-1),COLOR00FFFF;

 

买线:=EMA(C,2),LINETHICK0;

卖线:=EMA(SLOPE(C,21)*20+C,42),LINETHICK0;

STICKLINE(CROSS(买线,卖线),290,330,2,0),COLORFF00FF;

STICKLINE(CROSS(卖线,买线),290,330,2,0),COLOR00FF00;

 

MTM:=C-REF(C,1);

ZLGJ:=400*EMA(EMA(MTM,9),9)/EMA(EMA(ABS(MTM),9),9),COLORWHITE;

MAZL:=MA(ZLGJ,3),COLORYELLOW,LINETHICK2;

主力轨迹1:EMA(ZLGJ,7),COLORFFFFFF;

主力轨迹2:EMA(MAZL,7),COLOR00FFFF,LINETHICK1;

OOO:=主力轨迹1-主力轨迹2;

STICKLINE(OOO>0,主力轨迹1,主力轨迹2,4,1),COLORRED;

STICKLINE(OOO<0,主力轨迹1,主力轨迹2,4,1),COLORGREEN;

 

VAR2:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;

VAR3:=SMA(SMA(VAR2,3,1),3,1)/28.57;

VAR4:=EMA(VAR3,5);

VAR5:=3*VAR3-2*VAR4;

底部:=CROSS(VAR5,VAR3) AND VAR3<2.1AND C>O;

STICKLINE(底部,-50,0,2,1),COLORFFFFFF;

DRAWTEXT(底部,-51,'底'),COLORFFFFFF;

 

A11:=(3*C+L+O+H)/6;

X:=(20*A11+19*REF(A11,1)+18*REF(A11,2)+17*REF(A11,3)+16*REF(A11,4)+

15*REF(A11,5)+14*REF(A11,6)+13*REF(A11,7)+12*REF(A11,8)+11*REF(A11,9)+

10*REF(A11,10)+9*REF(A11,11)+8*REF(A11,12)+7*REF(A11,13)+6*REF(A11,14)+

5*REF(A11,15)+4*REF(A11,16)+3*REF(A11,17)+2*REF(A11,18)+REF(A11,20))/210;

工作线:=EMA(CLOSE,17),COLORCYAN;

认同线:=EMA(X,13),COLORMAGENTA;

庄家成本:=EMA(X,13),COLORFF00FF,LINETHICK2;

MA2:=MA(C,庄家成本);

STICKLINE(C>=庄家成本,270,290,2,0),COLORRED;

STICKLINE(C<庄家成本,270,290,2,0),COLOR00FF00;

DRAWTEXT(CROSS(C,庄家成本),290,'持股'),COLORFFFFFF;

 

选股100:IF(CROSS(长K,长D) ,100,0),COLORFFFFFF,LINETHICK1;