同花顺主力筹码副图源码

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