通达信以（四线抓牛主图指标）创建一套股票综合分析系统

感谢股友们推荐四线抓牛为精华贴，为帮助大家系统分析一支股票的运行，特综合比较好的指标建立一套深度分析系统，能清晰看出庄家的操作思路，希望能对大家有所帮助。其他指标均来自理想论坛和本人的部分优化。四线抓牛指标加入了逃顶指标；
一、贴图；
二、1；成交量战法，副图指标
指标源码；
大单比率:(LARGEINTRDVOL-LARGEOUTTRDVOL)*10000/FINANCE(7),NODRAW;
主力增减仓%:LARGEINTRDVOL/LARGEOUTTRDVOL,NODRAW;
RV5:=IF(BARSCOUNT(CLOSE)<6,REF(SUM(VOL,BARSCOUNT(CLOSE))/BARSCOUNT(CLOSE),1),REF(MA(VOL,5),1));
V1:=IF(DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT AND BARSCOUNT(CLOSE)>1,DYNAINFO(17)*RV5,VOL),VOLSTICK;
STICKLINE(DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT AND BARSCOUNT(CLOSE)>1,O,V1,3,-1),COLOR336699;
2、优化北沙MACD ，副图，来自北沙老师和理想BJIF老师，本指标加入了千岛一帆老师的上涨强度指标。
指标源码；
DIF:EMA(C,12)-EMA(C,26);DEA:EMA(DIF,9);
MACD:(DIF-DEA)*2,COLORSTICK;
压力:HHV(DIF,55),COLORGREEN;
支撑:LLV(DIF,55),COLORGREEN;

A:=BARSLAST(REF(CROSS(DIF,DEA),1));
底背离:=REF(CLOSE,A+1)>C AND DIF>REF(DIF,A+1)AND CROSS(DIF,DEA)AND DEA<0;
底背天:IF(底背离,A,0),NODRAW;
线底背:DRAWLINE(A=0,DEA,底背离,DEA,0),COLORRED,LINETHICK2;

W1:STICKLINE(MACD>0,MACD,0,1,1),COLORRED;
W2:STICKLINE(MACD<0,MACD,0,1,0),COLORLIBLUE;

VA1:=HHVBARS(MACD,BARSLAST(MACD<0)+1);
VA2:=CROSS(BACKSET(CROSS(0,MACD)OR(ISLASTBAR AND MACD>0),REF(VA1,1)+2),0.5);
前高:DRAWLINE(VA2,MACD,REF(VA2,1),REF(MACD,1),1),COLORWHITE;
前高*1.1,COLORBLACK;
VA3:=LLVBARS(MACD,BARSLAST(MACD>0)+1);
VA4:=CROSS(BACKSET(CROSS(MACD,0) OR (ISLASTBAR AND MACD<0),REF(VA3,1)+2),0.5);
前低:DRAWLINE(VA4,MACD,REF(VA4,1),REF(MACD,1),1),COLORYELLOW;

W3:STICKLINE(MACD>DRAWLINE(VA2,MACD,REF(VA2,1),REF(MACD,1),1)
,DRAWLINE(VA2,MACD,REF(VA2,1),REF(MACD,1),1),MACD,0.5,0),COLORYELLOW;
W4:STICKLINE(MACD<DRAWLINE(VA4,MACD,REF(VA4,1),REF(MACD,1),1)
,DRAWLINE(VA4,MACD,REF(VA4,1),REF(MACD,1),1),MACD,0.5,0),COLORBLUE;
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
VARA1:=(DVOL/C)/2,NODRAW;
VARA2:=SUM(IF(VARA1>100 AND CLOSE>REF(CLOSE,1),VARA1,0),0);
VARA3:=SUM(IF(VARA1>100 AND CLOSE<REF(CLOSE,1),VARA1,0),0);
VARA4:=SUM(IF(VARA1<100 AND CLOSE>REF(CLOSE,1),VARA1,0),0);
VARA5:=SUM(IF(VARA1<100 AND CLOSE<REF(CLOSE,1),VARA1,0),0);
VARA6:=VARA2+VARA3+VARA4+VARA5;
机买:=(VARA2/VARA6)*100,LINETHICK2,COLORRED;
机卖:=(VARA3/VARA6)*100,LINETHICK2,COLORGREEN;
主力差:=机买-机卖,LINETHICK2,NODRAW;
强度:主力差-REF(主力差,1),NODRAW,COLOR6600FF;
STICKLINE(强度>1.5,-0.05,0,2,0),COLORMAGENTA;
近期:BARSLAST(强度>1.5),NODRAW,COLORGRAY;
3、资金力度 来自其他网站
指标源码；

QJJ:=(VOL / (((HIGH - LOW) * 2) - ABS((CLOSE - OPEN))));
XVL:=(IF((CLOSE > OPEN),(QJJ * (HIGH - LOW)),
IF((CLOSE < OPEN),(QJJ * ((HIGH - OPEN) + (CLOSE - LOW))),
(VOL / 2))) + IF((CLOSE > OPEN),(0 - (QJJ * ((HIGH - CLOSE) + (OPEN - LOW)))),
IF((CLOSE < OPEN),(0 - (QJJ * (HIGH - LOW))),(0 - (VOL / 2)))));
HSL:=((XVL / 20) / 1.15);
攻击流量:=(((HSL * 0.55) + (REF(HSL,1) * 0.33)) + (REF(HSL,2) * 0.22));
LLJX:EMA(攻击流量,3),LINETHICK0;
力度:(HSL / 1000),LINETHICK0;
ZJLL:=REF(LLJX,1);
QZJJ:=(((LLJX - ZJLL) / ZJLL) * 100);

资金流量:LLJX+LLJX*0.03,LINETHICK0;
流量增幅:IF(((LLJX > 0) AND (ZJLL < 0)),ABS(QZJJ),
IF((((LLJX < 0) AND (ZJLL < 0)) AND (LLJX < ZJLL)),(0 - QZJJ),QZJJ)),LINETHICK0;
流量递增:REF(LLJX,1)>REF(LLJX,2) AND LLJX>REF(LLJX,1) AND LLJX>0,COLOR0000FF,POINTDOT;
STICKLINE(((HSL * 4) > 0),((HSL * 4) * 1.5),0,3,0),COLOR00FFFF;
STICKLINE(((HSL * 4) < 0),((HSL * 4) * 1.5),0,3,0),COLORFFFF00;
STICKLINE((LLJX > 0),LLJX*10,0,2,0),COLORFF00FF;
STICKLINE((LLJX < 0),LLJX*10,0,2,0),COLORFF0000;
4、筹码分布，来自云自云端老师，筹码动态是一支股票运行的灵魂。
指标源码；
主力持仓%:EMA(100*(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30)),3),COLORYELLOW,LINETHICK2;
DRAWBAND(主力持仓%,RGB(150,10,150),50,RGB(50,55,150));
浮筹比例:(WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))/WINNER(HHV(HIGH,0))*100,NODRAW;
STICKLINE(浮筹比例<10,10,浮筹比例,4,0),COLORRED;
DRAWTEXT(浮筹比例<10,18,'低'),COLORYELLOW;
DRAWTEXT(浮筹比例<10,13,'吸'),COLORYELLOW;
{筹码多空线}
开盘:=WINNER(O)*100;
收盘:=WINNER(C)*100;
最高:=WINNER(H)*100;
最低:=WINNER(L)*100;
获利比例%:收盘,COLORBROWN,NODRAW;
{换手率}
换手:100*VOL/(FINANCE(7)/100),NODRAW;
换手5日:MA(换手,5),NODRAW;
换手10日:MA(换手,10),NODRAW;
换手20日:MA(换手,20),NODRAW;
85,COLORRED;
10,COLORLIGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.00,0,'提示☆【主力持仓<50主力轻度或无控盘,主力持仓及获利比>80以上注意☆获利了结☆】'),COLORCYAN;
DIFW:="MACD.DIF#WEEK"(12,26,9);
DEAW:="MACD.DEA#WEEK"(12,26,9);
FCA:=FILTER(CROSS(DIFW,DEAW) AND REF(DEAW,1)<0,13),NODRAW;
XG2:=FCA;
选股:= XG2 AND FCA;
STICKLINE(选股,10,15,3,0),COLOR0000FF;
STICKLINE(选股,15,20,2,0),COLORLICYAN;
STICKLINE(选股,20,25,1,0),COLORBLUE;
DRAWTEXT(选股,20,'*小散'),COLORYELLOW;
5、四线抓牛
指标源码；
FL:=MA(CLOSE,17)+ABS(MA(CLOSE,17)-REF(MA(CLOSE,17),1)),COLORWHITE;
FS:=MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1),COLORWHITE;
BB:IF(MA(CLOSE,17)<FS,FS,MA(CLOSE,17)),COLORWHITE;
年线:=EMA(C,250);
A:=BB-(EMA(C,3)-BB),COLORWHITE;
DIFF:EMA((年线-(EMA(C,3)-年线)),5),LINETHICK2;
IF(BB=FS,BB,BB), COLORWHITE,LINETHICK2;
追涨跌破止损: EMA(COST(81),10) COLORRED,LINETHICK2;
牛熊线: EMA(COST(27),120), CIRCLEDOT;
日:=150;昨前:=3;
高1:=REF(HHV(H,日),昨前);
顶:REFDATE(高1,DATE),COLORBLACK;
绝顶:=REFDATE(顶,DATE),NODRAW;
跑:=绝顶=H AND ((C-L)<(O-C) OR (O-L)<(C-O)),NODRAW;
STICKLINE(跑,C,O,3,0),COLOR777777;
STICKLINE(跑,C,O,2,0),COLORAAAAAA;
STICKLINE(跑,C,O,1,0),COLORCCCCCC;
STICKLINE(跑,C,O,0.1,0),COLORFFFFFF;
STICKLINE(跑,L,H,0,0),COLORFFFFFF;
DRAWTEXT(跑,C*1.02,'绝顶')COLORFFFFFF;