Viru Trend Dynamics

indicator("Viru Trend Dynamics", overlay=true,
     max_lines_count=500, max_labels_count=500)

string g1 = "1 • Trend Settings"

src = input.source(close, "Source", group=g1)
trendLength = input.int(34, "Trend Length", minval=5, group=g1)
trendOffset = input.float(0.85, "Trend Offset",
     minval=0, maxval=1, group=g1)
trendSigma = input.float(6, "Trend Sigma", minval=0.1, group=g1)
devLength = input.int(34, "Deviation Length", minval=5, group=g1)
bandMultiplier = input.float(0.65, "Confirmation Band",
     minval=0, group=g1)
slopeLength = input.int(3, "Slope Lookback", minval=1, group=g1)
minimumSlope = input.float(0.08, "Minimum Slope / ATR",
     minval=0, group=g1)
atrLength = input.int(14, "ATR Length", minval=1, group=g1)

string g2 = "2 • Initial Stop"

stopLookback = input.int(12, "Prior Structure Lookback",
     minval=1, group=g2)
minimumATR = input.float(0.75, "Minimum SL Distance — ATR",
     minval=0.01, group=g2)
maximumATR = input.float(3, "Maximum SL Distance — ATR",
     minval=0.01, group=g2)

string g3 = "3 • Target and Trailing"

targetChoice = input.string("1:3", "Target Risk : Reward",
     options=["1:1", "1:2", "1:3", "1:4", "1:5", "1:6", "Trail only"],
     group=g3)

enableTrail = input.bool(true, "Enable Trailing SL", group=g3)

trailingMethod = input.string("ATR", "Trailing Method",
     options=["ATR", "ALMA"], group=g3)

activationR = input.float(2, "Trail Activation — R",
     minval=0.1, step=0.25, group=g3,
     tooltip="Activates after the post-entry high/low reaches this favourable R multiple.")

trailMultiplier = input.float(2, "ATR Method: Distance Multiplier",
     minval=0.1, step=0.25, group=g3,
     tooltip="Used only in ATR mode. Long: highest high minus ATR distance. Short: lowest low plus ATR distance.")

almaBufferATR = input.float(0.25, "ALMA Method: Buffer — ATR",
     minval=0, step=0.05, group=g3,
     tooltip="Used only in ALMA mode. Long: ALMA minus buffer × ATR. Short: ALMA plus buffer × ATR. Zero uses ALMA directly.")

float rr = switch targetChoice
    "1:1" => 1.0
    "1:2" => 2.0
    "1:3" => 3.0
    "1:4" => 4.0
    "1:5" => 5.0
    "1:6" => 6.0
    => na

bool fixedTarget = targetChoice != "Trail only"
bool trailingEnabled = enableTrail or not fixedTarget

string g4 = "4 • Entry Filters"

directionChoice = input.string("Both", "Direction",
     options=["Both", "Long only", "Short only"], group=g4)

useSession = input.bool(false, "Restrict Entry Session", group=g4)
entrySession = input.session("0915-1530", "Entry Session", group=g4)
timezone = input.string("Asia/Kolkata", "Session Timezone", group=g4)

string g5 = "5 • Display"

showBands = input.bool(true, "Show Trend Ribbon", group=g5)
showLevels = input.bool(true, "Show Trade Levels", group=g5)
showExitMarkers = input.bool(true, "Show Exit Symbols", group=g5)
showDashboard = input.bool(true, "Show Dashboard", group=g5)

bullColor = input.color(#00897B, "Bull Colour", group=g5)
bearColor = input.color(#E53935, "Bear Colour", group=g5)
targetColor = input.color(#2E7D32, "Target Exit Colour", group=g5)
stopColor = input.color(#D32F2F, "Initial SL Exit Colour", group=g5)
trailColor = input.color(#F9A825, "Trailing Exit Colour", group=g5)

if barstate.isfirst
    if minimumATR > maximumATR
        runtime.error("Minimum SL ATR must be <= Maximum SL ATR.")
    if useSession and not timeframe.isintraday
        runtime.error("Session filtering requires an intraday chart.")

float basis = ta.alma(src, trendLength, trendOffset, trendSigma)
float deviation = ta.stdev(src, devLength)
float atr = ta.atr(atrLength)

float upper = basis + deviation * bandMultiplier
float lower = basis - deviation * bandMultiplier

float priorLow = ta.lowest(low, stopLookback)[1]
float priorHigh = ta.highest(high, stopLookback)[1]

float slope = atr > 0 ?
     (basis - basis[slopeLength]) / atr : 0

bool ready = not na(basis[slopeLength]) and
     not na(deviation) and not na(priorLow) and
     not na(priorHigh) and atr > 0

bool bullishSetup = ready and
     slope > minimumSlope and close > upper

bool bearishSetup = ready and
     slope < -minimumSlope and close < lower

bool sessionOK = not useSession or
     not na(time(timeframe.period, entrySession, timezone))

var int visualTrend = 0

var int activeDirection = 0
var int entryBar = na
var int lastExitBar = na

var float entry = na
var float riskDistance = na
var float protectiveStop = na
var float target = na
var float extreme = na

var bool trailActive = false
var bool stopWasTrailed = false
var string status = "WAITING"

var line entryLine = na
var line stopLine = na
var line targetLine = na

bool buySignal = false
bool sellSignal = false
bool stopExit = false
bool targetExit = false
bool trailCloseExit = false
bool trailingStopExit = false
bool initialStopExit = false

f_level(int x1, int x2, float price, color col) =>
    line.new(x1, price, x2, price,
         xloc=xloc.bar_index, color=col, width=2)
var table wm = table.new(position.bottom_right, 1, 1)
if barstate.isfirst
    table.cell(wm, 0, 0, "Telegram @SimpleForexTools", text_color = color.new(color.gray, 70), text_size = size.large)

if barstate.isconfirmed

    if bullishSetup
        visualTrend := 1
    else if bearishSetup
        visualTrend := -1

    bool exitedThisBar = false

    if activeDirection != 0 and bar_index > entryBar

        if showLevels
            if not na(entryLine)
                line.set_x2(entryLine, bar_index)
            if not na(stopLine)
                line.set_x2(stopLine, bar_index)
            if not na(targetLine)
                line.set_x2(targetLine, bar_index)

        bool hitStop = activeDirection == 1 ?
             low <= protectiveStop : high >= protectiveStop

        bool hitTarget = fixedTarget and
             (activeDirection == 1 ? high >= target : low <= target)

        float exitReference = na
        string exitReason = ""
        bool trailingExit = false
        bool ambiguousExit = hitStop and hitTarget

        if hitStop
            stopExit := true

            trailingExit := stopWasTrailed
            trailingStopExit := trailingExit
            initialStopExit := not trailingExit

            exitReference := activeDirection == 1 ?
                 math.min(open, protectiveStop) :
                 math.max(open, protectiveStop)

            exitReason := trailingExit ? "TRAIL SL" : "SL"

        else if hitTarget
            targetExit := true
            exitReference := target
            exitReason := "TARGET " + targetChoice

        else

            extreme := activeDirection == 1 ?
                 math.max(extreme, high) :
                 math.min(extreme, low)

            float favourableR =
                 activeDirection * (extreme - entry) / riskDistance

            if trailingEnabled and favourableR >= activationR
                trailActive := true

            float nextStop = protectiveStop

            if trailActive

                float candidate = trailingMethod == "ATR" ?
                     extreme - activeDirection * atr * trailMultiplier :
                     basis - activeDirection * atr * almaBufferATR

                candidate := activeDirection == 1 ?
                     math.floor(candidate / syminfo.mintick) * syminfo.mintick :
                     math.ceil(candidate / syminfo.mintick) * syminfo.mintick

                nextStop := activeDirection == 1 ?
                     math.max(protectiveStop, candidate) :
                     math.min(protectiveStop, candidate)

            bool crossedN

Показано первые 50% кода (символов: 10722)