【通达信分享源码】牛长老优化主图　副图源码　找黑马

{长老牛股主图}

操作: MA((LOW+HIGH+CLOSE)/3,5),LINETHICK2,COLORWHITE;

AAAA:=MA(C,1);

AAA0:=SMA(SMA(SMA(AAAA,2,1),2,1),2,1);

BBB:=MA(AAA0,3);

DRAWBAND(AAA0,RGB(255,193,193),BBB,RGB(34,139,34));

MA05:MA(C,5)LINETHICK3,COLOR00CCFF;

MA10:=MA(C,10);

MA20:=MA(C,20);

MA30:=MA(C,30);

五日乖离率:=(C-MA05)/MA05*100;

BB05:=ATAN((MA05/REF(MA05,1)-1)*100)*180/3.1416;

速度5:=SMA(EMA((MA05-REF(MA05,1))/REF(MA05,1),3)*100,3,1);

加速度5:=EMA((速度5-REF(速度5,1)),3),NODRAW;

IF(BB05>30 AND MA05>REF(MA05,1), MA05,DRAWNULL),LINETHICK3,COLORRED;

BB10:=ATAN((MA10/REF(MA10,1)-1)*100)*180/3.1416;

IF(BB05<0 AND MA05<REF(MA05,1), MA05,DRAWNULL),LINETHICK3,COLORGREEN;

三拾日乖离率:=(C-MA30)/MA30*100,NODRAW;

VAR1:=(MA20-MA30)>REF((MA20-MA30),1) AND MA20>REF(MA20,1) AND MA30>REF(MA30,1);

VAR2:=(MA30-MA20)<REF((MA30-MA20),1) AND MA20<REF(MA20,1) AND MA30<REF(MA30,1);

BB30:=ATAN((MA30/REF(MA30,1)-1)*100)*180/3.1416;

强势狙击:=FILTER(BB30>30 AND BB10>45 AND CROSS(BB05,60),10);

加仓:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND MA05>REF(MA05,1) AND 三拾日乖离率>REF(三拾日乖离率,1) AND MA10>REF(MA10,1)

AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1) ,10) ;

清仓:=FILTER(COUNT(CROSS(30,BB05),5)>=1 AND (C>MA30 OR O>MA30) AND MA05<REF(MA05,1) AND 三拾日乖离率<REF(三拾日乖离率,1) AND MA10<REF(MA10,1),10);

DRAWTEXT(加仓 ,LOW*0.98,'←加仓'),COLORRED;

JC:=CROSS(0,五日乖离率) AND 三拾日乖离率<REF(三拾日乖离率,1) AND MA10>REF(MA10,1) ;

减仓:=FILTER(JC,10);

MR:=COUNT(CROSS(五日乖离率,0),3)>=1 AND 三拾日乖离率>REF(三拾日乖离率,1) AND MA05>REF(MA05,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)<MA30;

买入:=FILTER(MR,10);

DRAWTEXT(减仓,HIGH*1.02,'←风险'),COLORCYAN;

DRAWTEXT(买入,LOW*0.98,'←买入'),COLORYELLOW;

{牛马线买点公式升级版}

MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;

牛线:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,COLORRED;

马线:MA(牛线,8),COLORWHITE;

{红底绿顶}

低:=REF(LLV(L,150),3);

近期底:=REFDATE(低,DATE);

最底:=REFDATE(近期底,DATE);

高:=REF(HHV(H,150),3); 

近期顶:=REFDATE(高,DATE);

最顶:=REFDATE(近期顶,DATE),NODRAW;

出:=最顶=H AND ((C-L)<(O-C) OR (O-L)<(C-O)),NODRAW;

 STICKLINE(出,O,(C+O)/2,3,0),COLORBLUE;

 STICKLINE(出,H,L,0.2,0),COLORBLUE;

 DRAWTEXT(出,H*0.998,'--蓝顶'),COLORGREEN;

A2:=REF(MA(C,20),1);J1:=(MA(C,20)-A2)/A2*100;MJ1:=MA(J1,3);

乖离2:=(MA(C,20)-MA(C,30))/MA(C,30)*100; 

 VAC1:=IF(BETWEEN(乖离2,-2,5),2,0);

XL1:=((LLV(LOW,3) = LLV(LOW,60)) AND ((CLOSE / REF(CLOSE,1)) >= 1.04)); 

 XL2:=(((CLOSE - EMA(CLOSE,21)) / EMA(CLOSE,21)) * 100); 

 XL3:=CROSS(XL2,(0 - 20)); 

 DRAWTEXT(FILTER(((XL1 > 0) AND LOW),5),(LOW - 0.0014),'●买点'); 

  X6:=REF(CLOSE,1); 

 X7:=((SMA(MAX((CLOSE - X6),0),7,1) / SMA(ABS((CLOSE - X6)),7,1)) * 100); 

 X8:=CROSS(79,X7); 

 X9:=FILTER(X8,4); 

 DRAWTEXT(X9,(HIGH * 0.9989),'-●出货'),COLORGREEN;

M10:=MA(C,10);

M13:=MA(C,13);

VVVV5:=CROSS(M10,M13);

WWF1:DRAWICON(VVVV5,H,11);

QQQQ1:STICKLINE(VVVV5<C,REF(C,BARSLAST(CROSS(M10,M13))),REF(C,BARSLAST(CROSS(M10,M13))),-1,-1),COLORWHITE;

RC1:=REF(C,1);

大阴线:=C<0.96*O OR C<=RC1*0.96 OR C>1000 AND C<=RC1*0.98;

大阴T:=BARSLAST(FILTER(大阴线,3));{调整显示密度}

大阴实顶: REF(O,大阴T),COLORLIGREEN,POINTDOT;{显示大阴K线的开盘价O};

MTM:=MA(C,6)-MA(C,13)+C;

MTMMA:MA(MTM,5),NODRAW;

AAA:=(3*C+H+L+O)/6;

 VAR21:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36;

 TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR21;

立桩量:=FILTER(TJ1,5);

D1:REF(LOW,BARSLAST(立桩量)),COLORYELLOW,NODRAW,LINETHICK1;

买线:=EMA(C,4); 

卖线:=EMA(SLOPE(C,20)*10+C,35);

DRAWICON(CROSS(卖线,买线),HIGH*1.02,8);

均价线:=AMOUNT/V/100;

C2:=REF(C,1);

涨停:=IF(REF(C,1)*1.1-C<0.01 ,1,0);

STICKLINE(涨停,OPEN,CLOSE,3,0),COLORRED;

STICKLINE(涨停,OPEN,CLOSE,1,0),COLORYELLOW;

STICKLINE(涨停,H,L,0,0),COLORYELLOW;

B1:='┄┄┄┄┄';

DRAWTEXT(均价线 AND 涨停,均价线,B1),COLORGREEN;

B3:='┄┄┄┄┄';

DRAWTEXT((O+C)/2 AND 涨停,(O+C)/2 ,B3),COLORMAGENTA;

B2:='┄┄┄┄┄';

DRAWTEXT(涨停,L,B2),COLORGRAY;

支撑线:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4,NODRAW;

除业绩后退股:=FINANCE(30)>=REF(FINANCE(30),130);

D0:=除业绩后退股;

D2:=IF(NAMELIKE('S'),0,1);

D3:=IF(NAMELIKE('*'),0,1);

D4:=DYNAINFO(17)>0;

去除大盘股:=CAPITAL/1000000<50;

去高价:=C<=75;

去掉:=D0 AND D2 AND D3 AND D4 AND 去除大盘股 AND 去高价 AND NOT(C>=REF(C,1)*1.097 AND C=O AND H=L);

L0:=(LLV(LOW,10));

L10:=(LLV(LOW,60));

L2:=(LLV(LOW,120));

A1:=REF(CLOSE,1);

B10:=COUNT(L10,13)>=8;

B20:=SUM(L10,13)>=6;

B30:=COUNT(-B20,13)>=10;

B4:=1;

B5:=COUNT(B20,13)>=1;

C1:=(((CLOSE-A1)/A1)*100)>1;

D10:=(((CLOSE-LOW)/LOW)*100)>1;

火牛:=IF((D10 AND L2 AND C1)*2,10,0);

金牛:=IF((D10 AND L0 AND C1)*2.5,10,0);

多头:=((CLOSE/REF(CLOSE,1)>1 AND VOL/CAPITAL*100>1  AND CYR>1) OR (CYS>11 AND CYS<30 AND CYR>1 AND CLOSE/REF(CLOSE,1)>1));

陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);

NN:=IF((陡峭度 > 0.35),6,65);

VAR1A:=((-((100)*(HHV(HIGH,NN) - CLOSE))/(HHV(HIGH,NN) - LLV(LOW,NN))))*((DATE < 20070110));

狂喜:=(80)*(CROSS(VAR1A,(-2)));

MA5:=EMA(C,5);

YCXN:=MA5>=REF(MA5,1);

AA1:=REF(CLOSE,1)<(LLV(LOW,10)+(HHV(HIGH,10)-LLV(LOW,10))*1);

AA2:=CLOSE<HHV(HIGH,5) AND CROSS(C,MA(C,5)) AND  CROSS(C,MA(C,10)) AND  CROSS(C,MA(C,20))

AND  CROSS(C,MA(C,34)) AND C/REF(C,1)>=1;

AA3:=CLOSE>=HHV(HIGH,5) AND YCXN AND C/REF(C,1)>=1;

涨停狙击:=DYNAINFO(4)>0

AND HHV(HIGH,5)/LLV(LOW,5)<3.4 AND AA1 AND (AA2 OR AA3);

A1Q:=(H-C+O-L)/REF(C,1)<0.01;

A2Q:=MA((C-O)/REF(C,1),3)>0.01;

AA:=A1Q AND A2Q;

暴牛:=IF(COUNT(REF(AA,1),3)>=1,0,AA);

XX1:=CROSS(((-((100)*(HHV(HIGH,IF((IF((BARSCOUNT(CLOSE) > 7),

(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1) > 0.35),6,65)) - CLOSE))/(HHV(HIGH,IF((IF((BARSCOUNT(CLOSE) > 7),

(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1) > 0.35),6,65)) - LLV(LOW,IF((IF((BARSCOUNT(CLOSE) > 7),

(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1) > 0.35),6,65)))))*((DATE < 20070110)),(-2));

RSV:=(CLOSE-LLV(LOW,6))/(HHV(HIGH,6)-LLV(LOW,6))*100;

K:=SMA(RSV,2,1);

D:=SMA(K,2,1);

J:=3*K-2*D;

RS:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;

F:=100;

K1:=RS>=100;

K2:=RS<100;

抓涨:=金牛 AND 火牛 AND 狂喜  AND 涨停狙击 AND XX1 AND CROSS(K1,K2) AND 去掉;

DRAWTEXT(抓涨,LOW,'妖股'),COLORGREEN;

DRAWTEXT_FIX(1,0.50,5,0,'~☆~翔博软件~☆~'),COLORGREEN;

敢死队操作线:MA(C,24),LINETHICK2,COLORLIMAGENTA;

压力:MA(REF(HHV(C,30),1),2);

DRAWICON(CROSS(CLOSE,压力) AND CLOSE/REF(CLOSE,1)>=1.03,L*0.98,13);