Varu:=LLV(LOW,30);
VarA1:=HHV(HIGH,30);
B:=EMA((Varv-Varu)/(VarA1-Varu)*100,8);
B1:=EMA(B,5);
STICKLINE(B-B1>0,B,B1,8,1),colorred;
STICKLINE(B-B1<0,B,B1,8,1),Color00FF00;
Risk : EMA(IF(B-B1<0 AND IF(B-B1<0,B,B1)<7,-(B-B1)*3+56,-(B-B1)*3+46),3);
Power : IF(B-B1<0,B,B1)