通达信〖跟踪机构主图〗机构下场,跟随上车 主图+副图指标
跟踪机构主图(手机和电脑版通用)
{主图源码如下}
O1:(SUM(EMA((CLOSE+LOW)/2,1)/3,3)),COLOR00FFFF,LINETHICK1;
O2:EMA(O1,3),COLORFF00FF,LINETHICK1;
O3:EMA(O2,3),COLOR00FF00,LINETHICK1;
MMM:=MA(CLOSE,20);
DRAWTEXT((CLOSE<MMM),MMM,'*'),COLOR00FF00,LINETHICK5;
DRAWTEXT((CLOSE>MMM),MMM,'*'),COLOR0000FF,LINETHICK5;
ZBGS31:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
ZBGS32:=REF(ZBGS31,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS33:=REF(ZBGS32,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS34:=REF(ZBGS33,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS35:=REF(ZBGS34,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS36:=REF(ZBGS35,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS37:=REF(ZBGS36,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS38:=REF(ZBGS37,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS39:=REF(ZBGS38,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS3A:=REF(ZBGS39,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS3B:=REF(ZBGS3A,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS3C:=REF(ZBGS3B,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS3D:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
ZBGS3E:=REF(ZBGS3D,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS3F:=REF(ZBGS3E,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS310:=REF(ZBGS3F,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS311:=REF(ZBGS310,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS312:=REF(ZBGS311,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS313:=REF(ZBGS312,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS314:=REF(ZBGS313,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS315:=REF(ZBGS314,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS316:=REF(ZBGS315,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS317:=REF(ZBGS316,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS318:=REF(ZBGS317,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS319:=REF(ZBGS3D OR ZBGS3E OR ZBGS3F OR ZBGS310 OR ZBGS311 OR ZBGS312 OR ZBGS313 OR
ZBGS314 OR ZBGS315 OR ZBGS316 OR ZBGS317 OR ZBGS318,1) AND ZBGS31;
ZBGS31A:=REF(ZBGS31 OR ZBGS32 OR ZBGS33 OR ZBGS34 OR ZBGS35 OR ZBGS36 OR ZBGS37 OR
ZBGS38 OR ZBGS39 OR ZBGS3A OR ZBGS3B OR ZBGS3C,1) AND ZBGS3D;
STICKLINE(ZBGS31A,REF(CLOSE,1),REF(CLOSE,2),3.2,0),COLORFF3300;
STICKLINE(ZBGS31A,REF(CLOSE,1),REF(CLOSE,2),2.7,0),COLORFF5500;
STICKLINE(ZBGS31A,REF(CLOSE,1),REF(CLOSE,2),2.1,0),COLORFF7700;
STICKLINE(ZBGS31A,REF(CLOSE,1),REF(CLOSE,2),1.5,0),COLORFF9900;
STICKLINE(ZBGS31A,REF(CLOSE,1),REF(CLOSE,2),0.9,0),COLORFFBB00;
STICKLINE(ZBGS31A,REF(CLOSE,1),REF(CLOSE,2),0.3,0),COLORFFDD00;
DRAWTEXT(FILTER(ZBGS319=1,5),LOW,' 机构启动'),COLORYELLOW;
DRAWICON(FILTER(ZBGS319=1,5),LOW,9);
DRAWTEXT(FILTER(ZBGS31A=1,5),HIGH,' '),COLOR00FF00;
DRAWICON(FILTER(ZBGS31A=1,5),HIGH,15);
{副图源码如下}
ZBGS31:=(CLOSE-MA(CLOSE,5))/MA(CLOSE,5);
ZBGS32:=(LLV(CLOSE,3)-HHV(CLOSE,13))/HHV(CLOSE,13)*100<-13;
LHX:(ZBGS31)*100,STICK;
STICKLINE(ZBGS31>0,0,LHX,2.5,0),COLORRED;
STICKLINE(ZBGS31>0,0,LHX,2.5,0),COLOR9933FF;
STICKLINE(ZBGS31>0,0,LHX,2,0),COLOR000099;
STICKLINE(ZBGS31>0,0,LHX,1.5,0),COLOR0000CC;
STICKLINE(ZBGS31>0,0,LHX,1,0),COLOR0000FF;
STICKLINE(ZBGS31>0,0,LHX,0,0),COLOR0033FF;
STICKLINE(ZBGS31<0,0,LHX,2.5,0),COLORCYAN;
STICKLINE(ZBGS31<0,0,LHX,2.5,0),COLOR009900;
STICKLINE(ZBGS31<0,0,LHX,2,0),COLOR00CC00;
STICKLINE(ZBGS31<0,0,LHX,1.5,0),COLOR33FF00;
STICKLINE(ZBGS31<0,0,LHX,1,0),COLOR33FF00;
STICKLINE(ZBGS31<0,0,LHX,0,0),COLOR33FF00;
LHX1:EMA(LHX,5)*5,COLORMAGENTA;
LHX2:MA(LHX1,3),COLORGREEN;
LHX3:MA(LHX1,5),COLORWHITE;
ZBGS33:=CROSS(LHX1,LHX2) AND ZBGS32 AND LLV(LHX1,3)-REF(LHX1,13)<-25 AND LHX3<-8;
ZBGS34:=ZBGS33 AND (LLV(LHX2,3)>LLV(LHX2,39) OR LLV(LHX3,3)>LLV(LHX3,39));
ZBGS35:=(LLV(LHX2,3)>LLV(LHX2,44) OR LLV(LHX3,3)>LLV(LHX3,44));
ZBGS36:=ZBGS35 AND CROSS(LHX1,LHX2) AND COUNT(LHX1<-22,3)>=1;
ZBGS37:=(REF(LHX1,1)<REF(LHX1,2) AND LHX1>REF(LHX1,1)) OR CROSS(LHX1,LHX2);
ZBGS38:=(ZBGS37 OR CROSS(LHX1,LHX3)) AND COUNT(LHX1<-5,3)>=1 AND LHX1-REF(LHX1,1)>1;
机构筹码:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100;
机构启动:=SMA(机构筹码,3,1);
买入:FILTER(ZBGS38 AND 机构启动<REF(机构启动,1),2),COLOR0000FF;
抄底:FILTER(ZBGS34,3) OR FILTER(ZBGS36 AND LHX1-REF(LHX1,1)>1,2),COLOR0000FF;
DRAWTEXT(买入,5,'开盘抄底'),COLORYELLOW;
STICKLINE(买入,-10,20,0,0),COLORRED;
DRAWTEXT(抄底,15,'抄底'),COLORYELLOW;
STICKLINE(抄底,-10,20,0,0),COLOR0000FF;
{选股源码如下}
ZBGS31:=(CLOSE-MA(CLOSE,5))/MA(CLOSE,5);
ZBGS32:=(LLV(CLOSE,3)-HHV(CLOSE,13))/HHV(CLOSE,13)*100<-13;
ZBGS33:=(ZBGS31)*100;
ZBGS34:=EMA(ZBGS33,5)*5;
ZBGS35:=MA(ZBGS34,3);
ZBGS36:=MA(ZBGS34,5);
ZBGS37:=(REF(ZBGS34,1)<REF(ZBGS34,2) AND ZBGS34>REF(ZBGS34,1)) OR CROSS(ZBGS34,ZBGS35);
ZBGS38:=(ZBGS37 OR CROSS(ZBGS34,ZBGS36)) AND COUNT(ZBGS34<-5,3)>=1 AND ZBGS34-REF(ZBGS34,1)>1;
机构筹码:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100;
机构启动:=SMA(机构筹码,3,1);
XG:FILTER(ZBGS38 AND 机构启动<REF(机构启动,1),2);