Code: Select all

//@version=5indicator("v.0 WRBHG with Analysis", overlay = true, max_bars_back=5000, max_lines_count=4, max_labels_count=4, max_boxes_count = 4)group0 = 'Period under study'startDate = input.time(title='Start Date', defval=timestamp("2000-01-19 09:00:00 GMT+2"), group=group0)endDate = input.time(title='End Date', defval=timestamp('2099-09-01 09:00:00 GMT+2'), tooltip='Date & time to stop analysis', group=group0)group1 = 'Settings under study'x_extend_count = input.int(title="x extend count", defval = 30, group=group1)transp  = input.int(title="Transparency", defval = 70, group=group1)var WRBHG_upper = 0.0var WRBHG_lower = 0.0var fillColor = color.black// Store index of candles that meet the conditionvar conditionMet = array.new_int(0)// Determin WRB and WRBHGbody = math.abs(open-close)wrb = body>body[1] and body>body[2] and body>body[3] ? math.avg(open,close) : nawrbhg = (wrb[1] and (low>high[2] or high<low[2]))? wrb[1] : na// Store left side price when the box is created and index of candles that meet the conditionif wrbhg    if close[1] > open[1] and low > high[2]        WRBHG_upper := low        WRBHG_lower := high[2]        fillColor := color.new(color.green, transp)    else if close[1] < open[1] and low > high[2]        WRBHG_upper := low        WRBHG_lower := high[2]        fillColor := color.new(color.yellow, transp)    else        WRBHG_upper := low[2]        WRBHG_lower := high        fillColor := color.new(color.red, transp)    // Define the box    box_id = box.new(time[2], WRBHG_upper, endDate, WRBHG_lower, border_color = na, xloc = xloc.bar_time, bgcolor = fillColor)