筹码集中度顶底，顶底监控

强弱分界: 50,coloryellow;

主持仓:EMA(100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3),colormagenta ,linethick2;

主力筹码集中度:WINNER(C)*100 ,colorgreen,linethick2;

底部警戒: 10,colorred,LINETHICK2;

STICKLINE(主力筹码集中度<=10,0,20,8,0),COLOR008364;

STICKLINE(CROSS(主力筹码集中度,底部警戒),0,30,8,0),colorred;

顶部警戒: 80,COLORFFBB66,LINETHICK2;

STICKLINE(主力筹码集中度>=85,100,80,8,0),STICK,COLORF00FF0;

STICKLINE(CROSS(顶部警戒,主力筹码集中度),100,70,8,0),COLORFFF66;

STICKLINE(主持仓>=80,80,主持仓,8,0),STICK,coloryellow;

STICKLINE(REF(主力筹码集中度,1)<主力筹码集中度,主力筹码集中度,REF(主力筹码集中度,1),8,0),COLORFF00F0;

STICKLINE(REF(主持仓,1)<主持仓,主持仓,REF(主持仓,1),8,0),COLORFF00F0;

M:=55;

N:=34;

LC:=REF(CLOSE,1);

RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);

FF:=EMA(CLOSE,3);

MA15:=EMA(CLOSE,21);

DRAWTEXT(CROSS(85,RSI),75,'▼'),colorgreen;

VAR1:=IF(YEAR>=2038 AND MONTH>=1,0,1);

VAR2:=REF(LOW,1)*VAR1;

VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100*VAR1;

VAR4:=EMA(IF(CLOSE*1.3,VAR3*10,VAR3/10),3)*VAR1;

VAR5:=LLV(LOW,30)*VAR1;

VAR6:=HHV(VAR4,30)*VAR1;

VAR7:=IF(MA(CLOSE,58),1,0)*VAR1;

VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7*VAR1;

吸筹:IF(VAR8>100,100,VAR8)*VAR1,colorred;

庄家吸筹:STICKLINE(吸筹>-150,0,吸筹,8,0),colorred;

散户: 1*(HHV(HIGH,M)-CLOSE)/(HHV(HIGH,M)-LLV(LOW,M));

RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;

K:=SMA(RSV,3,1);

D:=SMA(K,3,1);

J:=3*K-2*D;

VARF:=100-3*SMA((CLOSE-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1),15,1);

VAR19:=100-3*SMA((OPEN-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1),15,1);

VAR20:=VARF<REF(VAR19,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);

大资金活动:IF(VAR20 AND COUNT(VAR20,30)=1,18,0),LINETHICK1,colorred;

STICKLINE(VAR20 AND COUNT(VAR20,30)=1,0,15,10,0),colorred;

DRAWTEXT(VAR20 AND COUNT(VAR20,30)=1,15,'大资金活动'),colorred;