ZT:=REF(VOL,1);

VAR1:=IF(BARSLAST(ZT>REF(ZT,1)*2)>0,BARSLAST(ZT>REF(ZT,1)*2),1);

VAR2:=VOL/VAR1;

VAR3:=IF(VAR2>REF(VAR2,1),0,1),COLORFF00FF;

VAR4:=IF(VAR2>REF(VAR2,1)*2,1,0);

VAR4;