通达信【主力资金控盘】副图/选股指标 源码
plaintext复制基准价:=(C + L + H)/3;
能量流:=SUM((基准价 - REF(L,1) - (H - 基准价)) * VOL/100000/(H -L),0);
平滑能量:=EMA(能量流,1);
短期均线:=MA(平滑能量,12);
长期均线:=MA(平滑能量,26);
游资力度:=(平滑能量 - 短期均线)/短期均线*100,NODRAW;
主力力度:=(短期均线 - 长期均线)/长期均线*100,NODRAW;
STICKLINE(游资力度>0,0,游资力度,3,0),COLORRED;
STICKLINE(游资力度<0,0,游资力度,3,0),COLORGREEN;
STICKLINE(主力力度<0,0,主力力度,2,1),COLORBLUE;
双平滑收盘:=EMA(EMA(C,13),13);
DRAWTEXT_FIX(1,0.52,0,0,'微信公众号：选股室 ☆用法：红涨\紫拉=看涨，灰\绿色=持币 ☆')COLOR0080FF;
控盘强度:=(双平滑收盘 - REF(双平滑收盘,1))/REF(双平滑收盘,1)*1000,POINTDOT,COLORFFCCCC;
STICKLINE(控盘强度<0,控盘强度,0,2,0),COLORGRAY;
STICKLINE(控盘强度>REF(控盘强度,1) AND 控盘强度>0 AND 控盘强度<3,控盘强度,0,2,1),COLORRED;
STICKLINE(控盘强度>REF(控盘强度,1) AND 控盘强度>3,控盘强度,3,4,1),COLORFF00FF;
主力资金控盘: 控盘强度>REF(控盘强度,1) AND 控盘强度>0,LINETHICK0,COLORRED;
分时博弈终极密码：3 个指标洞穿主力意图（附赠实战源码）
plaintext复制VAR1:=EMA(EMA(CLOSE,13),13);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
STICKLINE(控盘<0,控盘,0,1,1),COLOR00FF00;
STICKLINE(控盘>REF(控盘,1) AND 控盘<0,控盘,0,1,1),COLORFF00FF;
无庄控盘:=控盘<0;
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,1),COLOR0000FF;
有庄控盘:=控盘>REF(控盘,1);
通达信【主力深度控盘系统】副图/选股指标 源码
plaintext复制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,COLORYELLOW;
高控度:=80,COLORRED NODRAW;
低控盘度:=40,COLORRED NODRAW;
STICKLINE(控盘程度,0,控盘程度 ,1,0 ),COLOR00FFFF;
STICKLINE(控盘程度 AND 控盘程度>40,40,控盘程度 ,1,0 ),COLORMAGENTA;
STICKLINE(控盘程度 AND 控盘程度>80,100,控盘程度 ,1,0 ),COLORRED;
DRAWTEXT(ISLASTBAR,控盘程度,' 主力控盘');
低控:BARSLASTCOUNT(控盘程度 AND 控盘程度>40)=1 COLORMAGENTA NODRAW;
高控:BARSLASTCOUNT(控盘程度 AND 控盘程度>80)=1 COLORRED NODRAW;
DRAWICON(高控,96 * 1.002,9);
DRAWICON(低控,38 * 1.002,13);
通达信【主力监控】副图指标 源码
plaintext复制zyg1:=(((close-ma(close,6))/ma(close,6))*100);
zyg2:=(((close-ma(close,12))/ma(close,12))*100);
zyg3:=(((close-ma(close,24))/ma(close,24))*100);
zyg4:=(((zyg1+(2*zyg2))+(3*zyg3))/6);
zyg5:=ma(zyg4,3);
zyg6:=stickline((zyg5<=(0-10)),0,(0-20),3.5,0),color00aaff;
zyg7:=ema(ema(close,3),1);
zyg8:=(zyg7-ref(zyg7,1))/ref(zyg7,1)*1000;
stickline(zyg8<0,zyg8,0,3.5,0),colorffaa00;
主力出货:0,colorffaa00;
stickline(zyg8>ref(zyg8,3) and zyg8>0,zyg8,0,3.5,0),color000088;
stickline(zyg8>ref(zyg8,3) and zyg8>0,zyg8,0,2.5,0),color0000aa;
stickline(zyg8>ref(zyg8,3) and zyg8>0,zyg8,0,1.5,0),color0000cc;
stickline(zyg8>ref(zyg8,3) and zyg8>0,zyg8,0,1,0),color0000ee;
主力吸货:0;
