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

感谢股友们推荐四线抓牛为精华贴，为帮助大家系统分析一支股票的运行，特综合比较好的指标建立一套深度分析系统，能清晰看出庄家的操作思路，希望能对大家有所帮助。其他指标均来自理想论坛和本人的部分优化。四线抓牛指标加入了逃顶指标；
 一、贴图；
 二、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;