「翔博精选指标」擒龙杀妖主图,捉龙头（通达信公式 主图 源码 测

这个是我的自用公式，主图公式带有几项战法（包含擒龙战法、首阴战法、七日战法、实用性很强，希望能够帮助大家在市场里面捞金 不带未来函数，无时间限制，为参考选股之用，股市不确定性较大，一切买卖和盈亏与公式无关!

DRAWTEXT_FIX(1,0.439,0.01,0,'量比：'),COLORYELLOW;
DRAWTEXT_FIX(1,0.439,0.06,0,'成交方向：'),COLORYELLOW;
DRAWTEXT_FIX(1,0.439,0.11,0,'主动买单：'),COLORYELLOW;
DRAWTEXT_FIX(1,0.439,0.16,0,'均价：'),COLORYELLOW;
DRAWTEXT_FIX(1,0.439,0.21,0,'现价：'),COLORYELLOW;
DRAWNUMBER_FIX(1,0.469,0.01,0,量比),COLORWHITE;
DRAWNUMBER_FIX(1,0.49,0.06,0,成交方向),COLORWHITE;
DRAWNUMBER_FIX(1,0.49,0.11,0,主动买单),COLORWHITE;
DRAWNUMBER_FIX(1,0.47,0.16,0,均价),COLORWHITE;
DRAWNUMBER_FIX(1,0.47,0.21,0,现价),COLORWHITE;
DRAWTEXT_FIX(优秀 AND 较好=0,0.645,0.01,0,'基本面：优秀级！'),COLORRED;
DRAWTEXT_FIX(较好,0.645,0.06,0,'基本面：较好！'),COLORMAGENTA;

红轨道:=MA(MA(CLOSE,3),1),LINETHICK1,COLORYELLOW;
绿轨道:=MA(MA(CLOSE,3),3);
上升:IF(红轨道>=绿轨道,绿轨道,DRAWNULL),COLORRED,LINETHICK3;
AA1:=3*SMA((C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100,3,1)-2*SMA(SMA((C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100,3,1),3,1);
加仓:=IF(CROSS(AA1,REF(AA1+0.01,1)) AND LLV(AA1,2)=LLV(AA1,8) AND
BETWEEN(AA1,20,60),1,0);
波段底:=(3)*(SMA(((CLOSE - LLV(LOW,27))/(HHV(HIGH,27)
- LLV(LOW,27)))*(100),5,1)) -
(2)*(SMA(SMA(((CLOSE -
LLV(LOW,27))/(HHV(HIGH,27) - LLV(LOW,27)))*(100),5,1),3,1));
DRAWICON(加仓,L*0.97,7);
DRAWICON(CROSS(波段底,3),L*0.97,1);
A:=(3*C+L+O+H)/6;
X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+
14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+
REF(A,20))/210;
MTM:=C-REF(C,1);
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
CB:=EMA(X,13);
卖:=IF(HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX),1,0);
DRAWTEXT(FILTER(卖=1,1),HIGH*1.02,'卖'),COLORWHITE;
买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0);
DRAWTEXT(FILTER(买=1,5),LOW-0.03,'买'),COLORRED;
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
BDGD:=HHV(J,2)=HHV(J,8) AND J>80;
注意:=IF(CROSS(REF(J-0.01,1),J) AND REF(BDGD,1),1,0);
DRAWTEXT(注意 AND
卖!=1,HIGH*1.02,'减'),COLORLIBLUE;
加仓A:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10;
DRAWTEXT(FILTER((CROSS(加仓A,0) OR CROSS(CLOSE,CB)) AND
买!=1,3),LOW-0.03,'加'),COLOR0080FF;
MA18:=MA(C,18);
跟:=IF(MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18),1,0);
DRAWTEXT(MA18>=REF(MA18,3) AND
CROSS(CLOSE,MA18),LOW*0.96,'跟'),COLOR7F52AF;
DRAWTEXT(FILTER(买=1,5),LOW*0.97,'★大机构进场'),COLORRED;
C1:(REF(C,1)-REF(C,2))/REF(C,2) > 0.095,NODRAW;
C2:(C-REF(C,1))/REF(C,1)<0.095,NODRAW;
C3:C>MA(C,5),NODRAW;
STICKLINE(C1 AND C2 AND C3,OPEN,CLOSE,1,0),COLORYELLOW;
STICKLINE(C1 AND C2 AND C3,H,L,1,0),COLORYELLOW;
DRAWTEXT(C1 AND C2 AND C3,L*1.05,'_首阴'),COLORGREEN;

{擒龙妖股}
月DIF:="MACD.DIF#MONTH";
月DEA:="MACD.DEA#MONTH",;
周DIF:="MACD.DIF#WEEK";
周DEA:="MACD.DEA#WEEK",;
日DIF:="MACD.DIF";
日DEA:="MACD.DEA";
日金叉:=CROSS(日DIF,日DEA);
周金叉:=CROSS(周DIF,周DEA);
月金叉:=CROSS(月DIF,月DEA);
V1:=IF(DATE<=1201001,1,0);
金叉共振:=IF(CROSS(周DIF,周DEA),MACD+0.1,0),COLORWHITE,LINETHICK2;
共振:=IF((日DIF>日DEA AND 周DIF>周DEA AND 月金叉) OR ( 周DIF>周DEA AND 月DIF>月DEA AND 日金叉) AND C/REF(C,1)>1.08 
OR (月DIF>月DEA AND 日DIF>日DEA AND 周金叉) OR (日金叉 AND 周金叉 AND 月金叉),MACD+0.2,0),COLORF00FF0,LINETHICK3;  
STICKLINE(金叉共振 AND C/REF(C,1)>1.05,O,REF(C,1)*1.05,3.2,0),COLOR0077FF;
STICKLINE(金叉共振 AND C/REF(C,1)>1.05,O,REF(C,1)*1.05,2.5,0),COLOR0099FF;
STICKLINE(金叉共振 AND C/REF(C,1)>1.05,O,REF(C,1)*1.05,1.9,0),COLOR00BBFF;
STICKLINE(金叉共振 AND C/REF(C,1)>1.05,O,REF(C,1)*1.05,1.2,0),COLOR00DDFF;
STICKLINE(金叉共振 AND C/REF(C,1)>1.05,O,REF(C,1)*1.05,0.3,0),COLOR00FFFF;

STICKLINE(共振 AND C/REF(C,1)>1.08,C,REF(C,1)*1.05,3,0),COLOR000099;
STICKLINE(共振 AND C/REF(C,1)>1.08,C,REF(C,1)*1.05,2.2,0),COLOR0000CC;
STICKLINE(共振 AND C/REF(C,1)>1.08,C,REF(C,1)*1.05,1.5,0),COLOR0000FF;
STICKLINE(共振 AND C/REF(C,1)>1.08,C,REF(C,1)*1.05,0.5,0),COLORCC66FF;
STICKLINE(共振 AND C/REF(C,1)>1.08,REF(C,1)*1.05,C,0.5,0),COLORYELLOW;
DRAWTEXT(共振 AND C/REF(C,1)>1.08 AND V1,REF(C,1)*1.058,'↖擒龙抓妖'),COLORYELLOW;
DRAWTEXT(金叉共振 AND C/REF(C,1)>1.05,REF(C,1)*1.028,'↖妖股初现'),COLORRED;

{判断倒数第6天涨停}
C_7:=REF(C,7);
C_6:=REF(C,6);
YU_S:=MOD(C_7*100,10);
JIN_W:=IF(YU_S>4,1,0);
JUDGE_ZT:=C_6=C_7+INTPART(C_7*10)/100+JIN_W/100;
{判断当天收盘价高于5日均线}
JUDGE_2:=C>MA(C,5);

{画线}
STICKLINE(JUDGE_ZT*JUDGE_2,C,O,3,0),COLORYELLOW;
STICKLINE(JUDGE_ZT*JUDGE_2,H,L,0.1,0),COLORYELLOW;
DRAWTEXT(JUDGE_ZT*JUDGE_2,L,'神奇7日'),COLORRED;