通达信“强庄踪迹”主图指标选股公式--强庄进场

---

点击 关注☝ ， 置顶 + 星标 每天订阅， 学习更多指标内容 ☼☝

一、指标说明：

趋势类指标，自动画下降趋势线，当庄家建仓完毕，往上突破企稳时，画上升通道线，回踩企稳，强庄进场，提示主力成本和获利比例。

二、主图公式如下：

所属地域:=STRCAT('所属地域：',DYBLOCK);

所属行业:=STRCAT('所属行业：',HYBLOCK);

所属概念:=STRCAT('所属概念：',GNBLOCK);

所属风格:=STRCAT('所属风格：',FGBLOCK);

DRAWTEXT_FIX(1,0.00,0.02,0,所属行业),COLORYELLOW;

DRAWTEXT_FIX(1,0.00,0.09,0,所属概念),COLORYELLOW;

DRAWTEXT_FIX(1,0.00,0.16,0,所属风格)COLORRED;

沪A涨家数:="999999$ADVANCE",COLORRED,NODRAW;

沪A跌家数:="999999$DECLINE",COLORGREEN,NODRAW;

深A涨家数:="399001$ADVANCE",COLORRED,NODRAW;

深A跌家数:="399001$DECLINE",COLORGREEN,NODRAW;

中小涨家数:="399005$ADVANCE",COLORRED,NODRAW;

中小跌家数:="399005$DECLINE",COLORGREEN,NODRAW;

创业涨家数:="399006$ADVANCE",COLORRED,NODRAW;

创业跌家数:="399006$DECLINE",COLORGREEN,NODRAW;

市场成本:=DMA(AMOUNT/(100*VOL),VOL/CAPITAL),COLORYELLOW,DOTLINE;

最新获利:=(C/市场成本-1)*100,NODRAW;

IF(CURRBARSCOUNT<=10,CONST(市场成本),DRAWNULL),COLORLIGRAY,DOTLINE;

DRAWTEXT(ISLASTBAR,市场成本*0.98,VARCAT(VARCAT(' ↖主力移动成本：',VAR2STR(市场成本,2)),'元'))COLORYELLOW;

DRAWTEXT(ISLASTBAR,市场成本*0.95,VARCAT(VARCAT(' 获利：',VAR2STR(最新获利,2)),'%'))COLORYELLOW;

DDD:=(DYNAINFO(5)< 0.01 || DYNAINFO(6)< 0.01);

DRAWTEXT_FIX(C>O,0.01,0.9,0,'微信公众号：欧欧量化'),COLOR0000FF;

HIGHN:=10;

LOWN:=10;

HIGHDISPLAY:=0;

LOWDISPLAY:=0;

ZGDISPLAY:=0;

MADISPLAY:=0;

AA:=REF(H,HIGHN)=HHV(H,2*HIGHN+1);

QY:=BACKSET(AA,HIGHN+1);

CC:=FILTER(QY,HIGHN) AND H=HHV(H,HIGHN+1);

DRAWICON(CC,H*1.02,2);

DDD1:=BARSLAST(CC);

GDTS:=IF(CC,CURRBARSCOUNT,0);

DINGBU:=IF(DDD1,REF(H,DDD),H);{顶部}

DINGBUTS:=IF(DDD1,REF(GDTS,DDD1),GDTS);

DINGBU1:=REF(DINGBU,DDD1+1);

GDCS1:=CONST(DINGBUTS);

DINGBUTS1:=REF(DINGBUTS,DDD1+1);

GDCS2:=CONST(DINGBUTS1);

DINGBU2:=REF(DINGBU1,DDD1+1);

MM:=IF(CURRBARSCOUNT>GDCS2,0,1);

上轨:DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1),COLORRED,DOTLINE;

DRAWLINE(CURRBARSCOUNT=GDCS2,H,ISLASTBAR,REF(H,GDCS2-1),1),COLOR0055FF,POINTDOT;

DRAWLINE(CURRBARSCOUNT=GDCS1,H,ISLASTBAR,REF(H,GDCS1-1),1),COLORYELLOW,POINTDOT;

AA1:=REF(L,LOWN)=LLV(L,2*LOWN+1);

QY1:=BACKSET(AA1,LOWN+1);

CC1:=FILTER(QY1,LOWN) AND L=LLV(L,LOWN+1);

DRAWICON(CC1,L*0.98,1);

DD1:=BARSLAST(CC1);

DDTS:=IF(CC1,CURRBARSCOUNT,0);

YDB:=IF(DD1,REF(L,DD1),L);

DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);

DDCS1:=CONST(DDTS1);

ZDB:=REF(YDB,DD1+1);

DDTS2:=REF(DDTS1,DD1+1);

DDCS2:=CONST(DDTS2);

下轨:DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1) ,COLORRED,DOTLINE;

ZGSTAR:=(上轨+下轨)/2;

ZGEND:=CONST((上轨+下轨)/2);

STARDAY:=IF(DDCS2

中轨:DRAWLINE(CURRBARSCOUNT=STARDAY,ZGSTAR,ISLASTBAR,ZGEND,1),COLORRED,DOTLINE;

DRAWLINE(CURRBARSCOUNT=DDCS1,L,ISLASTBAR,REF(L,DDCS1-1),1),COLORMAGENTA,POINTDOT;

DRAWLINE(CURRBARSCOUNT=DDCS2,L,ISLASTBAR,REF(L,DDCS2-1),1),COLORCYAN,POINTDOT;

AAA:=(3*C+H+L+O)/6;

CTD1:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36;

CTD2:=(HHV(CTD1,5)+HHV(CTD1,10)+HHV(CTD1,20))/3;

CTD3:=(LLV(CTD1,5)+LLV(CTD1,10)+LLV(CTD1,20))/3;

CTD4:=(HHV(CTD2,5)+HHV(CTD2,10)+HHV(CTD2,20))/3;

CTD5:=(LLV(CTD3,5)+LLV(CTD3,10)+LLV(CTD3,20))/3;

CTD6:=(LLV(CTD1,2)+LLV(CTD1,4)+LLV(CTD1,6))/3;

CTD7:=0;

CTD8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;

CTD9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;

CTD10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);

CTD11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);

CTD12:=ZIG(3,6) =REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);

CTD13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);

CTD14:=ZIG(3,22) =REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);

CTD15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);

CTD16:=ZIG(3,51) =REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);

CTD17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);

CTD18:=ZIG(3,72) =REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);

CTD19:=EMA(CLOSE,2)-EMA(CLOSE,150);

买１:=CTD10;

买２:=(CTD11+CTD13+CTD15+CTD17);

卖１:=(CTD12+CTD14+CTD16+CTD18);

B:IF(买１>0 OR 买２>0,LOW*0.99,DRAWNULL),CROSSDOT,LINETHICK3,COLORYELLOW;

DRAWTEXT(买１>0 OR 买２>0,LOW*0.99,'买'),COLORRED;

S:IF(卖１>0,HIGH*1.01,DRAWNULL),CROSSDOT,LINETHICK3,COLORGREEN;

DRAWTEXT(卖１>0,HIGH*1.02,'卖'),COLORGREEN;

ZB:=EMA(EMA(CTD3,5),5)*3, COLORSTICK;

CTDA:=IF(CTD9 AND CROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0);

K:=EMA(CTD7,5)*2, , COLORFF00FF;

D:=EMA(K,5), , COLORWHITE;

J:=K*3-D*2, ,COLORYELLOW;

CTDB:=BETWEEN(CLOSE,MA(CLOSE,3),MA(CLOSE,5)) AND J>10;

HS:=VOL/CAPITAL*100, , COLORGREEN;

CTDE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;

CTDF:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);

DRAWTEXT(CTD11 AND COUNT(CTD11,30)=1,LOW*0.95,'强庄进场'),LINETHICK1,COLORFF00FF;

CTD1A:=IF(CTDE>0,CTDE,0);

CTD1B:=IF(CTD14>=200 AND CTD13>=150,15,IF(CTD14<=-200 AND CTD13<=-150,-15,CTD16))+60;

CTD1C:=CTD1A>48 AND CTD1B>60 AND CTD19<100;

DRAWTEXT(CTD1C AND COUNT(CTD1C,30)=1,LOW*0.95,'大顶（底）') COLORWHITE;

指标王:=CROSS(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,3,1),SMA(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,3,1),3,1)) AND SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,3,1)<20;

DRAWTEXT(指标王,L,'强庄建仓'),COLORYELLOW;

DRAWTEXT(CTD1,L*0.98,'★短买'),COLORYELLOW;

DRAWTEXT(CROSS(MA(C,3),MA(C,9)) AND C>=REF(C,1) AND C>O,L*0.98,''),COLORMAGENTA;

下降压力线:DRAWLINE(HIGH>=HHV(HIGH,10),HIGH,LOW<=LLV(LOW,3),HHV(HIGH,3),1),COLORGREEN,LINETHICK2;

STICKLINE(CURRBARSCOUNT=2,L,L,10,0),COLORGREEN,;

DRAWNUMBER(ISLASTBAR,REF(L,1),REF(L,1));