「翔博精选指标」擒牛伏妖,牛启动,龙头擒妖公式组（通达信公式

{擒牛伏妖主图源码：}
所属地区:DRAWTEXT_FIX(1,0.00,0.05,0,'地区：'),COLORFFFF00;
DRAWTEXT_FIX(1,0.05,0.05,0,DYBLOCK),COLORFFFF00;
所属行业:DRAWTEXT_FIX(1,0,0.10,0,'行业：'),COLORFFFF00;
DRAWTEXT_FIX(1,0.05,0.10,0,HYBLOCK),COLORFFFF00;
所属概念:DRAWTEXT_FIX(1,0,0.15,0,'概念：'),COLORFFFF00;
DRAWTEXT_FIX(1,0.05,0.15,0,GNBLOCK),COLORFFFF00;
所属风格:DRAWTEXT_FIX(1,0,0.20,0,'风格：'),COLORFFFF00;
DRAWTEXT_FIX(1,0.05,0.20,0,FGBLOCK),COLORFFFF00;
上市日期:=CONST(DAYTODATE((DATETODAY(DATE)-FINANCE(42))))+19000000,NODRAW;
DRAWTEXT_FIX(1,0,0.25,0,'上市日期:'),COLORFFFF00;
DRAWNUMBER_FIX(1,0.05,0.25,0,上市日期),COLORFFFF00;
MA5:=MA(C,5);
MA20:=MA(C,20);
A51:= REF(MA5,1)*0.98;
A52:= REF(MA5,2)*0.98;
B52:= BARSLAST(REF(C,2)>=REF(MA5,2) AND REF(C,1)<REF(MA5,1))+2;
B51:= BARSLAST(REF(C,2)>=REF(MA5,2) AND REF(C,1)<REF(MA5,1))+1;
DZ:=IF((REF(C,2)>=REF(MA5,2)) AND (REF(C,1)<REF(MA5,1)),IF(REF(MA5,2)<REF(MA5,1),A51,A52),IF(BARSSINCE(REF(C,2)>=REF(MA5,2) AND REF(C,1)<REF(MA5,1))>0,IF(REF(MA5, B52)< REF(MA5, B51),REF(MA5,B51)*0.98, REF(MA5,B52)*0.98), REF(MA5,1)));
A201:= REF(MA20,1)*0.98;
A202:= REF(MA20,2)*0.98;
B202:= BARSLAST(REF(C,2)>=REF(MA20,2) AND REF(C,1)<REF(MA20,1))+2;
B201:= BARSLAST(REF(C,2)>=REF(MA20,2) AND REF(C,1)<REF(MA20,1))+1;
ZZ:=IF((REF(C,2)>=REF(MA20,2)) AND (REF(C,1)<REF(MA20,1)),IF(REF(MA20,2)<REF(MA20,1),A201,A202),IF(BARSSINCE(REF(C,2)>=REF(MA20,2) AND REF(C,1)<REF(MA20,1))>0,IF(REF(MA20, B202)< REF(MA20, B201),REF(MA20,B201)*0.98, REF(MA20,B202)*0.98), REF(MA20,1)));
短止:DZ,COLORWHITE,LINETHICK2;
紫线:ZZ,COLORMAGENTA;
绿线:LLV(REF(LOW,1),2)+(HHV(REF(HIGH,1),2)-LLV(REF(LOW,1),2))/2,COLORGREEN;
黄线:MA(CLOSE,25)+MA(CLOSE,25)*6/100,COLORYELLOW,LINETHICK2;
白轨:MA(CLOSE,25)+MA(CLOSE,25)*20/100,COLORWHITE;
影子线:MA(CLOSE,25)+MA(CLOSE,25)*13/100,COLORGRAY;
STICKLINE(C/REF(C,1)>1.095,C,O,2,0),COLORYELLOW;
AZZ:=LLV(REF(LOW,1),2)+(HHV(REF(HIGH,1),2)-LLV(REF(LOW,1),2))/2,COLORGREEN;
DRAWICON(REF(C,1)<REF(DZ,1) AND C>=DZ AND C>AZZ ,LOW*0.99,1);
DRAWICON(REF(C,1)<REF(AZZ,1) AND C>=AZZ,LOW*0.99,1);
AXX:=((((MA(C,10) > MA(C,25)) && CROSS(C,MA(C,5))) && (V > MA(V,10))) && (MA(C,10) > REF(MA(C,10),1)));
ASS:=C>=黄线 AND AXX ;
DRAWTEXT(ASS,L*0.99,'☆'), COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0,0.00,0,'说明: ☆为稳买'),COLORLIGREEN;

涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);
STICKLINE(涨停,O,C,1,0),COLORYELLOW;
XA:=(ATAN((MA(C,3)/REF(MA(C,3),1)-1)*100)*180/3.14115926)>60;
XB:=C/REF(C,2)>1.08 AND C=HHV(C,40);
妖股:XA AND XB AND BARSCOUNT(C)>19,NODRAW,COLORYELLOW;
DRAWICON(妖股,L,13);
DRAWTEXT(妖股,L*0.92,'妖股'),COLORYELLOW;
XC:=C=ZTPRICE(REF(C,1),0.1);
STICKLINE(XC,C,O,0.5,0)COLORYELLOW;
STICKLINE(XC,H,L,0.5,0),COLORYELLOW;
倍量:=V>REF(MA(V,5),1)*1.8 AND C>REF(C,1) AND BARSCOUNT(C)>15;
DRAWTEXT(倍量,L*0.97,'倍'),COLORMAGENTA,LINETHICK2;
DRAWTEXT(CROSS((REF(HIGH,1)+REF(LOW,1))/2,MA(CLOSE,20)+2*STD(CLOSE,20)),
HIGH*1.02,'●警'),COLORGREEN;
{买入}
A3:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
A4:=SMA(A3,3,1);
A5:=SMA(A4,3,1);
A6:=3*A4-2*A5;
A7:=C-REF(C,1);
A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6);
买:=LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2));
DRAWTEXT(FILTER(买=1,5),LOW-0.05,'买进'),COLORYELLOW;
STICKLINE(买,OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE(C/REF(C,1)>1.095,C,O,2,0),COLORMAGENTA;
N:=12;
DG:=1.2;
YLX:=0;
ZCX:=0;
A1:=REF(C,N)=HHV(C,2*N+1); B1:=FILTER(A1,N); C1:=BACKSET(B1,N+1); HD:=FILTER(C1,N);
A2:=REF(C,N)=LLV(C,2*N+1); B2:=FILTER(A2,N); C2:=BACKSET(B2,N+1); LD:=FILTER(C2,N);
UU:=BACKSET(BARSTATUS=2,BARSLAST(HD)+1);VV:=UU>REF(UU,1);
前高:REF(C,BARSLAST(VV)),COLORRED,LINETHICK2;
顶高:=REF(C,BARSLAST(VV))*DG,COLORGRAY,LINETHICK2;
PTZQ:=BARSLAST(VV);
PTZF:=(HHV(H,PTZQ)-LLV(L,PTZQ))/LLV(L,PTZQ)*100;
DRAWTEXT_FIX(1,0.5,0.04,0,STRCAT(STRCAT('平台周期 ',CON2STR(PTZQ,0)),' 天')),COLORRED;
DRAWTEXT_FIX(1,0.5,0.08,0,STRCAT(STRCAT('平台振幅 ',CON2STR(PTZF,0)),' %')),COLORYELLOW;

{龙头擒妖 副图}


DRAWGBK(C>O,RGB(10,0,0),RGB(0,0,0),1,2,1);
XA_1:=DYNAINFO(4)>0 AND HHV(HIGH,10)/LLV(LOW,10)<1.25 AND REF(CLOSE,1)<LLV(LOW,15)+(HHV(HIGH,15)-LLV(LOW,15))*0.85 AND CLOSE>OPEN AND CLOSE>=HHV(HIGH,10);
XA_2:=IF(DATETODAY(DATE)<15000000,1,DRAWNULL);
XA_3:=EMA(CLOSE,5);
XA_4:=EMA(CLOSE,10);
XA_5:=EMA(CLOSE,14);
XA_6:=EMA(CLOSE,18);
XA_7:=EMA(CLOSE,40);
XA_8:=EMA(CLOSE,60);
XA_9:=IF(DATE<30000*500,1,DRAWNULL);
XA_10:=MAX(XA_7,XA_8);
XA_11:=CLOSE>XA_10 AND XA_1 AND (CLOSE>REF(HHV(HIGH,3),1)*XA_2 AND (CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>0.07);
XA_12:=VOL;
XA_13:=MA(XA_12,5);
XA_14:=XA_13+XA_13>XA_12;
XA_15:=DYNAINFO(4)>0 AND HHV(HIGH,10)/LLV(LOW,10)<1.25 AND REF(CLOSE,1)<(LLV(LOW,15)+(HHV(HIGH,15)-LLV(LOW,15))*0.85)*XA_2 AND CLOSE>OPEN AND CLOSE>=HHV(HIGH,10)*XA_9;
XA_16:=(CLOSE>REF(HHV(HIGH,3),1)*XA_2 AND (CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>0.07)*XA_2 AND XA_15 AND XA_14;
XA_17:=DYNAINFO(4)>0 AND HHV(HIGH,10)/LLV(LOW,10)<1.25 AND REF(CLOSE,1)*XA_2<LLV(LOW,15)+(HHV(HIGH,15)-LLV(LOW,15))*0.85 AND CLOSE>OPEN AND CLOSE>=HHV(HIGH,10);
XA_18:=(CLOSE-REF(CLOSE,1)*XA_2)/REF(CLOSE,1)*100>7;
XA_19:=XA_17 AND XA_18;
XA_20:=DATETODAY(DATE);
XA_21:=XA_20>9344 AND XA_20<15000000;
XA_22:=(XA_11 AND XA_19)*XA_21;
XA_23:=EMA(CLOSE,5);
XA_24:=EMA(CLOSE,10);
XA_25:=EMA(CLOSE,14);
XA_26:=EMA(CLOSE,18);
XA_27:=EMA(CLOSE,40);
XA_28:=EMA(CLOSE,60);
XA_29:=MAX(MAX(MAX(MAX(MAX(XA_23,XA_4),XA_25),XA_26),XA_27),XA_28)*XA_9;
XA_30:=MIN(MIN(MIN(MIN(MIN(XA_23,XA_4),XA_25),XA_26),XA_27),XA_28)*XA_9;
XA_31:=CLOSE>XA_29 AND LOW<XA_30 AND (CLOSE>REF(HHV(HIGH,3),1) AND (CLOSE-REF(CLOSE,1)*XA_2)/REF(CLOSE,1)>0.09);
XA_32:=FILTER(XA_31>0,0)=1;
XA_33:=DATETODAY(DATE);
XA_34:=XA_33>9350 AND XA_33<15000000;
XA_35:=XA_32*XA_34;
XA_36:=MA(REF(HHV(CLOSE,26),1),2);
XA_37:=MA(CLOSE,26);
XA_38:=POW(CLOSE-XA_37,2);
XA_39:=MA(XA_38,13);
XA_40:=SQRT(XA_39);
XA_41:=XA_37+2*XA_40;
XA_42:=REF(XA_41,1);
XA_43:=CROSS(CLOSE,XA_36) AND HIGH>REF(XA_41,1) OR (CLOSE>XA_36 AND CROSS(CLOSE,REF(XA_41,1))) AND CLOSE/OPEN>0.998;
XA_44:=MACD.MACD;
XA_45:=KD.K;
XA_46:=KD.D;
XA_47:=RSI.RSI1;
XA_48:=RSI.RSI3;
XA_49:=CLOSE-REF(CLOSE,1);
XA_50:=IF(XA_49>=0,XA_49,0)*XA_9;
XA_51:=IF(XA_49<0,-XA_49,0)*XA_9;
XA_52:=MEMA(XA_50,10);
XA_53:=MEMA(XA_51,10);
XA_54:=MEMA(XA_50,6);
XA_55:=MEMA(XA_51,6);
XA_56:=MA(100*XA_52/(XA_52+XA_53),10)*XA_9;
XA_57:=MA(100*XA_54/(XA_54+XA_55),6)*XA_9;
XA_58:=MA(CLOSE,5)/MA(CLOSE,10)>0.999 AND MA(CLOSE,10)/MA(CLOSE,20)>0.9847 AND MA(CLOSE,20)>MA(CLOSE,60) AND REF(COUNT(MA(CLOSE,10)/MA(CLOSE,20)<1.017 OR MA(CLOSE,5)/MA(CLOSE,10)<1.017,8)>=1,1) AND MA(CLOSE,20)/MA(CLOSE,60)<1.121;
XA_59:=(CLOSE-MA(CLOSE,60))/MA(CLOSE,60)*100;
XA_60:=COUNT(XA_59<35,100)>=95;
XA_61:=XA_43 AND XA_58>0 AND NOT(DYNAINFO(4)=0) AND XA_60 AND REF(COUNT(MA(CLOSE,20)>MA(CLOSE,30),4)=4 AND COUNT(CLOSE>MA(CLOSE,5),3)>=2,1) AND VOL>REF(VOL,1) AND (REF(COUNT(CLOSE>OPEN,10)>=6 OR COUNT(CLOSE>OPEN,5)>=4,1) OR CLOSE=HIGH) AND (CROSS(XA_57,XA_56) OR CROSS(XA_44,0) OR REF(COUNT(CROSS(XA_44,0),3)=1 AND XA_44<0.15 AND CLOSE/OPEN>0.989 AND CLOSE/REF(CLOSE,1)<1.03,1) OR CROSS(XA_45,XA_46) OR CROSS(XA_47,XA_48)) AND REF(CLOSE/OPEN>0.988 AND (CLOSE>OPEN OR (CLOSE<=OPEN AND HIGH/LOW<1.049)),1) AND HIGH/CLOSE<1.013 AND CLOSE/OPEN>1.05;
XA_62:=XA_11+XA_16+XA_19+XA_32+XA_61>=2;
XA_63:=MA(CLOSE,5)>MA(CLOSE,10) AND MA(CLOSE,10)>MA(CLOSE,20) AND MA(CLOSE,20)>MA(CLOSE,60) AND MA(CLOSE,60)>MA(CLOSE,120) AND MA(CLOSE,5)>REF(MA(CLOSE,5),1);
XA_64:=CLOSE>REF(CLOSE,1)*1.1-0.01;
XA_65:=HHV(HIGH,20)=HHV(CLOSE,1) AND VOL>0 AND BARSCOUNT(CLOSE)*XA_2>=20;
XA_66:=VOL/REF(VOL,1)*XA_2>1.9;
XA_67:=XA_63 AND XA_64 AND XA_65 AND XA_66;
XA_68:=MA(CLOSE,5);
XA_69:=MA(CLOSE,10);
XA_70:=MA(CLOSE,20);
XA_71:=MA(CLOSE,30);
XA_72:=MA(CLOSE,60);
XA_73:=CLOSE>XA_68 AND XA_68>XA_69 AND XA_69>XA_70 AND CLOSE>XA_72;
XA_74:=CLOSE/REF(CLOSE,1)>1.05 AND REF(CLOSE,1)/REF(CLOSE,2)<1.05 AND CLOSE/LLV(CLOSE,10)<1.4;
XA_75:=VOL/REF(VOL,1)>2 OR VOL=HHV(VOL,15);
XA_76:=CAPITAL<10000000;
XA_77:=ATAN((MA(CLOSE,5)/REF(MA(CLOSE,5),1)-1)*100)*57.299999>40;
XA_78:=ATAN((MA(CLOSE,10)/REF(MA(CLOSE,10),1)-1)*100)*57.299999>30;
XA_79:=ATAN((MA(CLOSE,20)/REF(MA(CLOSE,20),1)-1)*100)*57.299999>20;
XA_80:=ATAN((MA(CLOSE,30)/REF(MA(CLOSE,30),1)-1)*100)*57.299999>10;
XA_81:=XA_77 AND XA_78 AND XA_79 AND XA_80;
XA_82:=KDJ.K>REF(KDJ.K,1)*XA_2;
XA_83:=KDJ.D>REF(KDJ.D,1)*XA_2 AND KDJ.D<70;
XA_84:=KDJ.J>REF(KDJ.J,1)*XA_2;
XA_85:=XA_82 AND XA_83 AND XA_84;
XA_86:=XA_7 AND XA_74 AND XA_75 AND XA_76 AND XA_81 AND XA_85;
XA_87:=FILTER(XA_86,15)*XA_2;
XA_88:=XA_67 OR XA_87;
龙头:DATE<15000000 AND ((XA_88 AND XA_62)*XA_2 OR XA_35 OR XA_22),NODRAW,COLORRED;
STICKLINE(龙头,0,1,2,0),COLORRED;

{牛启动副图：}
DRAWGBK(C>O,RGB(10,0,0),RGB(0,0,0),1,2,1);
{主图买入}
A10:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
A11:=SMA(A10,3,1);
A12:=SMA(A11,3,1);
A13:=3*A11-2*A12;
A14:=C-REF(C,1);
A15:=100*EMA(EMA(A14,6),6)/EMA(EMA(ABS(A14),6),6);
买入:=LLV(A15,2)=LLV(A15,7) AND COUNT(A15<0,2) AND CROSS(A15,MA(A15,2));
MA5:=MA(C,5);
MA20:=MA(C,20);
角度5:=ATAN((MA(C,5)/REF(MA(C,5),1)-1)*100)*57.3;
角度60:=ATAN((MA(C,60)/REF(MA(C,60),1)-1)*100)*57.3;
A51:= REF(MA5,1)*0.98;
A52:= REF(MA5,2)*0.98;
B52:= BARSLAST(REF(C,2)>=REF(MA5,2) AND REF(C,1)<REF(MA5,1))+2;
B51:= BARSLAST(REF(C,2)>=REF(MA5,2) AND REF(C,1)<REF(MA5,1))+1;
DZ:=IF((REF(C,2)>=REF(MA5,2)) AND (REF(C,1)<REF(MA5,1)),IF(REF(MA5,2)<REF(MA5,1),A51,A52),IF(BARSSINCE(REF(C,2)>=REF(MA5,2) AND REF(C,1)<REF(MA5,1))>0,IF(REF(MA5, B52)< REF(MA5, B51),REF(MA5,B51)*0.98, REF(MA5,B52)*0.98), REF(MA5,1)));
A201:= REF(MA20,1)*0.98;
A202:= REF(MA20,2)*0.98;
B202:= BARSLAST(REF(C,2)>=REF(MA20,2) AND REF(C,1)<REF(MA20,1))+2;
B201:= BARSLAST(REF(C,2)>=REF(MA20,2) AND REF(C,1)<REF(MA20,1))+1;
ZZ:=IF((REF(C,2)>=REF(MA20,2)) AND (REF(C,1)<REF(MA20,1)),IF(REF(MA20,2)<REF(MA20,1),A201,A202),IF(BARSSINCE(REF(C,2)>=REF(MA20,2) AND REF(C,1)<REF(MA20,1))>0,IF(REF(MA20, B202)< REF(MA20, B201),REF(MA20,B201)*0.98, REF(MA20,B202)*0.98), REF(MA20,1)));
短止:=DZ,COLORWHITE,LINETHICK2;
紫线:=ZZ,COLORMAGENTA;
绿线:=LLV(REF(LOW,1),2)+(HHV(REF(HIGH,1),2)-LLV(REF(LOW,1),2))/2,COLORGREEN;
黄线:=MA(CLOSE,25)+MA(CLOSE,25)*6/100,COLORYELLOW,LINETHICK2;
白轨:=MA(CLOSE,25)+MA(CLOSE,25)*20/100,COLORWHITE;
影子线:=MA(CLOSE,25)+MA(CLOSE,25)*13/100,COLORGRAY;
AZZ:=LLV(REF(LOW,1),2)+(HHV(REF(HIGH,1),2)-LLV(REF(LOW,1),2))/2,COLORGREEN;
AXX:=((((MA(C,10) > MA(C,25)) && CROSS(C,MA(C,5))) && (V > MA(V,10))) && (MA(C,10) > REF(MA(C,10),1)));
ASS:=C>=黄线 AND AXX ;

角度黄线:=ATAN((黄线/REF(黄线,1)-1)*100)*180/3.1416;
XG6:=ASS AND 买入 AND 角度黄线>0;
XG7:=C/REF(C,1)>1.08 AND C>O AND 买入;
XG8:=买入 AND 角度黄线>0;
XG9:= C>=黄线 AND (CROSS(ZIG(3,10),REF(ZIG(3,10),1))) AND 角度黄线>0;
涨停:=(C-REF(C,1))/REF(C,1)*100>9.85 AND C=H;
T:=BARSLAST(涨停);
XG1:=COUNT(C/REF(C,1)>1.09,15)>1;
XG2:= XG6 OR XG7 OR XG8 OR XG9 ;
龙回头:XG1 AND XG2,NODRAW,COLORMAGENTA;
STICKLINE(龙回头,0,3,2,0),COLORMAGENTA;
S:=BARSLAST(龙回头);
放心买: S>=1 AND S<=3 AND C/REF(C,1)>1.02 ,NODRAW,COLORGREEN;
STICKLINE(放心买,6,9,2,0),COLORGREEN;
XG10:=CROSS(C,影子线) AND C/REF(C,1)>1.03 ;
XG11:=CROSS(C,黄线) AND C/REF(C,1)>1.05 AND 角度黄线>0 ;
XG12:=CROSS(C,白轨);
突破牛:XG10 OR XG12 ,NODRAW,COLORRED;
STICKLINE(突破牛,3,6,2,0),COLORRED;