通达信指标动力线指标副图源码

{动力线指标 熊芬的原码改}
量:=V;
换手:V/CAPITAL*100,LINETHICK0;
VAR1:=VOL/((H-L)*2-ABS(C-O));
买盘:=IF(C> O,VAR1*(H-L),IF(C< O,VAR1*((H-O)+(C-L)),VOL/2));
卖盘:=IF(C> O,0-VAR1*((H-C)+(O-L)),IF(C< O,0-VAR1*(H-L),0-VOL/2));
DLX:(买盘-(-卖盘))/量*换手,COLORAAFF3D,LINETHICK0;
STICKLINE((买盘-(-卖盘))/量*换手,DLX,0,2,0),VOLSTICK;
DLX1:SUM(DLX,6),COLORYELLOW;
DLX2:MA(DLX1,5);
DLX3:MA(DLX1,10);

{A1:=SUMBARS(VOL,CAPITAL);}