通达信『牛股侦探』套装指标，提前侦探牛股异动信号

{牛股侦探主图}

GSPT1:=O=LOW AND C>OPEN AND O/REF(C,1)< 0.95;

GSPT2:=MA(C,5)< MA(C,10) AND L< MA(CLOSE,5) AND H/O>1.1;

GSPT3:=H/C>1.07 AND V>REF(HHV(V,800),1);

GSPT4:=GSPT1 AND GSPT2 AND GSPT3;

GSPT5:=REF(GSPT4,1) AND C>REF(CLOSE,1) AND NOT(O=C AND C/REF(C,1)>1.098);

GSPT6:=REF(C,1)>REF(O,1) AND REF(H,1)/REF(C,1)>1.01;

GSPT7:=REF(C,1)/REF(C,2)>0.94 AND O< REF(O,1) AND C/REF(C,1)>1.005;

GSPT8:=REF(C,1)/REF(C,5)<1.2 AND REF(O,1)/REF(L,1)< 1.0045 AND REF(C,1)/REF(O,1)>1.015;

GSPT9:=REF(C,1)>REF(C,2) AND C/REF(C,1)< 1.03 AND REF(C,1)/REF(O,1)>1.05;

GSPT10:=O< (REF(C,1)+REF(O,1))/2 AND C>O AND C>REF(C,1);

GSPT11:=REF(COUNT(GSPT9 AND GSPT10,2)>0,1) AND C/REF(C,1)>1.05 AND O<MA(C,5);

GSPT12:=O< MA(C,10) AND C>MA(C,5) AND C>MA(C,10) AND MA(C,5)/MA(C,10)<0.98;

大成:=CODELIKE('60')||CODELIKE('00')||CODELIKE('30');

XG:=GSPT5 OR (GSPT6 AND GSPT7 AND GSPT8) OR (GSPT11 AND GSPT12) AND C>MA(C,20) AND 大成;

STICKLINE(XG,O,C,1,0),COLORYELLOW;DRAWTEXT(XG,L*0.97,' ↖牛股现'),COLORYELLOW; 

DRAWSL(XG,L,0,10,0),COLORGREEN;

{天地线Z}

天地线:EMA(C,14),COLORRED,LINETHICK2;

IF(天地线<REF(天地线,1),天地线,DRAWNULL), COLORGREEN,LINETHICK2;

DRAWTEXT(ISLASTBAR,天地线, '-----天地线'),COLORWHITE;

{风险系数Z}

XX1:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2;

XX2:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4;{盈余公积用资本公积金代替}

XX3:=FINANCE(23)/FINANCE(10)*3.3;

XX4:=FINANCE(19)/FINANCE(15)*0.6;{缺长期负债或负债总额}

XX5:=FINANCE(20)/FINANCE(15)*0.999;Z值:=XX1+XX2+XX3+XX4+XX5;

DRAWTEXT_FIX(1,0.07,0.94,1,'财务预警：'),COLORYELLOW;

DRAWTEXT_FIX(Z值<1.2,0.1,0.94,1,' ●重 警●'),COLORRED;

DRAWTEXT_FIX( BETWEEN(Z值,1.2,2.6),0.1,0.94,1,' ○轻 警○'),COLOR0099FF;

DRAWTEXT_FIX(Z值>2.6,0.1,0.94,1,' ◎无 警◎'),COLORLIGREEN;

{阻力与支撑、评分显示Z}

E:=(HIGH+LOW+OPEN+2*CLOSE)/5;阻力:=2*E-LOW;支撑:=2*E-HIGH;

DRAWTEXT_FIX(C!=0,0.90,0.90,0,STRCAT('参考阻力：',STRCAT(CON2STR(阻力,2),' '))),COLORFFFF00;

DRAWTEXT_FIX(C!=0,0.90,0.96,0,STRCAT('参考支撑：',STRCAT(CON2STR(支撑,2),' '))),COLORGREEN;

X1:=IF(MA(C,5)>MA(C,10),20,0);X2:=IF(MA(C,20)>MA(C,60),10,0);

X3:=IF(KDJ.J>KDJ.K,10,0);X4:=IF(MACD.DIF>MACD.DEA,10,0);

X5:=IF(MACD.MACD>0,10,0);X6:=IF(V>MA(V,60),10,0);

X7:=IF(WINNER(C)>0.5,10,0);X8:=IF(C/REF(C,1)>1.03,10,0);

XX:=X1+X2+X3+X4+X5+X6+X7+X8;

DRAWTEXT_FIX(V>O,0.90,0.84,0,STRCAT('量化评分：',STRCAT(CON2STR(XX,2),' '))),COLORYELLOW;

DRAWTEXT_FIX(1,0.980,20,1,'分析家公式网HTTP://WWW.70822.COM'),COLOR333333;

{九转序列Z}

B:=C<REF(C,4);N1:=CURRBARSCOUNT;

B8:=(N1>=1 AND COUNT(B,8)=8);

DRAWNUMBER(B8 AND REF(B,8)=0,L,8),COLORMAGENTA;

B9:=(N1>=1 AND COUNT(B,9)=9);

DRAWNUMBER(B9 AND REF(B,9)=0,L,9),COLORYELLOW;

A:=C>REF(C,4);A_8:=(N1>=1 AND COUNT(A,8)=8);

DRAWNUMBER(A_8 AND REF(A,8)=0,H*1.02,8),COLORMAGENTA;

A_9:=(N1>=1 AND COUNT(A,9)=9);

DRAWNUMBER(A_9 AND REF(A,9)=0,H*1.02,9),COLORYELLOW;

{卖点Z}

M:=5;N:=12;

分析家公式网0:=H=HHV(H,N) AND L!=LLV(L,N);

分析家公式网1:=分析家公式网0*250;

分析家公式网2:=BARSLASTCOUNT(分析家公式网1=250)=M;

分析家公式网3:=(C-REF(C,1))/REF(C,1)*100>9.88 AND C=H;

分析家公式网4:=IF(分析家公式网3,0,分析家公式网2);

分析家公式网5:=CROSS(分析家公式网3,0.5);

分析家公式网6:=BARSLAST(分析家公式网5);分析家公式网7:=CROSS(0.5,分析家公式网3) ;

分析家公式网8:=COUNT(分析家公式网2,分析家公式网6+1)>0;

分析家公式网9:=分析家公式网7 AND 分析家公式网8;

卖:=分析家公式网4 OR 分析家公式网9,NODRAW;DRAWICON(卖,H*1.03,8);

STICKLINE(卖,OPEN,CLOSE,1,0),COLORGREEN;DRAWTEXT(卖,H*1.01,' ★卖'),COLORGREEN;

{分析家公式网HTTP://WWW.70822.COM}

{炸板率和连板率Z/F}

炸板率:SCJYVALUE(3,2,0)/(SCJYVALUE(3,1,0)+SCJYVALUE(3,2,0))*100,COLORGREEN,NODRAW;

连板率:SCJYVALUE(23,1,0)/SCJYVALUE(3,1,0)*100,COLORYELLOW,NODRAW;

WWWGSPTCOM:DRAWNULL,COLOR333333;

{昨天涨幅Z}

昨天涨幅:=(REF(C,1)-REF(C,2))/REF(C,2)*100;

DRAWTEXT_FIX(1,0.01,0.10,0,STRCAT(STRCAT('昨天涨幅：',CON2STR(昨天涨幅,2)),' ％')),COLORGREEN;

{板块排名Z

TAX:=HORCALC(HYBLOCK,105,1,DRAWNULL);

TAA:=STRCAT(HYBLOCK,' 排名 ：');

DRAWTEXT_FIX(ISLASTBAR,0.01,0.05,0,STRCAT(TAA,CON2STR(TAX,0))),COLORYELLOW;};