通达信〖主力行为透视〗六维共振买卖提示指标公式源码

cyc1:=20;
CYC2:=13;
CONFIRM:=2;
均价:=AMOUNT/vol/100;
资金线:=EMA(均价,CYC1);
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;
量堆:=SUM(VOL,CYC1)/MA(VOL,CYC1)/CYC1;
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好确认;
绿数量:=VAR1坏确认+VAR2坏确认+VAR3坏确认+VAR4坏确认+VAR5坏确认+VAR6坏确认;
鱼尾:=绿数量>=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;