同花顺主力筹码副图源码 EA

DRAWGBK(DATE>900103,STRIP(RGB(0,110,150),RGB(0,20,40),1));
r重心:=(2*CLOSE+HIGH+LOW+OPEN)/5;
r BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
r偏差量:=重心-BBI;
r RSV:=(偏差量-LLV(偏差量,9))/(HHV(偏差量,9)-LLV(偏差量,9))*100;
r K:=SMA(RSV,3,1),ColorFF2B95,Linethick0;
r d:SMA(K,3,1),Color42B1E8,Linethick0;
r 100,POINTDOT,ColorFFFFFF,Linethick5;
r VAR2:=REF(LOW,1);
r VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100;
r VAR4:=EMA(IF(CLOSE*1.3,VAR3*10,VAR3/10),3);
r VAR5:=LLV(LOW,13);
r VAR6:=HHV(VAR4,13);
r VAR7:=IF(MA(CLOSE,34),1,0);
r VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7;
r VAR9:=IF(VAR8>100,100,VAR8);
r吸筹:
rSTICKLINE(VAR9>-120,0,VAR9,8,0),color00AAFF;
r STICKLINE(VAR9>-120,0,VAR9,7,0),color00BBFF;
r STICKLINE(VAR9>-120,0,VAR9,6,0),color00CCFF;
r STICKLINE(VAR9>-120,0,VAR9,5,0),color00DDFF;
r STICKLINE(VAR9>-120,0,VAR9,4,0),color00EEFF;
r STICKLINE(VAR9>-120,0,VAR9,1,0),color00FFFF;
r通天柱:=IF(CROSS(k,d),100,0),Linethick0;
r STICKLINE(通天柱,0,100,8,0),color0000AA;
r STICKLINE(通天柱,0,100,7,0),color0000BB;
r STICKLINE(通天柱,0,100,6,0),color0000CC;
r STICKLINE(通天柱,0,100,5,0),color0000DD;
r STICKLINE(通天柱,0,100,4,0),color0000EE;
r STICKLINE(通天柱,0,100,3,0),color0000FF;
r彻地柱:=IF(CROSS(d,k),100,0),Linethick0;
r STICKLINE(彻地柱,0,100,8,0),colorFF0000;
r STICKLINE(彻地柱,0,100,7,0),colorFF3300;
r STICKLINE(彻地柱,0,100,6,0),colorFF5500;
r STICKLINE(彻地柱,0,100,5,0),colorFF7700;
r STICKLINE(彻地柱,0,100,4,0),colorFF9900;
r STICKLINE(彻地柱,0,100,3,0),colorFFBB00;
r STICKLINE(彻地柱,0,100,2,0),colorFFDD00;
r FILLRGN(d,REF(d,2),d>REF(d,2),RGB(255,255,0),d<REF(d,2),RGB(0,255,0));

r