自用抓牛股（通达信公式 主图 源码 测试图）

 {色带}

DRAWBAND(EXPMA(CLOSE,12),RGB(70,50,50),EXPMA(CLOSE,25),RGB(10,50,50));

DRAWKLINE(H,O,L,C);

{色带}

DRAWBAND(EXPMA(CLOSE,25),RGB(120,50,50),EXPMA(CLOSE,50),RGB(10,50,60));

DRAWKLINE(H,O,L,C);

{线上阴线买}

七星剑:EXPMA(CLOSE,7),LINETHICK1,DOTLINE,COLORFF8000;

DRAWNUMBER(ISLASTBAR,七星剑,七星剑),COLORFFFFFF;

委托买入价一:EXPMA(CLOSE,9),LINETHICK1,DOTLINE,COLORC0C0C0;

DRAWNUMBER(ISLASTBAR,委托买入价一,委托买入价一),COLORFFFFFF;

委托买入价二:EXPMA(CLOSE,12),LINETHICK1,COLORFFFFFF;

DRAWNUMBER(ISLASTBAR,委托买入价二,委托买入价二),COLORFFFFFF;

海峡中线:EXPMA(CLOSE,25),LINETHICK2,COLOR00FFFF;

DRAWNUMBER(ISLASTBAR,海峡中线,海峡中线),COLOR00FFFF;

强弱分界线:EXPMA(CLOSE,50),LINETHICK1,COLOR00FFFF;

DRAWNUMBER(ISLASTBAR,强弱分界线,强弱分界线),COLOR00FFFF;

生命线:MA(CLOSE,62),LINETHICK1,COLOR00FF00;

DRAWNUMBER(ISLASTBAR,生命线,生命线),COLOR00FF00;

 

{题材概念}

Z1:=STRCAT(DYBLOCK,' ');

Z2:=STRCAT(Z1,HYBLOCK);

Z3:=STRCAT(Z2,' ');

Z4:=STRCAT(Z3,GNBLOCK);

Z5:=STRCAT(Z4,' ');

Z6:=STRCAT(Z5,FGBLOCK);

DRAWTEXT_FIX(ISLASTBAR,0.01,0.012,0,STRCAT(Z6,ZHBLOCK)),COLOR00FFFF;

 

{欢乐海岸}

压力位:(1+6/100)*MA(CLOSE,25),COLOR000000,NODRAW;{不显示}

DRAWNUMBER(ISLASTBAR,压力位,压力位),COLOR000000,NODRAW;{不显示}

欢乐海岸:(1-6/100)*MA(CLOSE,25),LINETHICK1,COLOR8080FF;

DRAWNUMBER(ISLASTBAR,欢乐海岸,欢乐海岸),COLORFFFFFF;

无敌哥趋势线:(压力位+欢乐海岸)/2,DOTLINE,COLOR000000,NODRAW;{不显示}

DRAWNUMBER(ISLASTBAR,无敌哥趋势线,无敌哥趋势线),NODRAW;{不显示}

DRAWTEXT(L<欢乐海岸 AND C>欢乐海岸 AND COUNT(REF(C,1)*1.1-C<0.01  AND C/REF(C,1)<1.11,25)>=1,LOW-0.09{数字小位置高},'海岸'),COLORFF8000,NODRAW;{不显示}

 

{六六大顺}

VARA:=CLOSE*VOL;

VARB:=EMA((EXPMA(VARA,3)/EXPMA(VOL,3)+EXPMA(VARA,6)/EXPMA(VOL,6)+EXPMA(VARA,12)/EXPMA(VOL,12)+EXPMA(VARA,24)/EXPMA(VOL,24))/4,13);

红色压力线:1.06*VARB,DOTLINE,COLORRED;

DRAWNUMBER(ISLASTBAR,红色压力线,红色压力线),COLORRED;

低吸价咯:VARB*0.94,DOTLINE,COLOR000000,NODRAW;{不显示}

DRAWNUMBER(ISLASTBAR,低吸价咯,低吸价咯),COLOR000000,NODRAW;{不显示}

VARC:=EXPMA(CLOSE,9);

卖出价:EXPMA(VARC*1.14,5),LINETHICK1,DOTLINE,COLOR00FF00;

DRAWNUMBER(ISLASTBAR,卖出价,卖出价),COLORFFFFFF;

抄底:EXPMA(VARC*0.86,5),DOTLINE,COLOR000000,NODRAW;{不显示}

DRAWNUMBER(ISLASTBAR,抄底,抄底),COLOR000000,NODRAW;{不显示}

{分析家公式网 WWW.70822.COM 整理}

{开火}

顶:=C-REF(C,1);

妹:=100*EMA(EMA(顶,6),6)/EMA(EMA(ABS(顶),6),6),NODRAW;{不显示}

哥:=IF(LLV(妹,2)=LLV(妹,7) AND COUNT(妹<0,2) AND CROSS(妹,MA(妹,2)),1,0);

DRAWTEXT(FILTER(哥=1,5),L*0.995{数字大位置高},'↖开火'),COLORFFFFFF;

 

{涨停天数}

VARZT:=BARSLAST(C/REF(C,1)>1.094);

DRAWTEXT(VARZT=6,L*0.990,'↖六六'),COLORFFFFFF,NODRAW;{不显示}

 

{金色涨停}

STICKLINE(C/REF(C,1)>1.095,C,O,1.8,0),COLOR00FFFF;

 

70822com0009.png