RP Profits' 8AM ORB strategy, implemented in PineScript

The article describes an 8AM Opening Range Breakout (ORB) trading strategy implemented in PineScript for TradingView. The strategy defines a key price range from 8:00 to 8:15, determines a bullish or bearish daily bias, and enters trades via limit orders or break-of-structure (BOS) confirmation, with options to filter trades by time window and invalidate days with excessively large ranges or conflicting price action.

- - Save deltatrend/ec550d13ea6246f25e41023e77426247 to your computer and use it in GitHub Desktop. Learn more about bidirectional Unicode characters https://github.co/hiddenchars | //@version=6 | | | // © QuantPad LLC made with https://quantpad.ai/ | | | strategy "'RP Profits' 8AM ORB", | | | overlay = true, | | | dynamic requests = true, | | | initial capital = 50000, | | | default qty type = strategy.fixed, | | | default qty value = 2, | | | commission type = strategy.commission.cash per contract, | | | commission value = 1.40, | | | margin long = 0, | | | margin short = 0, | | | use bar magnifier = true | | | // ───────────────────────────────────────────────────────────────────────────── | | | // INPUTS | | | // ───────────────────────────────────────────────────────────────────────────── | | | group vis = "Visuals" | | | show asia = input.bool true, "Show Asia Session", group=group vis, tooltip="Show/hide Asia session high and low levels." | | | show london = input.bool true, "Show London Session", group=group vis, tooltip="Show/hide London session high and low levels." | | | show bg = input.bool true, "Show Background Color", group=group vis, tooltip="Tint the background green bullish or red bearish when a trade direction has been determined." | | | show bos lines = input.bool true, "Show BOS Lines", group=group vis, tooltip="When enabled, draws the structural level broken by any 1-minute BOS that triggered a trade entry. Only trade-triggering BOS events are shown." | | | group entry = "Entry Mode" | | | entry mode = input.string "Limit Order", "Entry Mode", group=group entry, | | | options= "Limit Order", "BOS Confirmation" , | | | tooltip="Limit Order: place a limit at the 8AM range midpoint immediately after direction is established original behavior .\n\nBOS Confirmation: wait for price to tap the midpoint in the direction of the trade wick touch is sufficient , then enter on the close of the first confirmed 1-minute Break of Structure in that direction.\n\nIf price advances fully through the opposing zone boundary past zone high on a bearish day, past zone low on a bullish day , the tap setup is permanently invalidated for the rest of the day.\n\nOnly one trade per day is permitted in either mode; the day resets at 18:00." | | | group sessions = "Session Times" | | | asia time = input.session "1800-0300", "Asia Session", group=group sessions, inline="asia" | | | london time = input.session "0330-1130", "London Session", group=group sessions, inline="london" | | | group filter = "Trade Window Filter" | | | use trade window = input.bool true, "Restrict Trade Window", group=group filter, inline="trade window", tooltip="When enabled, trade direction is only active inside the specified time window. The limit order is cancelled if the window closes before entry." | | | trade window time = input.session "0900-1100", "", group=group filter, inline="trade window" | | | group bias = "Daily Bias Filter" | | | require clean bias = input.bool false, "Require Clean Daily Bias", group=group bias, | | | tooltip="When enabled, a daily bias is only allowed if price has stayed on ONE side of the 8:00–8:15 range between 8:15 and the moment bias would be set.\n\nBullish bias requires price did NOT trade below the 8:00–8:15 low.\nBearish bias requires price did NOT trade above the 8:00–8:15 high.\n\nIf violated, bias is rejected for the entire day and no trades are taken. Bias checks stop after a trade is entered." | | | invalidate large range = input.bool true, "Invalidate Large 8:00 Range 20pts ", group=group bias, | | | tooltip="When enabled, days where the 8:00–8:15 range width exceeds 20 points are trade-disabled for the day.\nThe range box and bias visuals still plot, but no trades will be taken, and the range box will display 'Range Too Large'." | | | group risk = "Risk Parameters" | | | sl scan low = input.float 5.0, "SL Scan Range Low", group=group risk, minval=0.0, inline="sl scan", tooltip="Minimum distance pts from the entry price a session level must be to qualify as a stop-loss anchor. In Limit Order mode the entry price is the zone midpoint; in BOS Confirmation mode it is the BOS bar close." | | | sl scan high = input.float 10.0, "— High pts ", group=group risk, minval=0.0, inline="sl scan", tooltip="Maximum distance pts from the entry price a session level must be to qualify as a stop-loss anchor." | | | sl default = input.float 8.0, "Default SL pts ", group=group risk, minval=0.1, tooltip="Fallback stop-loss distance in points when no qualifying session level is found within the scan range." | | | rr multiple = input.float 4.0, "RR Multiple", group=group risk, minval=0.1, tooltip="Risk-reward multiple applied to the stop-loss distance to set the take-profit target e.g. 4 = 4× the SL distance ." | | | sl manage mode = input.string "Don't Move", "SL Management", group=group risk, | | | options= "Don't Move", "Move to BE", "Trail" , | | | tooltip="Don't Move: stoploss stays fixed at its initial level.\nMove to BE: stoploss moves to entry price once price has moved sufficiently into profit entry 1m bar ignored .\nTrail: stoploss trails price by the same distance as the initial stop, updating every 1m bar entry 1m bar is ignored . Uses strategy.exit trailing parameters." | | | // ───────────────────────────────────────────────────────────────────────────── | | | // TYPES | | | // ───────────────────────────────────────────────────────────────────────────── | | | type Session | | | string name | | | string time window | | | color line color | | | float high = na | | | float low = na | | | int high time = na | | | int low time = na | | | int session start time = na | | | bool high valid = true | | | bool low valid = true | | | int high invalid time = na | | | int low invalid time = na | | | line high line = na | | | line low line = na | | | label high label = na | | | label low label = na | | | type DailyState | | | float zone high = na | | | float zone low = na | | | float zone mid = na | | | int zone start time = na | | | box zone box = na | | | line zone mid line = na | | | string trade dir = na | | | int dir determined time = na | | | // Large range invalidation | | | bool range too large = false | | | bool trade banned = false | | | // Clean-bias tracking 8:15 → bias set | | | bool bias locked out = false | | | bool touched below since 815 = false | | | bool touched above since 815 = false | | | // trade taken: set true the moment ANY trade is entered regardless of mode. | | | // Prevents a second entry within the same day. Resets at 18:00. | | | bool trade taken = false | | | // Trade state | | | bool limit pending = false | | | float limit price = na | | | bool trade active = false | | | bool pos opened = false | | | int entry time = na | | | int entry ib time = na | | | float entry price = na | | | float sl price = na | | | float tp price = na | | | int exit time = na | | | box sl box = na | | | box tp box = na | | | string sl label text = na | | | label sl label = na | | | string tp label text = na | | | label tp label = na | | | // Freeze direction at fill so management/visuals don't depend on trade dir persistence | | | string entry dir = na | | | // Store initial risk geometry so BE logic is stable even after SL moves | | | float init sl price = na | | | float init tp price = na | | | float init sl dist = na | | | float init tp dist = na | | | // SL management state | | | string sl mode = na | | | bool be triggered = false | | | int be time = na | | | label be label = na | | | // Trail | | | float trail dist = na | | | int trail offset ticks = na | | | float trail best = na | | | float trail sl price = na | | | label trail label = na | | | // ── BOS Confirmation entry mode ─────────────────────────────────────────── | | | // tap state: 0 = unarmed, +1 = bullish tap armed, -1 = bearish tap armed | | | // tap invalidated: permanently true for the rest of the day once price advances | | | // fully through the opposing zone boundary past zone high on a | | | // bearish day; past zone low on a bullish day . Blocks any | | | // further tap arming even after a reset. Cleared at 18:00. | | | int tap state = 0 | | | int tap time = na | | | bool awaiting bos = false | | | bool tap invalidated = false | | | // ───────────────────────────────────────────────────────────────────────────── | | | // 1-MINUTE BREAK OF STRUCTURE DETECTOR | | | // Ported verbatim from TJR BOS module. Do NOT modify BOS core logic. | | | // Called via request.security on the "1" timeframe; fires on confirmed 1m bars. | | | // ───────────────────────────────────────────────────────────────────────────── | | | BOS core = | | | var int BOS bosTimesBull = array.new int | | | var int BOS bosTimesBear = array.new int | | | bool BOS isBosBull = false | | | bool BOS isBosBear = false | | | int BOS left ts = na | | | float BOS level = na | | | int BOS dir = 0 | | | if close open and barstate.isconfirmed | | | BOS isBosBull := true | | | int i = 1 | | | while BOS isBosBull and i <= bar index and i <= 1000 and close i = open i | | | if high i close or array.includes BOS bosTimesBull, time i | | | BOS isBosBull := false | | | i += 1 | | | float BOS high to beat = na | | | int BOS high time = na | | | while BOS isBosBull and i <= bar index and i <= 1000 and close i <= open i | | | if na BOS high to beat or high i BOS high to beat | | | BOS high to beat := high i | | | BOS high time := time i | | | i += 1 | | | if BOS isBosBull and i <= bar index and i <= 1000 and high i BOS high to beat | | | BOS high to beat := high i | | | BOS high time := time i | | | if BOS isBosBull and close <= nz BOS high to beat, close | | | BOS isBosBull := false | | | if BOS isBosBull | | | BOS level := BOS high to beat | | | BOS left ts := BOS high time | | | BOS dir := 1 | | | array.push BOS bosTimesBull, time | | | if array.size BOS bosTimesBull 15 | | | if array.size BOS bosTimesBull 0 | | | array.shift BOS bosTimesBull | | | if close < open and barstate.isconfirmed and BOS dir == 0 | | | BOS isBosBear := true | | | int i2 = 1 | | | while BOS isBosBear and i2 <= bar index and i2 <= 1000 and close i2 <= open i2 | | | if low i2 < close or array.includes BOS bosTimesBear, time i2 | | | BOS isBosBear := false | | | i2 += 1 | | | float BOS low to beat = na | | | int BOS low time = na | | | while BOS isBosBear and i2 <= bar index and i2 <= 1000 and close i2 = open i2 | | | if na BOS low to beat or low i2 < BOS low to beat | | | BOS low to beat := low i2 | | | BOS low time := time i2 | | | i2 += 1 | | | if BOS isBosBear and i2 <= bar index and i2 <= 1000 and low i2 < BOS low to beat | | | BOS low to beat := low i2 | | | BOS low time := time i2 | | | if BOS isBosBear and close = nz BOS low to beat, close | | | BOS isBosBear := false | | | if BOS isBosBear | | | BOS level := BOS low to beat | | | BOS left ts := BOS low time | | | BOS dir := -1 | | | array.push BOS bosTimesBear, time | | | if array.size BOS bosTimesBear 15 | | | if array.size BOS bosTimesBear 0 | | | array.shift BOS bosTimesBear | | | bool BOS is new = BOS dir = 0 | | | BOS is new, BOS left ts, time, BOS level, BOS dir | | | // ───────────────────────────────────────────────────────────────────────────── | | | // INTRABAR 1-MINUTE DATA | | | // ───────────────────────────────────────────────────────────────────────────── | | | ib times = request.security lower tf syminfo.tickerid, "1", time | | | ib opens = request.security lower tf syminfo.tickerid, "1", open | | | ib closes = request.security lower tf syminfo.tickerid, "1", close | | | ib highs = request.security lower tf syminfo.tickerid, "1", high | | | ib lows = request.security lower tf syminfo.tickerid, "1", low | | | ib in asia = request.security lower tf syminfo.tickerid, "1", not na time timeframe.period, asia time, "America/New York" | | | ib in london = request.security lower tf syminfo.tickerid, "1", not na time timeframe.period, london time, "America/New York" | | | ib in trade window = request.security lower tf syminfo.tickerid, "1", not na time timeframe.period, trade window time, "America/New York" | | | // ───────────────────────────────────────────────────────────────────────────── | | | // 15-MINUTE DATA FOR KEY ZONE | | | // ───────────────────────────────────────────────────────────────────────────── | | | m15 high val, m15 low val, m15 time val = request.security syminfo.tickerid, "15", high, low, time , barmerge.gaps off, barmerge.lookahead off | | | // 1-minute ATR — one value per chart bar; used for direction thresholds. | | | m1 atr = request.security syminfo.tickerid, "1", ta.atr 14 , barmerge.gaps off, barmerge.lookahead off | | | // ───────────────────────────────────────────────────────────────────────────── | | | // 1-MINUTE BOS SIGNALS chart-bar scope, confirmed on 1m bar close | | | // bos fire event is true only on the FIRST chart bar of each new 1m bar that | | | // produced a BOS, matching the gating pattern from the TJR module. | | | // ───────────────────────────────────────────────────────────────────────────── | | | bos htf time = request.security syminfo.tickerid, "1", time, barmerge.gaps off, barmerge.lookahead off | | | bos ev new, bos ev left ts, bos ev right ts, bos ev level, bos ev dir = request.security syminfo.tickerid, "1", BOS core , barmerge.gaps off, barmerge.lookahead off | | | bos tf newbar = ta.change bos htf time = 0 | | | bos fire event = bos ev new and bos tf newbar | | | // ───────────────────────────────────────────────────────────────────────────── | | | // SESSION INSTANCES & ARRAYS | | | // ───────────────────────────────────────────────────────────────────────────── | | | var Session asia = Session.new name="Asia", time window=asia time, line color=color.yellow | | | var Session london = Session.new name="London", time window=london time, line color=color.new color.teal, 0 | | | var array<Session asia sessions = array.new<Session | | | var array<Session london sessions = array.new<Session | | | const int MAX SESSIONS = 25 | | | var DailyState state = DailyState.new | | | var bool prev ib in asia = false | | | var bool prev ib in london = false | | | var bool do close all = false | | | // BOS line arrays for visualization | | | var line bos bull lines = array.new line | | | var line bos bear lines = array.new line | | | const int BOS MAX LINES = 15 | | | // ───────────────────────────────────────────────────────────────────────────── | | | // HELPER FUNCTIONS | | | // ───────────────────────────────────────────────────────────────────────────── | | | cleanup session Session sess = | | | if not na sess.high line | | | line.delete sess.high line | | | if not na sess.low line | | | line.delete sess.low line | | | if not na sess.high label | | | label.delete sess.high label | | | if not na sess.low label | | | label.delete sess.low label | | | copy session Session src = | | | Session.new | | | name = src.name, | | | time window = src.time window, | | | line color = src.line color, | | | high = src.high, | | | low = src.low, | | | high time = src.high time, | | | low time = src.low time, | | | session start time = src.session start time, | | | high valid = src.high valid, | | | low valid = src.low valid, | | | high invalid time = src.high invalid time, | | | low invalid time = src.low invalid time, | | | high line = src.high line, | | | low line = src.low line, | | | high label = src.high label, | | | low label = src.low label | | | invalidate level Session sess, bool is high, int inv time = | | | if is high | | | sess.high valid := false | | | sess.high invalid time := inv time | | | if not na sess.high line | | | line.set x2 sess.high line, inv time | | | if na sess.high label | | | sess.high label := label.new x=inv time, y=sess.high, text="", xloc=xloc.bar time, style=label.style label left, color=color.new sess.line color, 70 , textcolor=color.black, size=size.tiny, text font family=font.family monospace | | | else | | | sess.low valid := false | | | sess.low invalid time := inv time | | | if not na sess.low line | | | line.set x2 sess.low line, inv time | | | if na sess.low label | | | sess.low label := label.new x=inv time, y=sess.low, text="", xloc=xloc.bar time, style=label.style label left, color=color.new sess.line color, 70 , textcolor=color.black, size=size.tiny, text font family=font.family monospace | | | process session start Session sess, array<Session sess array, int ib time, int chart time, float ib high, float ib low = | | | if not na sess.session start time | | | sess array.push copy session sess | | | if array.size sess array MAX SESSIONS and array.size sess array 0 | | | cleanup session sess array.shift | | | sess.high := ib high | | | sess.low := ib low | | | sess.high time := chart time | | | sess.low time := chart time | | | sess.session start time := ib time | | | sess.high valid := true | | | sess.low valid := true | | | sess.high invalid time := na | | | sess.low invalid time := na | | | sess.high line := na | | | sess.low line := na | | | sess.high label := na | | | sess.low label := na | | | process session update Session sess, float ib high, float ib low, int ib time, int chart time = | | | if na sess.high or ib high sess.high | | | sess.high := ib high | | | sess.high time := chart time | | | if na sess.low or ib low < sess.low | | | sess.low := ib low | | | sess.low time := chart time | | | process session invalidation Session sess, float ib close, int ib time = | | | if not na sess.high and sess.high valid and ib close sess.high | | | invalidate level sess, true, ib time | | | if not na sess.low and sess.low valid and ib close < sess.low | | | invalidate level sess, false, ib time | | | process archived invalidation array<Session sess array, float ib close, int ib time = | | | if array.size sess array 0 | | | for i = 0 to array.size sess array - 1 | | | s = sess array.get i | | | if not na s.high and s.high valid and ib close s.high | | | invalidate level s, true, ib time | | | if not na s.low and s.low valid and ib close < s.low | | | invalidate level s, false, ib time | | | process session end array<Session sess array, int ib time = | | | if array.size sess array 0 | | | prev sess = sess array.last | | | if not na prev sess.high and prev sess.high valid | | | invalidate level prev sess, true, ib time | | | if not na prev sess.low and prev sess.low valid | | | invalidate level prev sess, false, ib time | | | process session drawings Session sess = | | | if not na sess.high and not na sess.high time and not na sess.session start time | | | high x2 = sess.high valid ? time : sess.high invalid time | | | if na sess.high line | | | sess.high line := line.new x1=sess.high time, y1=sess.high, x2=high x2, y2=sess.high, xloc=xloc.bar time, color=color.new sess.line color, 30 , width=1, style=line.style solid | | | if not na sess.high line | | | line.set x1 sess.high line, sess.high time | | | line.set x2 sess.high line, high x2 | | | line.set y1 sess.high line, sess.high | | | line.set y2 sess.high line, sess.high | | | if not na sess.low and not na sess.low time and not na sess.session start time | | | low x2 = sess.low valid ? time : sess.low invalid time | | | if na sess.low line | | | sess.low line := line.new x1=sess.low time, y1=sess.low, x2=low x2, y2=sess.low, xloc=xloc.bar time, color=color.new sess.line color, 30 , width=1, style=line.style solid | | | if not na sess.low line | | | line.set x1 sess.low line, sess.low time | | | line.set x2 sess.low line, low x2 | | | line.set y1 sess.low line, sess.low | | | line.set y2 sess.low line, sess.low | | | process archived drawings array<Session sess array = | | | if array.size sess array 0 | | | for i = 0 to array.size sess array - 1 | | | s = sess array.get i | | | if not na s.high line and s.high valid | | | line.set x2 s.high line, time | | | if not na s.low line and s.low valid | | | line.set x2 s.low line, time | | | // ───────────────────────────────────────────────────────────────────────────── | | | // SL / TP COMPUTATION | | | // anchor: the price level from which SL scan distance is measured and from | | | // which TP is projected. In Limit Order mode this is zone mid; | | | // in BOS Confirmation mode this is the actual BOS bar close price. | | | // ───────────────────────────────────────────────────────────────────────────── | | | check sl candidate float lvl, bool valid, string lbl, bool is bull, float anchor, | | | float cur price, float cur dist, string cur text = | | | new price = cur price | | | new dist = cur dist | | | new text = cur text | | | if valid and not na lvl | | | d = is bull ? anchor - lvl : lvl - anchor | | | if d = sl scan low and d <= sl scan high and d cur dist | | | new dist := d | | | new price := lvl | | | new text := str.tostring math.round d, 1 + "pts | " + lbl | | | new price, new dist, new text | | | compute sl tp float anchor, string dir = | | | is bull = dir == "bullish" | | | p1, d1, t1 = check sl candidate asia.high, asia.high valid, "asia high", is bull, anchor, float na , 0.0, "" | | | p2, d2, t2 = check sl candidate asia.low, asia.low valid, "asia low", is bull, anchor, float na , 0.0, "" | | | p3, d3, t3 = check sl candidate london.high, london.high valid, "london high", is bull, anchor, float na , 0.0, "" | | | p4, d4, t4 = check sl candidate london.low, london.low valid, "london low", is bull, anchor, float na , 0.0, "" | | | bp = float na | | | bd = 0.0 | | | bt = "" | | | if d1 bd | | | bp := p1 | | | bd := d1 | | | bt := t1 | | | if d2 bd | | | bp := p2 | | | bd := d2 | | | bt := t2 | | | if d3 bd | | | bp := p3 | | | bd := d3 | | | bt := t3 | | | if d4 bd | | | bp := p4 | | | bd := d4 | | | bt := t4 | | | if not na bp | | | tp dist = rr multiple bd | | | tp = is bull ? anchor + tp dist : anchor - tp dist | | | tp txt = str.tostring math.round tp dist, 1 + "pts" | | | bp, tp, bt, tp txt | | | else | | | fallback = sl default | | | sl fb = is bull ? anchor - fallback : anchor + fallback | | | tp fb = is bull ? anchor + rr multiple fallback : anchor - rr multiple fallback | | | sl txt = str.tostring fallback + "pts" | | | tp txt = str.tostring rr multiple fallback + "pts" | | | sl fb, tp fb, sl txt, tp txt | | | // ───────────────────────────────────────────────────────────────────────────── | | | // MAIN INTRABAR PROCESSING LOOP | | | // ───────────────────────────────────────────────────────────────────────────── | | | n ib = array.size ib times | | | mintick = syminfo.mintick | | | if n ib 0 | | | for i = 0 to n ib - 1 | | | t = array.get ib times, i | | | o = array.get ib opens, i | | | c = array.get ib closes, i | | | h = array.get ib highs, i | | | l = array.get ib lows, i | | | in a = array.get ib in asia, i | | | in l = array.get ib in london, i | | | in window = array.get ib in trade window, i | | | prev a = i == 0 ? prev ib in asia : array.get ib in asia, i - 1 | | | prev l = i == 0 ? prev ib in london : array.get ib in london, i - 1 | | | ib hour = hour t, "America/New York" | | | ib minute = minute t, "America/New York" | | | in ny window = ib hour < 16 or ib hour == 16 and ib minute < 15 | | | after 815 = ib hour 8 or ib hour == 8 and ib minute = 15 | | | after 930 = ib hour 9 or ib hour == 9 and ib minute = 30 | | | // ── Daily state reset at Asia session open 18:00 ──────────────────── | | | if ib hour == 18 and ib minute == 0 | | | state := DailyState.new | | | // ── Asia session ────────────────────────────────────────────────────── | | | if show asia | | | if in a and not prev a | | | process session start asia, asia sessions, t, time, h, l | | | else if in a | | | process session update asia, h, l, t, time | | | process session invalidation asia, c, t | | | process archived invalidation asia sessions, c, t | | | if not in a and prev a | | | process session end asia sessions, t | | | // ── London session ──────────────────────────────────────────────────── | | | if show london | | | if in l and not prev l | | | process session start london, london sessions, t, time, h, l | | | else if in l | | | process session update london, h, l, t, time | | | process session invalidation london, c, t | | | process archived invalidation london sessions, c, t | | | if not in l and prev l | | | process session end london sessions, t | | | // ── Clean Bias tracking ONLY when enabled; ONLY during NY; ONLY until a trade is entered ── | | | if require clean bias and not state.bias locked out and not state.trade taken and in ny window and after 815 and not na state.zone high | | | if l < state.zone low | | | state.touched below since 815 := true | | | if h state.zone high | | | state.touched above since 815 := true | | | // ── Trade direction determination ───────────────────────────────────── | | | if in ny window and ib hour == 9 and ib minute == 30 and na state.trade dir and not na state.zone high and not state.bias locked out | | | bull candidate = c state.zone high | | | bear candidate = c < state.zone low | | | if bull candidate | | | if require clean bias and not state.trade taken and state.touched below since 815 | | | state.bias locked out := true | | | is bear = c < o | | | y = is bear ? h : l | | | st = is bear ? label.style label down : label.style label up | | | label.new x=t, y=y, text="Bias Rejected", xloc=xloc.bar time, style=st, | | | color=color.new color.gray, 75 , textcolor=color.black, size=size.small, text font family=font.family monospace | | | else | | | state.trade dir := "bullish" | | | state.dir determined time := t | | | else if bear candidate | | | if require clean bias and not state.trade taken and state.touched above since 815 | | | state.bias locked out := true | | | is bear = c < o | | | y = is bear ? h : l | | | st = is bear ? label.style label down : label.style label up | | | label.new x=t, y=y, text="Bias Rejected", xloc=xloc.bar time, style=st, | | | color=color.new color.gray, 75 , textcolor=color.black, size=size.small, text font family=font.family monospace | | | else | | | state.trade dir := "bearish" | | | state.dir determined time := t | | | // ATR-based fallback for bars after 9:30 and before NY close 16:15 . | | | if in ny window and after 930 and na state.trade dir and not na state.zone high and not state.bias locked out | | | upper threshold = state.zone high + m1 atr | | | lower threshold = state.zone low - m1 atr | | | bull candidate = c upper threshold | | | bear candidate = c < lower threshold | | | if bull candidate | | | if require clean bias and not state.trade taken and state.touched below since 815 | | | state.bias locked out := true | | | is bear = c < o | | | y = is bear ? h : l | | | st = is bear ? label.style label down : label.style label up | | | label.new x=t, y=y, text="Bias Rejected", xloc=xloc.bar time, style=st, | | | color=color.new color.gray, 75 , textcolor=color.black, size=size.small, text font family=font.family monospace | | | else | | | state.trade dir := "bullish" | | | state.dir determined time := t | | | else if bear candidate | | | if require clean bias and not state.trade taken and state.touched above since 815 | | | state.bias locked out := true | | | is bear = c < o | | | y = is bear ? h : l | | | st = is bear ? label.style label down : label.style label up | | | label.new x=t, y=y, text="Bias Rejected", xloc=xloc.bar time, style=st, | | | color=color.new color.gray, 75 , textcolor=color.black, size=size.small, text font family=font.family monospace | | | else | | | state.trade dir := "bearish" | | | state.dir determined time := t | | | // Clear trade direction at NY futures session close 16:15 and flag close all. | | | if ib hour == 16 and ib minute == 15 | | | state.trade dir := na | | | do close all := true | | | // Trade window filter — IMPORTANT: don't clear direction mid-trade. | | | if use trade window and not in window | | | if not state.trade active | | | state.trade dir := na | | | // BOS mode: expire any pending tap when the window closes | | | if entry mode == "BOS Confirmation" | | | state.tap state := 0 | | | state.awaiting bos := false | | | state.tap time := na | | | state.limit pending := false | | | // ── LIMIT ORDER MODE: order placement ──────────────────────────────── | | | if entry mode == "Limit Order" | | | if not state.trade banned and not na state.trade dir and not state.limit pending and not state.trade active and na state.limit price | | | state.limit pending := true | | | state.limit price := state.zone mid | | | // ── LIMIT ORDER MODE: manual fill detection ─────────────────────────── | | | if entry mode == "Limit Order" | | | if state.limit pending and not state.trade active | | | filled = state.trade dir == "bullish" ? l <= state.limit price : h = state.limit price | | | if filled | | | state.limit pending := false | | | state.trade active := true | | | state.pos opened := false | | | state.trade taken := true // unconditional — one trade per day | | | state.entry price := state.limit price | | | state.entry time := time | | | state.entry ib time := t | | | state.entry dir := state.trade dir | | | // Limit Order mode: anchor is zone mid entry price == zone mid | | | computed sl, computed tp, computed sl lbl, computed tp lbl = compute sl tp state.zone mid, state.trade dir | | | state.sl price := computed sl | | | state.tp price := computed tp | | | state.sl label text := computed sl lbl | | | state.tp label text := computed tp lbl | | | state.init sl price := computed sl | | | state.init tp price := computed tp | | | state.init sl dist := math.abs state.entry price - computed sl | | | state.init tp dist := math.abs computed tp - state.entry price | | | state.sl mode := sl manage mode | | | state.be triggered := false | | | state.be time := na | | | state.exit time := na | | | if sl manage mode == "Trail" | | | state.trail dist := math.abs computed sl - state.limit price | | | raw ticks = int math.round state.trail dist / mintick | | | state.trail offset ticks := math.max raw ticks, 1 | | | state.trail best := state.entry price | | | offset px = state.trail offset ticks mintick | | | state.trail sl price := state.entry dir == "bullish" ? state.entry price - offset px : state.entry price + offset px | | | state.sl price := state.trail sl price | | | // ── BOS CONFIRMATION MODE: tap detection ───────────────────────────── | | | // Runs only when no trade has been taken today, no active trade, direction | | | // is known, the zone is ready, and the instrument is not banned. | | | if entry mode == "BOS Confirmation" and not state.trade taken and not state.trade banned and not state.trade active and not na state.trade dir and not na state.zone high | | | in window for tap = not use trade window or in window | | | if in window for tap | | | is bull day = state.trade dir == "bullish" | | | is bear day = state.trade dir == "bearish" | | | // ── Permanent range-through invalidation ────────────────────── | | | // If price advances fully through the opposing zone boundary, the | | | // tap setup is dead for the rest of the day — regardless of whether | | | // a tap was already armed or not. This prevents re-arming after | | | // the invalidation event the prior bug: reset to 0 → retrace back | | | // through mid → re-armed → trade taken after range blow-through . | | | // | | | // Bearish day: price trades above zone high → invalidated | | | // Bullish day: price trades below zone low → invalidated | | | if not state.tap invalidated | | | if is bear day and h state.zone high | | | state.tap invalidated := true | | | state.tap state := 0 | | | state.awaiting bos := false | | | state.tap time := na | | | else if is bull day and l < state.zone low | | | state.tap invalidated := true | | | state.tap state := 0 | | | state.awaiting bos := false | | | state.tap time := na | | | // ── Tap arming — only if not permanently invalidated ────────── | | | if not state.tap invalidated and state.tap state == 0 | | | // Bullish day: price dips to or below the midpoint → buy setup armed | | | if is bull day and l <= state.zone mid | | | state.tap state := 1 | | | state.awaiting bos := true | | | state.tap time := t | | | // Bearish day: price rallies to or above the midpoint → sell setup armed | | | else if is bear day and h = state.zone mid | | | state.tap state := -1 | | | state.awaiting bos := true | | | state.tap time := t | | | // ── SL management updates VISUAL ONLY; real orders handled by strategy.exit ── | | | if state.trade active and not na state.entry dir | | | after entry 1m = not na state.entry ib time ? t state.entry ib time : true | | | is long mgmt = state.entry dir == "bullish" | | | if state.sl mode == "Move to BE" and not state.be triggered and after entry 1m | | | sl d = state.init sl dist | | | tp d = state.init tp dist | | | valid geom = not na sl d and not na tp d and tp d 0 and sl d 0 | | | if valid geom | | | be req = sl d < tp d ? sl d : 0.5 tp d | | | be hit = is long mgmt ? h = state.entry price + be req : l <= state.entry price - be req | | | if be hit | | | state.be triggered := true | | | state.be time := time | | | state.sl price := state.entry price | | | else if state.sl mode == "Trail" and not na state.trail offset ticks and not na state.trail best | | | if after entry 1m | | | if is long mgmt | | | state.trail best := math.max state.trail best, h | | | state.trail sl price := state.trail best - state.trail offset ticks mintick | | | else | | | state.trail best := math.min state.trail best, l | | | state.trail sl price := state.trail best + state.trail offset ticks mintick | | | state.sl price := state.trail sl price | | | prev ib in asia := array.get ib in asia, n ib - 1 | | | prev ib in london := array.get ib in london, n ib - 1 | | | // ───────────────────────────────────────────────────────────────────────────── | | | // KEY ZONE 8:00-8:15 AM 15M CANDLE | | | // ───────────────────────────────────────────────────────────────────────────── | | | m15 hour = hour m15 time val, "America/New York" | | | m15 minute = minute m15 time val, "America/New York" | | | if m15 hour == 8 and m15 minute == 0 and na state.zone high | | | state.zone high := m15 high val | | | state.zone low := m15 low val | | | state.zone mid := m15 high val + m15 low val / 2.0 | | | state.zone start time := m15 time val | | | range w = state.zone high - state.zone low | | | if invalidate large range and range w 20.0 | | | state.range too large := true | | | state.trade banned := true | | | // ───────────────────────────────────────────────────────────────────────────── | | | // BOS CONFIRMATION MODE: Entry state initialization chart-bar scope | | | // | | | // Risk geometry anchored to BOS bar close actual fill price . | | | // tap invalidated is checked here as a belt-and-suspenders guard; it will | | | // already be true in the intrabar loop if the range was blown through. | | | // ───────────────────────────────────────────────────────────────────────────── | | | if entry mode == "BOS Confirmation" and bos fire event and state.awaiting bos and not state.trade active and not state.trade taken and not state.trade banned and not state.tap invalidated and not na state.zone mid | | | direction match = state.tap state == 1 and bos ev dir == 1 or state.tap state == -1 and bos ev dir == -1 | | | in trade window now = not use trade window or not na time timeframe.period, trade window time, "America/New York" | | | if direction match and in trade window now | | | bos entry dir = state.tap state == 1 ? "bullish" : "bearish" | | | bos fill price = close | | | // SL/TP anchored to actual fill price, not zone mid | | | computed sl, computed tp, computed sl lbl, computed tp lbl = compute sl tp bos fill price, bos entry dir | | | state.trade active := true | | | state.pos opened := false | | | state.trade taken := true // unconditional — one trade per day | | | state.entry price := bos fill price | | | state.entry time := time | | | state.entry ib time := time | | | state.entry dir := bos entry dir | | | state.sl price := computed sl | | | state.tp price := computed tp | | | state.sl label text := computed sl lbl | | | state.tp label text := computed tp lbl | | | state.init sl price := computed sl | | | state.init tp price := computed tp | | | state.init sl dist := math.abs bos fill price - computed sl | | | state.init tp dist := math.abs computed tp - bos fill price | | | state.sl mode := sl manage mode | | | state.be triggered := false | | | state.be time := na | | | state.exit time := na | | | if sl manage mode == "Trail" | | | state.trail dist := math.abs computed sl - bos fill price | | | raw ticks = int math.round state.trail dist / mintick | | | state.trail offset ticks := math.max raw ticks, 1 | | | state.trail best := bos fill price | | | offset px = state.trail offset ticks mintick | | | state.trail sl price := bos entry dir == "bullish" ? bos fill price - offset px : bos fill price + offset px | | | state.sl price := state.trail sl price | | | // Consume the tap | | | state.tap state := 0 | | | state.awaiting bos := false | | | state.tap time := na | | | // ───────────────────────────────────────────────────────────────────────────── | | | // STRATEGY ORDERS chart-bar scope only | | | // ───────────────────────────────────────────────────────────────────────────── | | | order qty = int math.round strategy.default entry qty close | | | // ── Limit Order mode ────────────────────────────────────────────────────────── | | | if entry mode == "Limit Order" | | | if not state.trade banned and state.limit pending and strategy.position size == 0 and not na state.limit price | | | if state.trade dir == "bullish" | | | strategy.entry "Long", strategy.long, qty=order qty, limit=state.limit price | | | else if state.trade dir == "bearish" | | | strategy.entry "Short", strategy.short, qty=order qty, limit=state.limit price | | | if not state.limit pending and na state.entry price and strategy.position size == 0 | | | strategy.cancel all | | | // ── BOS Confirmation mode — market entry on BOS bar close ──────────────────── | | | if entry mode == "BOS Confirmation" | | | if state.trade active and not state.pos opened and strategy.position size == 0 and not na state.entry price | | | if state.entry dir == "bullish" | | | strategy.entry "Long", strategy.long, qty=order qty | | | else if state.entry dir == "bearish" | | | strategy.entry "Short", strategy.short, qty=order qty | | | // ── Shared: exits for any active position both modes ─────────────────────── | | | if not na state.entry price and not na state.tp price | | | if strategy.position size 0 | | | if state.sl mode == "Trail" and not na state.trail offset ticks | | | strategy.exit "Long Exit", "Long", | | | limit = state.tp price, | | | trail price = state.entry price, | | | trail offset = state.trail offset ticks | | | else if not na state.sl price | | | strategy.exit "Long Exit", "Long", stop=state.sl price, limit=state.tp price | | | else if strategy.position size < 0 | | | if state.sl mode == "Trail" and not na state.trail offset ticks | | | strategy.exit "Short Exit", "Short", | | | limit = state.tp price, | | | trail price = state.entry price, | | | trail offset = state.trail offset ticks | | | else if not na state.sl price | | | strategy.exit "Short Exit", "Short", stop=state.sl price, limit=state.tp price | | | if do close all | | | strategy.close all comment="NY Close" | | | do close all := false | | | // ───────────────────────────────────────────────────────────────────────────── | | | // KEEP VISUALS ACTIVE UNTIL THE POSITION IS ACTUALLY CLOSED | | | // ───────────────────────────────────────────────────────────────────────────── | | | if state.trade active | | | if not state.pos opened and strategy.position size = 0 | | | state.pos opened := true | | | if state.pos opened and strategy.position size == 0 | | | state.trade active := false | | | state.exit time := time | | | // ───────────────────────────────────────────────────────────────────────────── | | | // DRAWINGS — called once per chart bar after all intrabar processing | | | // ───────────────────────────────────────────────────────────────────────────── | | | if show asia | | | process session drawings asia | | | process archived drawings asia sessions | | | if show london | | | process session drawings london | | | process archived drawings london sessions | | | ib last time = n ib 0 ? array.get ib times, n ib - 1 : na | | | ny session end time = not na asia.session start time ? asia.session start time + 22 60 60 1000 : na | | | if not na state.zone high and not na state.zone start time and not na ny session end time and not na ib last time | | | box end x = math.min ib last time, ny session end time | | | box txt = state.range too large ? "Range Too Large" : "" | | | if na state.zone box | | | state.zone box := box.new | | | left=state.zone start time, top=state.zone high, right=box end x, bottom=state.zone low, | | | xloc=xloc.bar time, | | | bgcolor=color.new color.teal, 85 , | | | border color=color.new color.teal, 0 , | | | border width=1, | | | text=box txt, | | | text color=color.black, | | | text halign=text.align center, | | | text valign=text.align center, | | | text size=size.normal | | | else | | | box.set right state.zone box, box end x | | | box.set text state.zone box, box txt | | | box.set text color state.zone box, color.black | | | box.set text halign state.zone box, text.align center | | | box.set text valign state.zone box, text.align center | | | if not na state.zone mid and not na state.zone start time and not na ny session end time and not na ib last time | | | mid end x = math.min ib last time, ny session end time | | | if na state.zone mid line | | | state.zone mid line := line.new x1=state.zone start time, y1=state.zone mid, x2=mid end x, y2=state.zone mid, xloc=xloc.bar time, color=color.new color.black, 0 , width=1, style=line.style dashed | | | else | | | line.set x2 state.zone mid line, mid end x | | | // ── BOS line visualization ──────────────────────────────────────────────────── | | | if show bos lines and entry mode == "BOS Confirmation" and state.entry time == time | | | if bos ev dir == 1 | | | bos ln = line.new x1=bos ev left ts, y1=bos ev level, x2=bos ev right ts, y2=bos ev level, xloc=xloc.bar time, color=color.new color.green, 0 , width=2, extend=extend.none | | | array.push bos bull lines, bos ln | | | if array.size bos bull lines BOS MAX LINES | | | if array.size bos bull lines 0 | | | line.delete array.shift bos bull lines | | | else if bos ev dir == -1 | | | bos ln = line.new x1=bos ev left ts, y1=bos ev level, x2=bos ev right ts, y2=bos ev level, xloc=xloc.bar time, color=color.new color.red, 0 , width=2, extend=extend.none | | | array.push bos bear lines, bos ln | | | if array.size bos bear lines BOS MAX LINES | | | if array.size bos bear lines 0 | | | line.delete array.shift bos bear lines | | | in asia session chart = not na time timeframe.period, asia time, "America/New York" | | | in london session chart = not na time timeframe.period, london time, "America/New York" | | | asia high for fill = show asia and not na asia.high and in asia session chart ? asia.high : na | | | asia low for fill = show asia and not na asia.low and in asia session chart ? asia.low : na | | | london high for fill = show london and not na london.high and in london session chart ? london.high : na | | | london low for fill = show london and not na london.low and in london session chart ? london.low : na | | | asia high plot = plot asia high for fill, color=color.new color.white, 100 , linewidth=1, editable=false, title="Asia High Fill" | | | asia low plot = plot asia low for fill, color=color.new color.white, 100 , linewidth=1, editable=false, title="Asia Low Fill" | | | london high plot = plot london high for fill, color=color.new color.white, 100 , linewidth=1, editable=false, title="London High Fill" | | | london low plot = plot london low for fill, color=color.new color.white, 100 , linewidth=1, editable=false, title="London Low Fill" | | | fill asia high plot, asia low plot, color=show asia ? color.new color.yellow, 90 : na, title="Asia Session Background" | | | fill london high plot, london low plot, color=show london ? color.new color.teal, 90 : na, title="London Session Background" | | | bg color = show bg and not na state.trade dir ? state.trade dir == "bullish" ? color.new color.green, 95 : color.new color.red, 95 : na | | | bgcolor bg color, title="Trade Direction Background" | | | // ───────────────────────────────────────────────────────────────────────────── | | | // TRAIL VISUALIZATION VIA "TWO PLOTS + FILL" | | | // ───────────────────────────────────────────────────────────────────────────── | | | trail mode should plot = state.sl mode == "Trail" and not na state.entry price and not na state.trail sl price and state.trade active or not state.trade active and not na state.exit time and time == state.exit time | | | trail entry series = trail mode should plot ? state.entry price : na | | | trail sl series = trail mode should plot ? state.trail sl price : na | | | trail entry plot = plot trail entry series, color=color.new color.red, 100 , linewidth=1, title="Trail Entry Hidden " | | | trail sl plot = plot trail sl series, color=color.new color.red, 100 , linewidth=1, title="Trail SL Hidden " | | | fill trail entry plot, trail sl plot, color=trail mode should plot ? color.new color.red, 70 : na, title="Trailing SL Fill" | | | // ───────────────────────────────────────────────────────────────────────────── | | | // TRADE VISUALISATION boxes/labels | | | // ───────────────────────────────────────────────────────────────────────────── | | | if not na state.entry time and not na state.entry price and not na state.entry dir | | | is long = state.entry dir == "bullish" | | | tp top = is long ? state.tp price : state.entry price | | | tp bottom = is long ? state.entry price : state.tp price | | | right edge = state.trade active ? time : state.exit time | | | be mode = state.sl mode == "Move to BE" | | | trail mode = state.sl mode == "Trail" | | | if na state.tp box | | | state.tp box := box.new left=state.entry time, top=tp top, right=right edge, bottom=tp bottom, xloc=xloc.bar time, bgcolor=color.new color.green, 80 , border color=na | | | state.tp label := label.new x=right edge, y=state.tp price, text=state.tp label text, xloc=xloc.bar time, style=label.style label left, color=color.new color.green, 60 , textcolor=color.white, size=size.small, text font family=font.family monospace | | | else | | | box.set right state.tp box, right edge | | | label.set x state.tp label, right edge | | | if trail mode | | | if na state.trail label | | | state.trail label := label.new | | | x=right edge, | | | y=state.trail sl price, | | | text=str.tostring math.round state.trail dist, 2 + " trail", | | | xloc=xloc.bar time, | | | style=label.style label left, | | | color=color.new color.red, 60 , | | | textcolor=color.white, | | | size=size.small, | | | text font family=font.family monospace | | | else | | | label.set x state.trail label, right edge | | | label.set y state.trail label, state.trail sl price | | | else | | | sl right = be mode and state.be triggered ? state.be time : right edge | | | sl top = is long ? state.entry price : state.sl price | | | sl bottom = is long ? state.sl price : state.entry price | | | if na state.sl box | | | state.sl box := box.new left=state.entry time, top=sl top, right=sl right, bottom=sl bottom, xloc=xloc.bar time, bgcolor=color.new color.red, 80 , border color=na | | | state.sl label := label.new x=sl right, y=state.sl price, text=state.sl label text, xloc=xloc.bar time, style=label.style label left, color=color.new color.red, 60 , textcolor=color.white, size=size.small, text font family=font.family monospace | | | else | | | box.set right state.sl box, sl right | | | label.set x state.sl label, sl right | | | if be mode and state.be triggered | | | if na state.be label | | | state.be label := label.new x=right edge, y=state.entry price, text="B/E", xloc=xloc.bar time, style=label.style label left, color=color.new color.red, 60 , textcolor=color.white, size=size.small, text font family=font.family monospace | | | else | | | label.set x state.be label, right edge | Are you Trying to make people lose more money? Learning PineScript myself. This was SUPER helpful Are you Trying to make people lose more money? Obviously not – did you watch my video explaining that this TikTok influencer strategy does not generate alpha, and has uninteresting prop firm performance? I've posted this for auditability, not as financial advice. It's unlikely that you don't know this, assuming you arrived here from my video explicitly condemning this strategy. Hey i got a question, wouldn’t filled = state.trade dir == "bullish" ? l <= state.limit price : h = state.limit price assume fill if price touches midline, but in reality, limit orders fill at limit price or better? And also for ATR Fallback, checks every bar after 9:30, but uses m1 atr so if on 15m ATR updates slowly and 1m its computationally heavy? And also wouldnt if require clean bias and not state.trade taken and state.touched below since 815 be too restrictive for volatile opens like if price touches low at 8:16 but closes above midline at 9:30 then bias is rejected? Super interesting how did you code this where's code from your other videos? like justin werlein's strategy you claimed to code, etc. @deltatrend https://github.com/deltatrend Great work.