var1:=ema(hhv(high,500),21);
var2:=ema(hhv(high,250),21);
var3:=ema(hhv(high,90),21);
var4:=ema(llv(low,500),21);
var5:=ema(llv(low,250),21);
var6:=ema(llv(low,90),21);
{- }
var7:=ema((var4*0.96+var5*0.96+var6*0.96+var1*0.558+var2*0.558+var3*0.558)/6,21);
var8:=ema((var4*1.25+var5*1.23+var6*1.2+var1*0.55+var2*0.55+var3*0.65)/6,21);
var9:=ema((var4*1.3+var5*1.3+var6*1.3+var1*0.68+var2*0.68+var3*0.68)/6,21);
vara:=ema((var7*3+var8*2+var9)/6*1.738,21);
varb:=ref(low,1);
varc:=SMA(abs(low-varb),3,1)/sma(max(low-varb,0),3,1)*100;
vard:=ema(if(close*1.35<=vara,varc*10,varc/10),3);
vare:=llv(low,30);
varf:=hhv(vard,30);
var10:=if(ma(close,58),1,0);
b:ema(if(low<=vare,(vard+varf*2)/2,0),3)/618*var10,colorred;