CYC1:=20;
CYC2:=13;
CONFIRM:=2;
均价:=AMOUNT/VOL/100;{成交额除以成交股数,当天均价}
资金线:=EMA(均价,CYC1);{均价的20日指数平均}
VAR1好:=C>资金线 AND 资金线>REF(资金线,1);{收在线上,线也在抬}
VAR1好确认:=COUNT(VAR1好,CONFIRM)>=CONFIRM;{今天和昨天都满足才亮}
VAR1坏:=C<资金线 AND 资金线<REF(资金线,1);
VAR1坏确认:=COUNT(VAR1坏,CONFIRM)>=CONFIRM;
HS:=VOL/CAPITAL*100;
MA_HS:=MA(HS,CYC2);
VAR2好:=HS>MA_HS AND HS<MA_HS*3;
VAR2好确认:=COUNT(VAR2好,CONFIRM)>=CONFIRM;
VAR2坏:=HS<MA_HS*0.5;
VAR2坏确认:=COUNT(VAR2坏,CONFIRM)>=CONFIRM;
量堆:=MA(VOL,CYC1)/MA(VOL,60);
VAR3好:=量堆>1.1;
VAR3好确认:=COUNT(VAR3好,CONFIRM)>=CONFIRM;
VAR3坏:=量堆<0.8;
VAR3坏确认:=COUNT(VAR3坏,CONFIRM)>=CONFIRM;
控盘:=V<MA(V,5) AND C>EMA(C,20);
VAR4好:=控盘;
VAR4好确认:=COUNT(VAR4好,CONFIRM)>=CONFIRM;
VAR4坏:=V>MA(V,5)*1.8 AND C<REF(C,1);
VAR4坏确认:=COUNT(VAR4坏,CONFIRM)>=CONFIRM;
动:=EMA((C-REF(C,1))/REF(C,1)*100,4);
VAR5好:=动>0;
VAR5好确认:=COUNT(VAR5好,CONFIRM)>=CONFIRM;
VAR5坏:=动<0;
VAR5坏确认:=COUNT(VAR5坏,CONFIRM)>=CONFIRM;
上影:=H-MAX(C,O);
实体:=ABS(C-O);
VAR6好:=上影<实体*0.4;
VAR6好确认:=COUNT(VAR6好,CONFIRM)>=CONFIRM;
VAR6坏:=上影>实体*1.2 AND V>MA(V,10);
VAR6坏确认:=COUNT(VAR6坏,CONFIRM)>=CONFIRM;
绿数量:=VAR1坏确认+VAR2坏确认+VAR3坏确认+VAR4坏确认+VAR5坏确认+VAR6坏确认;{亮下箭头的行数}
鱼尾:=绿数量>=4;{至少4行亮下箭头}
ZERO:=0;
DRAWICON(VAR1好确认,ZERO+5,1);
DRAWICON(VAR1坏确认,ZERO+5,2);
DRAWICON(VAR2好确认,ZERO+4,1);
DRAWICON(VAR2坏确认,ZERO+4,2);
DRAWICON(VAR3好确认,ZERO+3,1);
DRAWICON(VAR3坏确认,ZERO+3,2);
DRAWICON(VAR4好确认,ZERO+2,1);
DRAWICON(VAR4坏确认,ZERO+2,2);
DRAWICON(VAR5好确认,ZERO+1,1);
DRAWICON(VAR5坏确认,ZERO+1,2);
DRAWICON(VAR6好确认,ZERO,1);
DRAWICON(VAR6坏确认,ZERO,2);
DRAWTEXT(ISLASTBAR,5.5,'【1资金斜率】'),COLORWHITE;
DRAWTEXT(ISLASTBAR,4.5,'【2换手活跃】'),COLORWHITE;
DRAWTEXT(ISLASTBAR,3.5,'【3量堆沉淀】'),COLORWHITE;
DRAWTEXT(ISLASTBAR,2.5,'【4控盘洗盘】'),COLORWHITE;
DRAWTEXT(ISLASTBAR,1.5,'【5突破动能】'),COLORWHITE;
DRAWTEXT(ISLASTBAR,0.5,'【6派发检测】'),COLORWHITE;
DRAWTEXT(鱼尾 AND ISLASTBAR,-1,'鱼尾派发!'),COLORRED;
5,COLORGRAY,DOTLINE;
4,COLORGRAY,DOTLINE;
3,COLORGRAY,DOTLINE;
2,COLORGRAY,DOTLINE;
1,COLORGRAY,DOTLINE;
0,COLORGRAY,DOTLINE;