通达信能量引力指标公式副图源码

VAR1:=EMA(CLOSE,2)-EMA(CLOSE,89);
VAR2:=EMA(VAR1,30);
VAR3:=2*(VAR1-VAR2)*10;
VAR4:=POW(VAR3,3)*0.1+POW(VAR3,2);
VAR5:=IF(YEAR< 2058 AND VAR3>0.015,VAR4,0)/45/4;
VAR6:=(C*2+H+L)/4;
VAR7:( EMA(VAR6,7) - EMA(VAR6,13))*180,COLORRED;
VAR8: EMA(VAR7,2)*1.2,COLORYELLOW;
DRAWBAND(VAR7,RGB(200,50,55),VAR8,RGB(50,100,10));
持:IF(VAR7>=VAR8,VAR7,DRAWNULL),COLORRED;
观:IF(VAR8>=VAR7,VAR8,DRAWNULL),COLORFF9900;
股:IF(VAR7>=VAR8,VAR8,DRAWNULL),COLOR00FFFF;
望:IF(VAR8>=VAR7,VAR7,DRAWNULL),COLOR00FF00;
DRAWICON(FILTER(crOSS(VAR7,VAR8) AND VAR7< 15,3),VAR7,23);
DRAWICON(FILTER(CROSS(VAR8,VAR7) AND VAR8>30,3),VAR8,19);
MAvol0:=(MA(VOL,3)+MA(VOL,6)+MA(VOL,12)+MA(VOL,24))/4;
MAVOL1:=MA(MAVOL0,6);
VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL)