指标公式第677篇：通达信资金神剑指标

TAX:=HORCALC(HYBLOCK,105,1,DRAWNULL);TAA:=STRCAT(HYBLOCK,'排名 ：');
DRAWTEXT_FIX(ISLASTBAR,0.70,0.005,0,STRCAT(TAA,CON2STR(TAX,0)));
所属板块:=STRCAT('【所属板块】',STRCAT(STRCAT(STRCAT('【行业】',HYBLOCK),STRCAT('【地区】',DYBLOCK)),STRCAT('【概念】',GNBLOCK)));
DRAWTEXT_FIX(ISLASTBAR,0.00,0.0,0,所属板块),COLORRED;
A0:=(3*C+L+O+H)/6;
X:=(20*A0+19*REF(A0,1)+18*REF(A0,2)+17*REF(A0,3)+16*REF(A0,4)+15*REF(A0,5)+ 14*REF(A0,6)+13*REF(A0,7)+12*REF(A0,8)+11*REF(A0,9)+10*REF(A0,10)+9*REF(A0,11)+8*REF(A0,12) +7*REF(A0,13)+6*REF(A0,14)+5*REF(A0,15)+4*REF(A0,16)+3*REF(A0,17)+2*REF(A0,18)+ REF(A0,20))/210;
MTM:=C-REF(C,1);
筹码盈利:=STRCAT(STRCAT('筹码盈利:',CON2STR(WINNER(DYNAINFO(7))*100,1)),'%');
DRAWTEXT_FIX(1,0,0.12,0,筹码盈利),COLORRED;
STICKLINE(C< 0.905*REF(C,1),C,O,2.5,0),COLORGREEN;
VAW1:=EMA(EMA(CLOSE,13),13);
控盘:=(VAW1-REF(VAW1,1))/REF(VAW1,1)*1000;
无庄控盘:=控盘< 0;
有庄控盘:=控盘>REF(控盘,1) AND 控盘>0;
JJ:=DYNAINFO(11);P:=21;S:=8;M1:=3;
财:=(EMA(CLOSE,S)-EMA(CLOSE,P))*50;
神:=EMA(财,M1);
章鱼哥1:=(C-JJ)/JJ< -0.03;
章鱼哥11:=(C-JJ)/JJ< -0.03;
章鱼哥12:=LAST(JJ>=REF(JJ,1),5,1) AND (C-JJ)/JJ< 0.005;
鱼哥1:=(C-JJ)/JJ>0.005;
鱼哥01:=控盘< REF(控盘,1) AND 控盘>0.5;
鱼哥02:=控盘>0;
章鱼哥2:=控盘>REF(控盘,1) AND 控盘< -0.2;
章鱼哥22:=控盘>REF(控盘,1) AND 控盘< 0 ;
章鱼哥3:=CROSS(财,神) AND 财< -0.3;
章鱼哥32:=CROSS(财,神) AND 财< -0.1;
鱼哥31:=CROSS(神,财);
鱼哥32:=CROSS(神,财) AND 财>1.618;
章鱼哥81:=FILTER(章鱼哥1 AND 章鱼哥2 AND 章鱼哥3,13);
章鱼哥811:=FILTER(章鱼哥11 AND 章鱼哥2 AND 章鱼哥3,13);
章鱼哥82:=FILTER(章鱼哥12 AND 章鱼哥22 AND 章鱼哥32,13);
鱼哥81:=FILTER(鱼哥1 AND 鱼哥01 AND 鱼哥31,13);
鱼哥82:=FILTER(鱼哥02 AND 鱼哥32 ,13);
鱼哥83:=鱼哥81 AND 鱼哥82;DRAWTEXT(鱼哥83,H*1.002,'↓ 卖出'),COLORGREEN;
DRAWICON(鱼哥83,H+0.003,6);
庄:= 章鱼哥11 AND 章鱼哥2 AND 章鱼哥3;
有庄:=FILTER(庄,30);DRAWTEXT(有庄,L-0.0011,'↖买入'),COLORYELLOW;
DRAWICON(有庄,L*0.999,5);
生命线:MA(CLOSE,8),COLORYELLOW LINETHICK2;
LS:=C/REF(C,1)>1.048 AND C=H AND BETWEEN(FORCAST(V,4),0.2*FORCAST(V,6),2.1*FORCAST(V,6));
拉升:=FILTER(LS,14);
DRAWTEXT_FIX(C>O,0.5,0.5,0,'留下联系方式，稍后添加您！！'),COLORRED;
多方线:=MA(CLOSE,60),COLORBLUE LINETHICK2;
DRAWICON(拉升,LOW*0.995,9);
DRAWTEXT(拉升,LOW*0.995,'↘章鱼'),COLORYELLOW;
AA1:=(C-REF(C,1))/REF(C,1)>=0.058 AND (C-REF(C,1))/REF(C,1)< 0.095 ;
AA2:=(C-REF(C,1))/REF(C,1)>=0.098 ;
MA54:=MA(CLOSE,54);
MA120:=MA(CLOSE,120);STICKLINE(C/REF(C,1)>=1.096 AND H=C,O,C,2,0),COLORYELLOW;
ZYG8:=(REF(CLOSE,3)-CLOSE)/REF(CLOSE,3)*100>5;
ZYG9:=FILTER(ZYG8,10);
ZYG10:=BARSLAST(ZYG9);
ZYG11:=REF(HIGH,ZYG10+2);
ZYG12:=REF(HIGH,ZYG10+1);
ZYG13:=REF(HIGH,ZYG10);
ZYG14:=MAX(ZYG11,ZYG12);
ZYG15:=MAX(ZYG14,ZYG13);
ZYG16:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>5;
ZYG17:=ZYG10< 150;
ZYG18:=(OPEN-ZYG15)/ZYG15*100< 30;
ZYG19:=(CLOSE-LLV(LOW,ZYG10))/LLV(LOW,ZYG10)*100< 50;
ZYG20:=(CLOSE-REF(OPEN,5))/REF(OPEN,5)*100< 30;
ZYG21:=VOL/MA(VOL,5)< 3.5;ZYG22:=(CLOSE-REF(CLOSE,89))/REF(CLOSE,89)*100< 80;
ZYG25:=ZYG16 AND ZYG17 AND ZYG18 AND ZYG19 AND ZYG20 AND ZYG21 AND ZYG22;
暴利:=FILTER(ZYG25,15);PL1:=(((CLOSE-MA54)/MA54)< 0.1);
PL2:=(((CLOSE-生命线)/生命线)< 0.3);
偏离率:=(((PL1=1) AND (PL2=1))*0.2);
平台突破:=((((偏离率=0) AND (REF(偏离率,1)=0.2)) AND (REF((COUNT((偏离率=0.2),10)=10),1)=1))*-0.1);
妖股突破:=平台突破=-0.1;
XDF:=(暴利 OR 妖股突破);
CBAA:=DMA(AMOUNT/VOL/100,VOL/CAPITAL);
CBAAA:=DYNAINFO(7)/(REF(CLOSE,1))>1.05 AND (DYNAINFO(7)/O>1.05);
FLIGA:=(VOL/REF(VOL,1)>1.2 AND COUNT(CLOSE>OPEN,1)) OR (LOW>REF(HIGH,1) AND COUNT(OPEN>CLOSE,1) AND VOL/REF(VOL,1)>1.2);
妖股:=XDF AND C/REF(C,1)>1.095 AND FLIGA AND CBAAA,NODRAW;
DRAWICON(妖股,H*1,25);
DRAWTEXT(妖股,H*1,'↘鱼哥'),COLORMAGENTA;

ZYG1:=INTPART(SUM(V,0)/CAPITAL);
ZYG2:=ZYG1>REF(ZYG1,1) OR BARSSINCE(CLOSE)=0;
ZYG3:=BARSLAST(ZYG2)+1;
ZYG4:=ZYG3< REF(ZYG3,1);
ZYG5:=IF(ZYG4,REF(ZYG3,1)+1,ZYG3);
ZYG6:=SUM(ZYG4,0);ZYG7:=DMA(AMOUNT/VOL/100,VOL/CAPITAL);
ZYG8:=CLOSE/(REF(CLOSE,1))>1.05 AND (HIGH/CLOSE< 1.01);
游资进场:=(FILTER(ZYG8>0,34)AND DYNAINFO(4)>0)*8,COLORYELLOW;
ZYG9:=5;DRAWTEXT_FIX(C>O,0.5,0.5,0,'留下联系方式，稍后添加您！！'),COLORRED;
LS:=C/REF(C,1)>1.048 AND C=H AND BETWEEN(FORCAST(V,4),0.2*FORCAST(V,6),2.1*FORCAST(V,6));
章鱼哥:=FILTER(LS,14);
DRAWTEXT(章鱼哥,0.6,'★资金进场★'),COLORYELLOW;
DRAWTEXT(章鱼哥,0.4,'★首板★'),COLORMAGENTA;STICKLINE(章鱼哥,0.9,1,0.1,0),COLOR0000FF;
STICKLINE(章鱼哥,0.8,0.9,1,0),COLOR0000FF;STICKLINE(章鱼哥,0.7,0.8,2,0),COLOR0000FF;
STICKLINE(章鱼哥,0.6,0.7,3,0),COLOR0000FF;STICKLINE(章鱼哥,0.5,0.6,4,0),COLOR0000FF;
STICKLINE(章鱼哥,0.4,0.5,5,0),COLOR0000FF;STICKLINE(章鱼哥,0.3,0.4,6,0),COLOR0000FF;
STICKLINE(章鱼哥,0.2,0.3,7,0),COLOR0000FF;STICKLINE(章鱼哥,0.2,0.25,18,0),COLOR0000FF;
STICKLINE(章鱼哥,0.25,0.1,2,0),COLOR0000FF;STICKLINE(章鱼哥,0,0.2,2,0),COLOR0000FF;
STICKLINE(章鱼哥,0,0.05,6,0),COLOR0000FF;

ZYG1:=INTPART(SUM(V,0)/CAPITAL);
ZYG2:=ZYG1>REF(ZYG1,1) OR BARSSINCE(CLOSE)=0;
ZYG3:=BARSLAST(ZYG2)+1;
ZYG4:=ZYG3< REF(ZYG3,1);
ZYG5:=IF(ZYG4,REF(ZYG3,1)+1,ZYG3);
ZYG6:=SUM(ZYG4,0);ZYG7:=DMA(AMOUNT/VOL/100,VOL/CAPITAL);
ZYG8:=CLOSE/(REF(CLOSE,1))>1.05 AND (HIGH/CLOSE< 1.01);
游资进场:=(FILTER(ZYG8>0,34)AND DYNAINFO(4)>0)*8,COLORYELLOW;
ZYG9:=5;LS:=C/REF(C,1)>1.048 AND C=H AND BETWEEN(FORCAST(V,4),0.2*FORCAST(V,6),2.1*FORCAST(V,6));
XG:=FILTER(LS,14);
章鱼资金:XG;