编写条件：
麻烦哪位老师改为通达信的 能量潮 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),能量编写方法：
var2:=(close-llv(low,24))/(hhv(high,24)-llv(low,24))*200*10;
能量: sma(var2,5,1),colorred;
stickline(能量>ref(能量,1),能量,0,0,0),color7800ff;
stickline(能量<ref(能量,1),能量,0,0,0),colorff7800;
危险区: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;
量堆:count(v>=ref(v,1)*2,barslast(cross(c,ma(c,20)))),linethick3,coloryellow;
