ZLCM:=EMA(WINNER(CLOSE)*70,3);{//主力籌碼估算}
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);{//散戶籌碼估算}
ZSHTL:=SHCM/(ZLCM+SHCM)*200;{//散戶套牢籌碼比率}
ZZLKP:=ZLCM/(ZLCM+SHCM)*200;{//主力控盤籌碼比率}
ZCMZL:=MA(ZLCM+SHCM,13);{//市場籌碼總量}
ZZNTS:=BARSLAST(ZSHTL<90 AND REF(ZSHTL,1)>90);{//走牛天數(shù)}
ZSHJJ:=EMA(ZSHTL,89);{//散戶警戒}
ZZLJJ:=EMA(ZZLKP,89);{//主力警戒}
ZJLRQD:=INTPART(ZZLKP-ZZLJJ);{//資金流入強度}
SH8:=EMA(ZSHTL,8);
DKB:=IF(ZZLKP-REF(ZZLKP,1)>ZSHTL-REF(ZSHTL,1),1,0);
散戶套牢線1:=INTPART(ZSHTL),COLORFFEEBB,LINETHICK2;
主力控盤線1:=INTPART(ZZLKP),COLOR4D4DFF,LINETHICK2;
DRAWBAND(主力控盤線1,RGB(0,255,255),散戶套牢線1,RGB(50,50,50));
{柱狀線}
STICKLINE(((主力控盤線1>REF(主力控盤線1,1)) AND (主力控盤線1>100)),主力控盤線1,散戶套牢線1,2,0),COLOR8000FF;
散:INTPART(ZSHTL),COLORFFEEBB,LINETHICK2;
主力:INTPART(ZZLKP),COLOR4D4DFF,LINETHICK2;
{資金流入線:ZJLRQD,,COLOR7F00FF,LINETHICK2;
資金強弱線:15,COLORFF80FF,LINETHICK2,CROSSDOT;
控盤臨界線:55,COLORFF937F,LINETHICK2,CROSSDOT;
強勢控盤線:75,COLORFF3399,LINETHICK2,CROSSDOT;};
{主力監(jiān)控}
B1:=(HHV(H,35)-C)/(HHV(H,35)-LLV(LOW,35))*100-35;
B2:=SMA(B1,35,1)+100;
B3:=(C-LLV(L,35))/(HHV(H,35)-LLV(L,35))*100;
B4:=SMA(B3,3,1);
B5:=SMA(B4,3,1)+100;
B6:=B5-B2;
控盤程度:(IF(B6>1,B6-1,0))*2.5,COLORRED,LINETHICK2;
控盤度:100,COLORWHITE;
{柱狀線}
控盤上:IF(控盤程度>REF(控盤程度,1), 控盤程度,DRAWNULL),
STICK,COLORYELLOW,LINETHICK1;
控盤下:IF(控盤程度 STICK,COLORFF9900,LINETHICK1;
進:IF(控盤程度>REF(控盤程度,1),5,DRAWNULL),CIRCLEDOT,COLORYELLOW;
出:IF(控盤程度 {SAR}
持幣:IF(SAR(10,2,20)>=H,100,DRAWNULL),CIRCLEDOT,COLORBLUE;
持股:IF(SAR(10,2,20)<=L,100,DRAWNULL),CIRCLEDOT,COLORRED;