出现“红钻”“买底”和紫色块的地方做个选股预警

编写条件：

麻烦老师将下面副图指标中出现“红钻”“买底”和紫色块的地方做个选股预警。这个源码是分时图的。谢谢！源码如下：{控盘原码} VAR1:=EMA(EMA(CLOSE,13),13); 控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000; STICKLINE(控盘<0,控盘,0,1,1),COLOR00FF00; STICKLINE(控盘>REF(控盘,1) AND 控盘<0,控盘,0,1,1),COLORFF00FF; 无庄控盘:=控盘<0; STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,1),COLOR0000FF; 有庄控盘:=控盘>REF(控盘,1) AND 控盘>0; VAR2:=100*WINNER(CLOSE*0.95); STICKLINE(控盘0,控盘,0,1,1),COLORFFFF00; 主力出货:=控盘0; STICKLINE(VAR2>50 AND COST(85)0,控盘,0,1,1),COLOR00FFFF; 高度控盘: VAR2>50 AND COST(85)0,COLOR00FFFF,LINETHICK2; A10:=CROSS(控盘,0); 控盘B:=FILTER(IF(A10,1,0),5); {分时价格原码} JJ:=DYNAINFO(11); {波段买卖原码} P:=55;S:=8;M1:=3; 财:=(EMA(CLOSE,S)-EMA(CLOSE,P))*10,COLORRED,LINETHICK2; 神:=EMA(财,M1),COLORGREEN,LINETHICK1; DRAWBAND(财,RGB(255,0,0),神,RGB(0,100,50)); {股价与均线偏离买卖条件} BTJ1:=(C-JJ)/JJ<-0.005; BTJ11:=(C-JJ)/JJ<-0.03; BTJ12:=LAST(JJ>=REF(JJ,1),5,1) AND (C-JJ)/JJ<0.005; STJ1:=(C-JJ)/JJ>0.005; {控盘买卖条件} STJ01:=控盘0.5; STJ02:=控盘>0; BTJ2:=控盘>REF(控盘,1) AND 控盘<-0.2; BTJ22:=控盘>REF(控盘,1) AND 控盘<0 ; {波段买卖条件} BTJ3:=CROSS(财,神) AND 财<-0.3; BTJ32:=CROSS(财,神) AND 财<-0.1; STJ31:=CROSS(神,财); STJ32:=CROSS(神,财) AND 财>1.618; {以下为信号}; BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,13);{选股信号} BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,13);{选股信号} BTJ82:=FILTER(BTJ12 AND BTJ22 AND BTJ32,13);{选股信号} DRAWICON(BTJ82,神,23);{追买}; DRAWICON(BTJ81 AND TIME>10,神,27);{买底}; DRAWICON(BTJ811 AND TIME>10,神,26);{必买}; DRAWTEXT(BTJ81,神,'买底'),COLORFF00FF; DRAWTEXT(BTJ811,神*1.2,'必买'),COLOR0000FF; STJ81:=FILTER(STJ1 AND STJ01 AND STJ31,13); DRAWICON(STJ81,神,19); STJ82:=FILTER(STJ02 AND STJ32 ,13); DRAWICON(STJ82,神,15); STJ83:=STJ81 AND STJ82; DRAWTEXT(STJ83,神,'必卖'),COLOR00FF00;

编写方法：

&nbsp;{紫色块}

VAR1:=EMA(EMA(CLOSE,13),13);

控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;

控盘>REF(控盘,1) AND 控盘<0;

 

 

{买底}

VAR1:=EMA(EMA(CLOSE,13),13);

控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;

A10:=crOSS(控盘,0);

控盘B:=FILTER(IF(A10,1,0),5);

{分时价格原码}

JJ:=DYNAINFO(11);

{波段买卖原码}

P:=55;S:=8;M1:=3;

财:=(EMA(CLOSE,S)-EMA(CLOSE,P))*10;

神:=EMA(财,M1);

{股价与均线偏离买卖条件}

BTJ1:=(C-JJ)/JJ<-0.005;

BTJ2:=控盘>REF(控盘,1) AND 控盘<-0.2;

BTJ3:=CROSS(财,神) AND  财<-0.3;

BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,13);{选股信号}

BTJ81 AND TIME>10;{买底};

 

{红十字}

VAR1:=EMA(EMA(CLOSE,13),13);

控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;

A10:=CROSS(控盘,0);

控盘B:=FILTER(IF(A10,1,0),5);

{分时价格原码}

JJ:=DYNAINFO(11);

{波段买卖原码}

P:=55;S:=8;M1:=3;

财:=(EMA(CLOSE,S)-EMA(CLOSE,P))*10;

神:=EMA(财,M1);

BTJ1:=(C-JJ)/JJ<-0.005;

BTJ11:=(C-JJ)/JJ<-0.03;

BTJ12:=LAST(JJ>=REF(JJ,1),5,1) AND (C-JJ)/JJ<0.005;

STJ1:=(C-JJ)/JJ>0.005;

STJ01:=控盘<REF(控盘,1)  AND 控盘>0.5;

STJ02:=控盘>0;

BTJ2:=控盘>REF(控盘,1) AND 控盘<-0.2;

BTJ22:=控盘>REF(控盘,1) AND 控盘<0 ;

BTJ3:=CROSS(财,神) AND  财<-0.3;

BTJ32:=CROSS(财,神) AND  财<-0.1;

STJ31:=CROSS(神,财);

STJ32:=CROSS(神,财) AND  财>1.618;

BTJ82:FILTER(BTJ12 AND BTJ22 AND BTJ32,13);{选股信号};