NTouch Zones

// This Pine Script™ code is subject to the terms of the Mozilla Public License 2.0 at https://mozilla.org/MPL/2.0/
// NTouch Zones — session-anchored support/resistance rectangles (PHT 06:00-07:30)

//@version=6
indicator("NTouch Zones", "NTZ", overlay=true, max_boxes_count=500)

// ============================================================
// INPUTS
// ============================================================
grpWindow   = "Zone Window (PHT)"
winStartH   = input.int(6,    "Window Start Hour (PHT)",  minval=0, maxval=23, group=grpWindow)
winEndH     = input.int(7,    "Window End Hour (PHT)",    minval=0, maxval=23, group=grpWindow)
winEndM     = input.int(30,   "Window End Minute (PHT)",  minval=0, maxval=59, group=grpWindow)

grpZone     = "Zone Settings"
touchReq    = input.int(2,    "Touches Required",         minval=2,  maxval=10,  group=grpZone)
atrLen      = input.int(14,   "ATR Length",               minval=1,  maxval=100, group=grpZone)
atrMult     = input.float(0.25, "ATR Half-Thickness Mult", minval=0.01, maxval=5.0, step=0.01, group=grpZone)

grpColors   = "Colors"
resColor    = input.color(color.red,   "Resistance Color", group=grpColors)
supColor    = input.color(color.green, "Support Color",    group=grpColors)
zoneTransp  = input.int(80, "Zone Transparency", minval=0, maxval=99, group=grpColors)

// ============================================================
// TIME HELPERS  (PHT = Asia/Manila, UTC+8, no DST)
// ============================================================
h = hour(time,   "Asia/Manila")
m = minute(time, "Asia/Manila")

// 06:00 - 07:30 zone detection window
inZoneWindow = (h == winStartH) or (h == winEndH and m < winEndM)
// Only true when window end hour > start hour by exactly 1; generalised:
// We handle the canonical 06:00-07:30 case; start of window = hour == winStartH (full hour)
// plus any minute of winEndH before winEndM.

// Window start edge: fires on the very first bar of 06:00
windowStart  = inZoneWindow and not inZoneWindow[1]

// Before noon — used to keep extending confirmed zone boxes
beforeNoon   = h < 12

// Session-active flag: TRUE from the window start until noon of the SAME day.
// Gating the projection on this (instead of beforeNoon alone) prevents the
// prior day's zones from being re-extended during 00:00-06:00 the next day,
// before the daily array reset fires at the 06:00 window start.
var bool sessionActive = false
if windowStart
    sessionActive := true
if not beforeNoon
    sessionActive := false

// ============================================================
// ATR  (needed each bar; referenced in clustering & box sizing)
// ============================================================
atr = ta.atr(atrLen)
tol = atrMult * atr     // cluster tolerance = zone half-thickness

// ============================================================
// PIVOT DETECTION
// Pivots confirm 2 bars late, but the price returned is correct.
// We only count pivots whose *pivot bar* fell inside inZoneWindow.
// Because pivots are confirmed 2 bars later, we check inZoneWindow[2].
// ============================================================
pivHigh = ta.pivothigh(2, 2)   // resistance pivot
pivLow  = ta.pivotlow(2, 2)    // support pivot

// Was the pivot bar itself inside the zone window?
pivInWindow = inZoneWindow[2]

// ============================================================
// LEVEL TRACKING ARRAYS  (4 parallel arrays per type)
// Each index represents one discovered price cluster.
// ============================================================
var float[] resPrice  = array.new<float>()   // running avg price of cluster
var int[]   resTouches= array.new<int>()     // touch count
var bool[]  resConf   = array.new<bool>()    // confirmed (box drawn)?
var box[]   resBoxes  = array.new<box>()     // box handle (na until confirmed)

var float[] supPrice  = array.new<float>()
var int[]   supTouches= array.new<int>()
var bool[]  supConf   = array.new<bool>()
var box[]   supBoxes  = array.new<box>()

// ============================================================
// DAILY RESET — on the first bar of the zone window each day
// Prior-day boxes remain frozen on the chart; we only clear
// the tracking arrays so the new day starts fresh.
// ============================================================
if windowStart
    array.clear(resPrice)
    array.clear(resTouches)
    array.clear(resConf)
    array.clear(resBoxes)
    array.clear(supPrice)
    array.clear(supTouches)
    array.clear(supConf)
    array.clear(supBoxes)

// ============================================================
// HELPER: process a new pivot price p into a set of level arrays.
// Returns true if a new box was created (needed nowhere externally,
// but kept for clarity).
// ============================================================
processLevel(float p, float[] prices, int[] counts, bool[] confirmed, box[] boxes, bool isRes) =>
    found = false
    sz    = array.size(prices)

    // Search existing clusters for one within tolerance.
    // Guarded by sz > 0 so an empty array never produces "for 0 to -1"
    // (which can index a size-0 array and throw at runtime).
    if sz > 0
        for i = 0 to sz - 1
            lvl = array.get(prices, i)
            if math.abs(lvl - p) <= tol
                // Found a matching cluster — update running average, increment count
                newCount = array.get(counts, i) + 1
                // Running average of price (equally weighted)
                newAvg   = (lvl * (newCount - 1) + p) / newCount
                array.set(prices,   i, newAvg)
                array.set(counts,   i, newCount)

                // Confirm the zone when touch threshold is first met
                if newCount >= touchReq and not array.get(confirmed, i)
                    array.set(confirmed, i, true)
                    halfW    = atrMult * atr
                    zTop     = newAvg + halfW
                    zBot     = newAvg - halfW
                    fillCol  = color.new(isRes ? resColor : supColor, zoneTransp)
                    b        = box.new(
                         left         = bar_index,
                         right        = bar_index,
                         top          = zTop,
                         bottom       = zBot,
                         bgcolor      = fillCol,
                         border_color = na)
                    array.set(boxes, i, b)

                found := true
                break

    // No existing cluster — push a new one (unconfirmed, no box yet)
    if not found
        array.push(prices,    p)
        array.push(counts,    1)
        array.push(confirmed, false)
        array.push(boxes,     na)

// ============================================================
// PROCESS PIVOTS  (only count when pivot bar was in window)
// ============================================================
if not na(pivHigh) and pivInWindow
    processLevel(pivHigh, resPrice, resTouches, resConf, resBoxes, true)

if not na(pivLow) and pivInWindow
    processLevel(pivLow, supPrice, supTouches, supConf, supBoxes, false)

// ============================================================
// PROJECT CONFIRMED ZONES  — extend box right edge every bar
// while we are still before noon.  After noon, stop (freeze).
// ============================================================
if sessionActive
    // Resistance boxes
    rSz = array.size(resBoxes)
    if rSz > 0
        for i = 0 to rSz - 1
            b = array.get(resBoxes, i)
            if not na(b) and array.get(resConf, i)
                box.set_right(b, bar_index)

    // Support boxes
    sSz = array.size(supBoxes)
    if sSz > 0
        for i = 0 to sSz - 1
            b = array.get(supBoxes, i)
            if not na(b) and array.get(supConf, i)
                box.set_right(b, bar_index)