异动擒龙指标：从均线异动到热点追踪

源码：

天异动:=MA(C,5);
人异动:=MA(C,36);
地异动:=人异动*0.99;
金异动:=人异动*0.97;
D:=地异动/天异动;
E:=D>=1 AND D< 1.02;
F:=CROSS(C,天异动)AND CROSS(C, 地异动);
开仓点:=(H+L)/2;
妖启伏点:=地异动;
妖启1:=E AND F AND 地异动>天异动 AND O< 天异动;
妖启:=FILTER(妖启1,40)*1;
DRAWTEXT(妖启,L*0.99,' 妖启★动'),COLORMAGENTA;
DRAWICON(妖启,L*0.975,29);
DRAWTEXT_FIX(ISLASTBAR,0.5,0,0,HYBLOCK),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.55,0,0,DYBLOCK),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.6,0,0,GNBLOCK),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.5,0.03,0,FGBLOCK),COLORMAGENTA;
A3:MA(C,3),DOTLINE;
A13:MA(C,13),DOTLINE;
A21:MA(C,21),DOTLINE;
涨幅:=(C-REF(C,1))/REF(C,1)*100,NODRAW;
连涨:=BARSLASTCOUNT(C>REF(C,1)),NODRAW;
A1A:=C>REF(C,1) ,NODRAW;
A2A:=A1A*涨幅,NODRAW;
最后1天:=SUM(A2A,连涨) AND (C< REF(C,1),1),NODRAW;
求和:=SUM(A2A,连涨) ,NODRAW;
DRAWTEXT(最后1天=1 AND 连涨>=3 AND 求和<=10,H*1.01,VARCAT(VAR2STR(求和,1),'%')),COLORMAGENTA;
DRAWTEXT(最后1天=1 AND 连涨>=3 AND 求和>10,H*1.01,VARCAT(VAR2STR(求和,1),'%')),COLORYELLOW;
连跌:=BARSLASTCOUNT(C< REF(C,1)),NODRAW;
A1B:=C< REF(C,1) ,NODRAW;
A2B:=A1B*涨幅,NODRAW;
最后1天B:=SUM(A2B,连跌) AND (C>REF(C,1),1),NODRAW;
求和B:=SUM(A2B,连跌) ,NODRAW;
DRAWTEXT(最后1天B=1 AND 连跌>=3 AND 求和B< -10,L*0.99,VARCAT(VAR2STR(求和B*-1,1),'%')),COLORGREEN;
DRAWTEXT_FIX(1,0.915,0.93,0,'连续涨'),COLORYELLOW;
DRAWNUMBER_FIX(1,0.96,0.93,0,CONST(连涨)),COLORRED;
DRAWTEXT_FIX(1,0.98,0.93,0,'天'),COLORYELLOW;
DRAWTEXT_FIX(1,0.915,1,0,'连续跌'),COLORGREEN;
DRAWNUMBER_FIX(1,0.96,1,0,CONST(连跌)),COLORGREEN;
DRAWTEXT_FIX(1,0.98,1,0,'天'),COLORGREEN;
ZT:=C/REF(C,1)>1.099 AND H>L;
RC1:=REF(C,1);
CS:=IF(C>=1,10000,100000);
智能机构10:=1.10*RC1-49/CS;
智能机构5 :=1.05*RC1-49/CS;
机构异动10:=0.90*RC1+51/CS;
机构异动5 :=0.95*RC1+51/CS;
ST:=NAMELIKE('S') OR NAMELIKE('*S');
擒龙:= IF(ST, C>=智能机构5, C>=智能机构10);
跌停:= IF(ST, C<=机构异动5, C<=机构异动10);
盘中擒龙:=IF(ST, H>=智能机构5, H>=智能机构10);
盘中跌停:=IF(ST, L<=机构异动5, L<=机构异动10);
STICKLINE(盘中擒龙,H,MAX(C,O),0,0),COLORMAGENTA;
STICKLINE(盘中跌停,L,MIN(C,O),0,0),COLORLICYAN;
STICKLINE(擒龙,O,C,1,0),COLORMAGENTA;
STICKLINE(跌停,O,C,1,0),COLORLICYAN;
DRAWICON(擒龙,L,9);
DRAWTEXT(擒龙 ,L*0.976,'★热点')COLORYELLOW;