筹码能量图副图指标 源码 通达信 贴图

{筹码能量图}
DRAWGBK(1,RGB(1,1,1),RGB(1,1,1),0,'00',0);
 DRAWBAND(20,RGB(60,20,45),0,RGB(0,0,0));

主力筹码估算:=EMA(WINNER(CLOSE)*70,3),NODRAW;
散户筹码估算:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3),NODRAW;
主力控盘比率0:=主力筹码估算/(主力筹码估算+散户筹码估算)*100;
主力控盘比率:=IF(主力控盘比率0<-6,-6,IF(主力控盘比率0>100,100+SQRT(主力控盘比率0-100),主力控盘比率0));
市场总量:=MA(主力筹码估算+散户筹码估算,13),NODRAW;
散户套牢比率:=散户筹码估算/(主力筹码估算+散户筹码估算)*100,NODRAW;
散户警戒:=EMA(散户套牢比率,89);
主力警戒:EMA(主力控盘比率,89),COLORBLACK,LINETHICK4;

{主力控盘筹码}
 {粉}
STICKLINE(主力控盘比率>REF(主力控盘比率,1) AND 主力控盘比率>20,主力控盘比率,20,2,0 ),COLOR880099;
 {蓝}
STICKLINE(主力控盘比率<=REF(主力控盘比率,1) AND 主力控盘比率>20,主力控盘比率,20,2,0 ),COLORCC7700;
 {亮红}
STICKLINE(主力控盘比率>REF(主力控盘比率,1) AND 主力控盘比率<20,主力控盘比率,0,2,0 ),COLOR131FFD;
 {深蓝}
STICKLINE(主力控盘比率<=REF(主力控盘比率,1) AND 主力控盘比率<20,主力控盘比率,0,2,0 ),COLOR990000;
 STICKLINE(主力控盘比率>20,20,主力控盘比率,0,0),COLORAAAAAA;
 {主力筹码警戒}
 {黄}
STICKLINE(主力警戒>REF(主力警戒,1),主力控盘比率,主力警戒,2,0 ),COLOR0055DD;
 STICKLINE(主力警戒>REF(主力警戒,1),主力控盘比率,主力警戒,0.3,0 ),COLOR00AADD;
 {红}
STICKLINE(主力控盘比率>主力警戒 AND 主力警戒>50,主力控盘比率,主力警戒,2,0 ),COLOR0000AA;
 STICKLINE(主力控盘比率>主力警戒 AND 主力警戒>50,主力控盘比率,主力警戒,0.3,0 ),COLOR0055FF;
 {红}
STICKLINE(主力控盘比率>主力警戒 AND 主力警戒<50 AND 主力控盘比率>50 AND 主力警戒>REF(主力警戒,1),主力控盘比率,50,2,0 ),COLOR0000AA;
 STICKLINE(主力控盘比率>主力警戒 AND 主力警戒<50 AND 主力控盘比率>50 AND 主力警戒>REF(主力警戒,1),主力控盘比率,50,0.3 ,0 ),COLOR0055FF;
 STICKLINE(主力控盘比率<=10,主力控盘比率,0,4,0),COLORDD00DD;
 STICKLINE(REF(散户套牢比率,1)>90 AND 散户套牢比率<90,30,0,2.5,0),COLOR0000FF;

VAR11:=(HHV(HIGH,8)-CLOSE)/(HHV(HIGH,20)-LLV(LOW,20))*100;
 VAR33:=100-3*SMA((CLOSE-LLV(LOW,72))/(HHV(HIGH,72)-LLV(LOW,72))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,72))/(HHV(HIGH,72)-LLV(LOW,72))*100,20,1),15,1);
活筹OAMV:=EMA(VAR33,2);
做空资金:=EMA(EMA(SMA(VAR11,6,1)-7,2),2);
 WR线:=EMA(EMA(100*(HHV(HIGH,42)-CLOSE)/(HHV(HIGH,42)-LLV(LOW,42)),3),3);
 SBZLPA1:=BARSLAST(L=HHV(L,7));
 SBZLPA2:=EMA(SBZLPA1*SBZLPA1,13);
我心飞扬:=IF(SBZLPA2>88,88+SQRT(SBZLPA2-88),SBZLPA2);
 TPV:=(我心飞扬+做空资金+活筹OAMV)/3;
 T我心飞扬:=(我心飞扬+TPV)/2+8;
 T做空资金:=(做空资金+TPV)/2+8;
 T飞扬资金:=(T我心飞扬+T做空资金)/2;

WR慢:=EMA(EMA(100*(HHV(HIGH,42)-CLOSE)/(HHV(HIGH,42)-LLV(LOW,42)),2),2);
 ZLCQ:=EMA((WINNER(CLOSE) * 69),3);
 SHCQ:=EMA(((WINNER((CLOSE * 1.1)) - WINNER((CLOSE * 0.93))) * 80),3);
主力控盘Q:=EMA(((ZLCQ / (ZLCQ+ SHCQ)) * 110),2);
上限Q:=HHV(主力控盘Q,20);
下限Q:=LLV(主力控盘Q,20);
圈Q:=100*(HHV(HIGH,42)-C)/(HHV(HIGH,42)-LLV(LOW,42));
 M圈Q:=EMA(EMA(圈Q,3),2);
 MM圈Q:=EMA(EMA(EMA(圈Q,4),3),2);
控盘主升Q:=EMA(主力控盘Q,2);
 KONGQ0:=(上限Q/控盘主升Q)*(下限Q/控盘主升Q)*50;
 KONGQ:=IF(KONGQ0>100,100,IF(KONGQ0<1,1,KONGQ0));
 MAXV:=MAX(T做空资金,T我心飞扬);
MINV:=MIN(T做空资金,T我心飞扬);
MMV0:=MAXV/MINV;
 MMV1:=T做空资金/REF(T做空资金,1);
 MMV2:=T我心飞扬/REF(T我心飞扬,1);
散筹集中度Q:=EMA(EMA((WINNER(C*1.1)-WINNER(C*0.9))*50/(WR慢/MM圈Q)/MMV0/MMV1/MMV2,3),2);
 KKONG0:=KONGQ*KONGQ*5/SQRT(散筹集中度Q)/控盘主升Q;
 KKONG:=IF(KKONG0>100,100,KKONG0);
 KV0:=KKONG/KONGQ;
 KV1:=KONGQ/REF(KONGQ,1);
 KV2:=KKONG/REF(KKONG,1);
 KV3:=EMA(KV0*KV0*KV1*KV2*30,2);
 OKV:=IF(KV3>100,100,IF(KV3<0,0,KV3));
 WVQ0:=1.18*(上限Q*下限Q+5)/(KONGQ+2)/SQRT(SQRT((OKV+2)/(KONGQ+5)));
 WVQ1:=100-IF(WVQ0>90,90+SQRT(WVQ0-90),IF(WVQ0<1,1,WVQ0));
 WVVQ:=EMA(EMA(IF(WVQ1<0.5,0.5,WVQ1),2),2);
 EVVQ:=EMA(EMA(WVVQ*0.96,3),3);
 DRAWBAND(WVVQ,RGB(11,88,55),EVVQ,RGB(128,0,255));

MTR:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);
 HD :=HIGH-REF(HIGH,1);
 LD :=REF(LOW,1)-LOW;
 DMP:=EXPMEMA(IF(HD>0&&HD