荣胜老师的能量潮指标改为通达信指标

九毛八公式指标

求助，荣胜老师的能量潮指标改为通达信指标，谢谢1 源码是大智慧2的，如下：Var2:=(CLOSE-LLV(LOW,24))/(HHV(HIGH,24)-LLV(LOW,24))*200*10; 能量: SMA(Var2,5,1),colorred; FILLRGN(0,能量,能量>REF(能量,1),RGB(255,0,120),能量OPEN,Var3*(HIGH-LOW),IF(CLOSEOPEN,0-Var3*(HIGH-CLOSE+OPEN-LOW),IF(CLOSEOPEN,0-Var3*(HIGH-CLOSE+OPEN-LOW),IF(CLOSEOPEN,Var3*(HIGH-LOW),IF(CLOSE0 AND Var7<-12 and close>1.07,300,200),colorffFF00,DOTLINE;

公式模块：

VAR2:=(CLOSE-LLV(LOW,24))/(HHV(HIGH,24)-LLV(LOW,24))*200*10;

能量: SMA(VAR2,5,1),COLORRED; DRAWBAND(能量,RGB(255,0,120),0,1); STICKLINE(能量<REF(能量,1),O,能量,3.5,0),COLORFF8800; 危险区:1800,COLOR208FFF; 次险区:1500,COLORFF33FF,DOTLINE; VAR3:=vol/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); VAR4:=(IF(CLOSE>OPEN,VAR3*(HIGH-LOW),IF(CLOSE<OPEN,VAR3*(HIGH-OPEN+CLOSE-LOW),VOL/2))/(IF(CLOSE>OPEN,0-VAR3*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,0-VAR3*(HIGH-LOW),0-VOL/2))*(-1))-IF(CLOSE>OPEN,0-VAR3*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,0-VAR3*(HIGH-LOW),0-VOL/2))*(-1)/IF(CLOSE>OPEN,VAR3*(HIGH-LOW),IF(CLOSE<OPEN,VAR3*(HIGH-OPEN+CLOSE-LOW),VOL/2))); VAR5:=AMOUNT/(100*VOL); VAR6:=MA(VAR5,40); VAR7:=100*(CLOSE-VAR6)/VAR6; 底部区: IF(VAR4>0 AND VAR7<-12 AND CLOSE/OPEN>1.07,300,200),COLORFFFF00,DOTLINE;