Identificador de Super-envolventes (SE), se encarga de darle un color verde a la SE alzista (Bullish) verde y rojo a la bajista (Bearish).
//@version=2 study("Super Envolvente") revisionAltosBajos(position) => high >= high[position] and low <= low[position] superEnvolventeBearish(position) => revisionAltosBajos(position) and open >= close[position] and open >= open[position] and close <= open[position] and close <= close[position] superEnvolventeBullish(position) => revisionAltosBajos(position) and open <= close[position] and open <= open[position] and close >= open[position] and close >= close[position] secLast = 1 barcolor(superEnvolventeBearish(secLast)? #F70317: na) barcolor(superEnvolventeBullish(secLast)? #008600: na)