通达信资金动向副图指标 监控大单动向 源码附图

N:=3;
 M:=6;

均价:SUM(AMOUNT,1)/SUM(V,1)/100,NODRAW;
大于均价:=(C-均价)/均价*100;
 SMA5:=EMA(SMA(大于均价,3,2),N);
 SMA8:=EMA(SMA(大于均价,3,2),M);
 SM:=SMA((SMA(SMA5,3,1)+SMA8)/2,5,4);

{DRAWBAND(CONST(HHV(HHV(SMA5,100),90)),RGB(90,20,20),0,RGB(90,20,20));
 DRAWBAND(0,RGB(20,20,90),CONST(LLV(LLV(SMA5,100),90)),RGB(20,20,90));}

{STICKLINE(1,CONST(HHV(HHV(SMA5,60)*2/3,90)),CONST(HHV(HHV(SMA5,60)*2/3,90)),1,1);
 STICKLINE(1,CONST(LLV(LLV(SMA5,60)*2/3,90)),CONST(LLV(LLV(SMA5,60)*2/3,90)),1,1);}
 STICKLINE(SMA5>SMA8,SMA5,SMA8,1,0),COLOR33FFDD;
 STICKLINE(SMA5<SMA8,SMA5,SMA8,1,0),COLORDDDD33;
 STICKLINE(SMA5>SMA8 AND 大于均价>0,SMA5,SMA8,1,0),COLORAA33DD;
 STICKLINE(SMA5<SMA8 AND 大于均价<0,SMA5,SMA8,1,0),COLORFFDD33;
 STICKLINE(SMA5<SMA8 AND 大于均价<0,SMA5,SMA8,1,0),COLORFFDD33;
 STICKLINE(SMA5>CONST(HHV(HHV(SMA5,60)*2/3,90)),SMA5,CONST(HHV(HHV(SMA5,60)*2/3,90)),1,0),COLOR5033FF;
 STICKLINE(SMA5<CONST(LLV(LLV(SMA5,60)*2/3,90)),SMA5,CONST(LLV(LLV(SMA5,60)*2/3,90)),1,0),COLOR50FF50;
 SM,COLOR99FF00,LINETHICK1;
 {IF(SM>=0,SM,DRAWNULL),COLORFFFFFF,LINETHICK2;}
 IF(SM>=REF(SM,1),SM,DRAWNULL),COLOR2222FF,LINETHICK1;
 IF(SM>=0 AND SM>0,SM,DRAWNULL),COLOR2222FF,LINETHICK1;
海5:EMA(SM,2);

AJA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
买量J:=IF(CLOSE>OPEN,AJA*(HIGH-LOW),IF(CLOSE<OPEN,AJA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),LINETHICK0;
卖量J:=IF(CLOSE>OPEN,0-AJA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AJA*(HIGH-LOW),0-VOL/2)),LINETHICK0,COLORCYAN;
大单动向:(买量J+卖量J)*10000/FINANCE(7),COLOR00FFFF,NODRAW;
 {STICKLINE(大单动向<0,0,大单动向,2,0),COLORCYAN;
 STICKLINE(大单动向<0,0,大单动向,2,0),COLORCYAN;
 STICKLINE(大单动向<0,0,大单动向,2,0),COLORCYAN;
 STICKLINE(大单动向<0,0,大单动向,0.5,0),COLORCYAN;
 STICKLINE(大单动向>0,0,大单动向,2,0),COLORRED;
 STICKLINE(大单动向>0,0,大单动向,1,0),COLORRED;
 STICKLINE(大单动向>0,0,大单动向,1.5,0),COLORRED;
 STICKLINE(大单动向>0,0,大单动向,0.5,0),COLORRED;};

原理解析：
N赋值:3
M赋值:6
输出均价:1的AMOUNT日累和/1的V日累和/100,NODRAW
大于均价赋值:(C-均价)/均价*100
SMA5:=EMA(SMA(大于均价,3,2),N)
SMA8:=EMA(SMA(大于均价,3,2),M)
SM赋值:SMA((SMA(SMA5,3,1)+SMA8)/2,5,4)
{DRAWBAND(CONST(100日内SMA5最高值,90)),RGB(90,20,20),0,RGB(90,20,20))
DRAWBAND(0,RGB(20,20,90),CONST(100日内SMA5最低值,90)),RGB(20,20,90))
}{STICKLINE(1,CONST(60日内SMA5最高值*2/3,90)),CONST(60日内SMA5最高值*2/3,90)),1,1)
STICKLINE(1,CONST(60日内SMA5最低值*2/3,90)),CONST(60日内SMA5最低值*2/3,90)),1,1)
当满足条件SMA5>SMA8时,在SMA5和SMA8之间画柱状线
当满足条件SMA5当满足条件SMA5>SMA8 AND 大于均价>0时,在SMA5和SMA8之间画柱状线
当满足条件SMA5当满足条件SMA5 STICKLINE(SMA5>CONST(60日内SMA5最高值*2/3,90)),SMA5,CONST(60日内SMA5最高值*2/3,90)),1,0),COLOR5033FF
STICKLINE(SMA5 SM,COLOR99FF00,LINETHICK1
如果SM>=0返回SM否则返回DRAWNULL
} IF(SM>=1日前的SM,SM,DRAWNULL),COLOR2222FF,LINETHICK1
如果SM>=0 AND SM>0返回SM否则返回DRAWNULL
输出海5:SM的2日指数移动平均
AJA赋值:成交量/((最高价-最低价)*2-收盘价-OPEN的绝对值)
买量J赋值:IF(收盘价>OPEN,AJA*(最高价-最低价),IF(收盘价卖量J赋值:IF(收盘价>OPEN,0-AJA*((最高价-收盘价)+(OPEN-最低价)),IF(收盘价输出大单动向:(买量J+卖量J)*10000/FINANCE(7),COLOR00FFFF,NODRAW
当满足条件大单动向<0时,在0和大单动向之间画柱状线
当满足条件大单动向<0时,在0和大单动向之间画柱状线
当满足条件大单动向<0时,在0和大单动向之间画柱状线
当满足条件大单动向<0时,在0和大单动向之间画柱状线
当满足条件大单动向>0时,在0和大单动向之间画柱状线
当满足条件大单动向>0时,在0和大单动向之间画柱状线
当满足条件大单动向>0时,在0和大单动向之间画柱状线
当满足条件大单动向>0时,在0和大单动向之间画柱状线
}