jamel / Jamel is on Nostr

//@version=6
// OE Levels. Paste into the Pine Editor and add it to the chart.
// Direction follows the anchor candle close versus its open. A down close keeps
// 110% above the high, the 62–79 OTE box in premium, and the diamond on the high.
// Diamonds and arrows are TradingView shapes, not text characters.
indicator("OE Levels", "OE Levels", overlay=true, max_lines_count=500, max_labels_count=500, max_boxes_count=80)
grpAlert = "Alerts"
grpTime = "Time"
grpKey = "Key Levels"
grpFib = "Fibonacci Levels"
grpZone = "Zone Highlights"
grpSess = "Session Filters"
grpTab = "Auto Optimal Entry Table"
grpInfo = "Info Table"
alerts = input.bool(false, "Alerts?", inline="al", group=grpAlert, tooltip="OTE: first touch of 62%. Low, OTE, High: first touch of those three. All Levels: first touch of every key and fib level. Create an alert and choose Any alert() function call.")
alertOn = input.string("OTE", "", options=["OTE", "Low, OTE, High", "All Levels"], inline="al", group=grpAlert)
oteType = input.string("Candle", "OTE Type", options=["Candle", "Session", "Manual"], group=grpTime, tooltip="Candle: previous higher-timeframe candle. Session: high and low inside the session, plotted once it ends. Manual: your start, adapting until End.")
autoTf = input.bool(true, "Auto Timeframe", group=grpTime, tooltip="1m marks 15m, 5m marks 1H, 15m marks 4H, 1H marks the previous day, 4H marks the week, 1D marks the month.")
tfIn = input.timeframe("240", "Timeframe", group=grpTime, tooltip="Candle type only. Must be equal to or higher than the chart. Custom minutes such as 90 are supported.")
customMin = input.int(0, "Custom minutes", minval=0, maxval=43200, group=grpTime, tooltip="Candle type only, with Auto off. 90 anchors a 90-minute candle. 0 uses the timeframe menu.")
sessStart = input.int(7, "Session", minval=0, maxval=23, inline="ss", group=grpTime)
sessStartM = input.int(0, ":", minval=0, maxval=59, inline="ss", group=grpTime, tooltip="Session type only. High and low formed inside this window, plotted once the session ends.")
sessEnd = input.int(10, "-", minval=0, maxval=23, inline="se", group=grpTime)
sessEndM = input.int(0, ":", minval=0, maxval=59, inline="se", group=grpTime)
tz = input.string("America/New_York", "Session Timezone", options=["America/New_York", "America/Chicago", "America/Los_Angeles", "Europe/London", "UTC"], group=grpTime, tooltip="IANA timezone for the session window and the session filters.")
manStart = input.time(timestamp("2099-01-01"), "Manual Start", group=grpTime, tooltip="Manual type only. First bar of the range. High and low keep adapting until End.")
useEnd = input.bool(false, "End", inline="en", group=grpTime, tooltip="Manual type only. Freeze the range at this time. Off keeps the range developing.")
manEnd = input.time(timestamp("2099-01-01"), "", inline="en", group=grpTime)
showTime = input.bool(true, "Time", inline="tm", group=grpTime, tooltip="Vertical delimiter at the start of the extension, plus the timeframe label on the anchored high or low.")
timeStyle = input.string("Dotted", "", options=["Solid", "Dashed", "Dotted"], inline="tm", group=grpTime)
timeW = input.int(1, "", minval=1, maxval=4, inline="tm", group=grpTime)
cTime = input.color(#5c6570, "", inline="tm", group=grpTime)
extendTo = input.string("Candle Close", "Extend To", options=["Candle Close", "Live Price"], inline="ex", group=grpTime, tooltip="Candle Close extends one full period. Live Price follows the last bar. The number is the bar offset to the right.")
extendBars = input.int(3, "", minval=0, maxval=40, inline="ex", group=grpTime)
liveMode = input.bool(false, "Live OHLC Mode", group=grpKey, tooltip="Candle type only. Use the developing candle instead of the previous one. High, Low, EQ and every Fibonacci level recalculate on each tick. Completed candles are kept as history.")
histKeep = input.int(0, "History", minval=0, maxval=8, group=grpKey, tooltip="Previous OTE periods kept on the chart. 0 shows only the current OTE.")
useBody = input.string("Wicks", "Range", options=["Wicks", "Bodies"], group=grpKey, tooltip="Wicks: high and low of the range. Bodies: highest and lowest open or close.")
showOte = input.bool(true, "OTE", inline="ko", group=grpKey)
oteStyle = input.string("Dotted", "", options=["Solid", "Dashed", "Dotted"], inline="ko", group=grpKey)
oteW = input.int(1, "", minval=1, maxval=4, inline="ko", group=grpKey)
cOte = input.color(#e1a046, "", inline="ko", group=grpKey)
showHigh = input.bool(true, "HIGH", inline="kh", group=grpKey)
highStyle = input.string("Solid", "", options=["Solid", "Dashed", "Dotted"], inline="kh", group=grpKey)
highW = input.int(1, "", minval=1, maxval=4, inline="kh", group=grpKey)
cHigh = input.color(#2fbfa4, "", inline="kh", group=grpKey)
showEq = input.bool(true, "EQ", inline="ke", group=grpKey)
eqStyle = input.string("Dotted", "", options=["Solid", "Dashed", "Dotted"], inline="ke", group=grpKey)
eqW = input.int(1, "", minval=1, maxval=4, inline="ke", group=grpKey)
cEq = input.color(#8b93a0, "", inline="ke", group=grpKey)
showLow = input.bool(true, "LOW", inline="kl", group=grpKey)
lowStyle = input.string("Solid", "", options=["Solid", "Dashed", "Dotted"], inline="kl", group=grpKey)
lowW = input.int(1, "", minval=1, maxval=4, inline="kl", group=grpKey)
cLow = input.color(#f23645, "", inline="kl", group=grpKey)
labSize = input.string("Small", "Label Size", options=["Small", "Normal", "Large"], group=grpKey)
fibGlobal = input.bool(false, "Apply Global Style To All Fibs", inline="fg", group=grpFib, tooltip="When enabled, this style and width override the individual Fibonacci settings below.")
fibGlobalStyle = input.string("Dotted", "", options=["Solid", "Dashed", "Dotted"], inline="fg", group=grpFib)
fibGlobalW = input.int(1, "", minval=1, maxval=4, inline="fg", group=grpFib)
show110 = input.bool(true, "1.1", inline="f110", group=grpFib)
v110 = input.float(1.1, "", inline="f110", group=grpFib)
c110 = input.color(#6a7382, "", inline="f110", group=grpFib)
st110 = input.string("Dotted", "", options=["Solid", "Dashed", "Dotted"], inline="f110", group=grpFib)
w110 = input.int(1, "", minval=1, maxval=4, inline="f110", group=grpFib)
show90 = input.bool(true, "0.9", inline="f90", group=grpFib)
v90 = input.float(0.9, "", inline="f90", group=grpFib)
c90 = input.color(#7b8492, "", inline="f90", group=grpFib)
st90 = input.string("Dotted", "", options=["Solid", "Dashed", "Dotted"], inline="f90", group=grpFib)
w90 = input.int(1, "", minval=1, maxval=4, inline="f90", group=grpFib)
show79 = input.bool(true, "0.79", inline="f79", group=grpFib)
v79 = input.float(0.79, "", inline="f79", group=grpFib)
c79 = input.color(#2bb89a, "", inline="f79", group=grpFib)
st79 = input.string("Dotted", "", options=["Solid", "Dashed", "Dotted"], inline="f79", group=grpFib)
w79 = input.int(1, "", minval=1, maxval=4, inline="f79", group=grpFib)
show75 = input.bool(true, "0.75", inline="f75", group=grpFib)
v75 = input.float(0.75, "", inline="f75", group=grpFib)
c75 = input.color(#1f9a84, "", inline="f75", group=grpFib)
st75 = input.string("Dotted", "", options=["Solid", "Dashed", "Dotted"], inline="f75", group=grpFib)
w75 = input.int(1, "", minval=1, maxval=4, inline="f75", group=grpFib)
show25 = input.bool(true, "0.25", inline="f25", group=grpFib)
v25 = input.float(0.25, "", inline="f25", group=grpFib)
c25 = input.color(#3fafa0, "", inline="f25", group=grpFib)
st25 = input.string("Dotted", "", options=["Solid", "Dashed", "Dotted"], inline="f25", group=grpFib)
w25 = input.int(1, "", minval=1, maxval=4, inline="f25", group=grpFib)
showN25 = input.bool(true, "-0.25", inline="fn25", group=grpFib)
vN25 = input.float(-0.25, "", inline="fn25", group=grpFib)
cN25 = input.color(#3d9e8c, "", inline="fn25", group=grpFib)
stN25 = input.string("Dotted", "", options=["Solid", "Dashed", "Dotted"], inline="fn25", group=grpFib)
wN25 = input.int(1, "", minval=1, maxval=4, inline="fn25", group=grpFib)
showN50 = input.bool(true, "-0.5", inline="fn50", group=grpFib)
vN50 = input.float(-0.5, "", inline="fn50", group=grpFib)
cN50 = input.color(#2a9d8a, "", inline="fn50", group=grpFib)
stN50 = input.string("Dotted", "", options=["Solid", "Dashed", "Dotted"], inline="fn50", group=grpFib)
wN50 = input.int(1, "", minval=1, maxval=4, inline="fn50", group=grpFib)
showN62 = input.bool(true, "-0.62", inline="fn62", group=grpFib)
vN62 = input.float(-0.62, "", inline="fn62", group=grpFib)
cN62 = input.color(#249888, "", inline="fn62", group=grpFib)
stN62 = input.string("Dotted", "", options=["Solid", "Dashed", "Dotted"], inline="fn62", group=grpFib)
wN62 = input.int(1, "", minval=1, maxval=4, inline="fn62", group=grpFib)
showN75 = input.bool(true, "-0.75", inline="fn75", group=grpFib)
vN75 = input.float(-0.75, "", inline="fn75", group=grpFib)
cN75 = input.color(#1f8f78, "", inline="fn75", group=grpFib)
stN75 = input.string("Dotted", "", options=["Solid", "Dashed", "Dotted"], inline="fn75", group=grpFib)
wN75 = input.int(1, "", minval=1, maxval=4, inline="fn75", group=grpFib)
showN100 = input.bool(true, "-1", inline="fn100", group=grpFib)
vN100 = input.float(-1.0, "", inline="fn100", group=grpFib)
cN100 = input.color(#17866f, "", inline="fn100", group=grpFib)
stN100 = input.string("Dotted", "", options=["Solid", "Dashed", "Dotted"], inline="fn100", group=grpFib)
wN100 = input.int(1, "", minval=1, maxval=4, inline="fn100", group=grpFib)
rev = input.bool(false, "Reverse", group=grpFib, tooltip="Flip the retracement. 0% moves from the high to the low, or the other way.")
showZone = input.bool(true, "Highlight OTE Zone (62% - 79%)", inline="zn", group=grpZone)
cZone = input.color(#0c2822, "", inline="zn", group=grpZone)
showCustom = input.bool(true, "Custom Zone", inline="cz", group=grpZone, tooltip="Highlight the area between any two Fibonacci values. Negative extensions are supported.")
custA = input.float(0.5, "", inline="cz", group=grpZone)
custB = input.float(0.62, "", inline="cz", group=grpZone)
cCustom = input.color(#12161c, "", inline="cz", group=grpZone)
exAsia = input.bool(false, "Exclude Asia (20:00 - 00:00 NY)", group=grpSess)
exLondon = input.bool(false, "Exclude London (02:00 - 05:00 NY)", group=grpSess)
exNyAm = input.bool(false, "Exclude NY AM (09:30 - 12:00 NY)", group=grpSess)
exLunch = input.bool(false, "Exclude Lunch (12:00 - 14:00 NY)", group=grpSess)
exNyPm = input.bool(false, "Exclude NY PM (14:00 - 16:00 NY)", group=grpSess, tooltip="An OTE whose period completes inside an excluded session is not plotted.")
showPct = input.bool(true, "Show?", inline="pt", group=grpTab)
adaptive = input.bool(true, "Adaptive Color?", inline="pt", group=grpTab, tooltip="The percentage takes the color of the zone price is trading in: OTE, 75%, 79%, 90%, 110%.")
pctSize = input.string("Normal", "Size", options=["Small", "Normal", "Large"], group=grpTab)
pctH = input.string("Center", "Horizontal", options=["Left", "Center", "Right"], inline="pp", group=grpTab)
pctV = input.string("Bottom", "Vertical", options=["Top", "Middle", "Bottom"], inline="pp", group=grpTab)
pctBg = input.color(color.white, "Percent", inline="pc", group=grpTab)
pctInk = input.color(#16181d, "", inline="pc", group=grpTab)
titleBg = input.color(#1f8f78, "Title", inline="ti", group=grpTab)
titleInk = input.color(color.white, "", inline="ti", group=grpTab)
showInfo = input.bool(true, "Show Info Table?", group=grpInfo)
infoTitle = input.string("AUTO OPTIMAL ENTRY", "Title", group=grpInfo)
infoH = input.string("Left", "Horizontal", options=["Left", "Center", "Right"], inline="ip", group=grpInfo)
infoV = input.string("Top", "Vertical", options=["Top", "Middle", "Bottom"], inline="ip", group=grpInfo)
infoBg = input.color(#d7f3ec, "Background", inline="ib", group=grpInfo)
infoInk = input.color(#0e7c66, "Text", inline="ib", group=grpInfo)
infoFrame = input.color(#1f8f78, "Frame", inline="ib", group=grpInfo)
int stepMs = nz(timeframe.in_seconds(), 60) * 1000
f_auto() =>
string p = timeframe.period
if p == "1M" or p == "M" or p == "1W" or p == "W" or p == "1D" or p == "D"
"1M"
else
int s = nz(timeframe.in_seconds(), 60)
// 1m and lower → 15m. Up to 5m → 1H. Up to 15m → 4H. Up to 1H → previous day. Up to 4H → week. Above that → previous month.
s <= 60 ? "15" : s <= 300 ? "60" : s <= 900 ? "240" : s <= 3600 ? "1D" : s <= 14400 ? "1W" : "1M"
f_name(tf) =>
tf == "15" ? "15m" : tf == "60" ? "1H" : tf == "240" ? "4H" : tf == "1D" or tf == "1W" or tf == "1M" ? tf : tf
[o15, h15, l15, c15, t15] = request.security(syminfo.tickerid, "15", [open[1], high[1], low[1], close[1], time[1]], barmerge.gaps_off, barmerge.lookahead_on)
[o60, h60, l60, c60, t60] = request.security(syminfo.tickerid, "60", [open[1], high[1], low[1], close[1], time[1]], barmerge.gaps_off, barmerge.lookahead_on)
[o240, h240, l240, c240, t240] = request.security(syminfo.tickerid, "240", [open[1], high[1], low[1], close[1], time[1]], barmerge.gaps_off, barmerge.lookahead_on)
[oD, hD, lD, cD, tD] = request.security(syminfo.tickerid, "1D", [open[1], high[1], low[1], close[1], time[1]], barmerge.gaps_off, barmerge.lookahead_on)
[oW, hW, lW, cW, tW] = request.security(syminfo.tickerid, "1W", [open[1], high[1], low[1], close[1], time[1]], barmerge.gaps_off, barmerge.lookahead_on)
[oM, hM, lM, cM, tM] = request.security(syminfo.tickerid, "1M", [open[1], high[1], low[1], close[1], time[1]], barmerge.gaps_off, barmerge.lookahead_on)
bool roll15 = timeframe.change("15")
bool roll60 = timeframe.change("60")
bool roll240 = timeframe.change("240")
bool rollD = timeframe.change("1D")
bool rollW = timeframe.change("1W")
bool rollM = timeframe.change("1M")
f_roll(tf) =>
tf == "15" ? roll15 : tf == "60" ? roll60 : tf == "240" ? roll240 : tf == "1D" or tf == "D" ? rollD : tf == "1W" or tf == "W" ? rollW : tf == "1M" or tf == "M" ? rollM : na(time[1]) or int(math.floor(time / math.max(nz(str.tonumber(tf), 60) * 60000, 60000))) != int(math.floor(time[1] / math.max(nz(str.tonumber(tf), 60) * 60000, 60000)))
f_chart() =>
string p = timeframe.period
p == "60" ? "1H" : p == "240" ? "4H" : p == "1D" or p == "1W" or p == "1M" ? p : str.contains(p, "S") ? p : p + "m"
f_next(boundary, tf) =>
if tf == "1M"
int y = year(boundary)
int m = month(boundary)
m == 12 ? timestamp(y + 1, 1, 1, 0, 0) : timestamp(y, m + 1, 1, 0, 0)
else if tf == "1W"
boundary + 604800000
else if tf == "1D"
boundary + 86400000
else
boundary + int(str.tonumber(tf) * 60000)
f_px(ratio, bull, hi, lo) =>
float span = hi - lo
bull ? hi - ratio * span : lo + ratio * span
f_in(mins, a, b) =>
mins >= a and mins < b
f_done(t) =>
int mins = hour(t, tz) * 60 + minute(t, tz)
(exAsia and f_in(mins, 20 * 60, 24 * 60)) or (exLondon and f_in(mins, 2 * 60, 5 * 60)) or (exNyAm and f_in(mins, 9 * 60 + 30, 12 * 60)) or (exLunch and f_in(mins, 12 * 60, 14 * 60)) or (exNyPm and f_in(mins, 14 * 60, 16 * 60))
f_touch(px) =>
not na(px) and high >= px and low <= px and not (high[1] >= px and low[1] <= px)
f_style(name) =>
name == "Solid" ? line.style_solid : name == "Dashed" ? line.style_dashed : line.style_dotted
f_sz(heavy) =>
if labSize == "Large"
heavy ? size.large : size.normal
else if labSize == "Normal"
heavy ? size.normal : size.small
else
heavy ? size.normal : size.small
f_pctxt(v) =>
str.tostring(v * 100, "#.##") + "%"
bool customOn = oteType == "Candle" and not autoTf and customMin > 0 and customMin * 60 >= nz(timeframe.in_seconds(), 60)
int customMs = math.max(customMin, 1) * 60000
string anchor = customOn ? str.tostring(customMin) : autoTf ? f_auto() : tfIn
bool rolled = customOn ? (na(time[1]) or int(math.floor(time / customMs)) != int(math.floor(time[1] / customMs))) : f_roll(anchor)
int clock = hour(time, tz) * 60 + minute(time, tz)
int aMin = sessStart * 60 + sessStartM
int bMin = sessEnd * 60 + sessEndM
bool inSess = bMin > aMin ? f_in(clock, aMin, bMin) : (clock >= aMin or clock < bMin)
bool manualLive = oteType == "Manual" and time >= manStart and (not useEnd or time <= manEnd)
bool active = oteType == "Session" ? inSess : oteType == "Manual" ? manualLive : true
type OeRange
float o
float hi
float lo
float c
float bHi
float bLo
int hiT
int loT
int bHiT
int bLoT
int t0
int t1
var OeRange[] hist = array.new<OeRange>()
var float runO = na
var float runH = na
var float runL = na
var float runC = na
var float runBH = na
var float runBL = na
var int runHiT = na
var int runLoT = na
var int runBHiT = na
var int runBLoT = na
var int runT0 = na
var bool armed = false
float bodyHi = math.max(open, close)
float bodyLo = math.min(open, close)
var int handledBar = na
bool candleFresh = oteType == "Candle" and rolled and (na(handledBar) or handledBar != time)
bool sessOpen = oteType != "Candle" and active and not active[1]
bool sessClose = oteType != "Candle" and not active and active[1]
if (candleFresh or sessClose) and armed and not na(runH) and runH > runL and not f_done(time)
array.push(hist, OeRange.new(runO, runH, runL, runC, runBH, runBL, runHiT, runLoT, runBHiT, runBLoT, runT0, time))
if array.size(hist) > 12
array.shift(hist)
if candleFresh
handledBar := time
runO := open
runH := high
runL := low
runC := close
runBH := bodyHi
runBL := bodyLo
runHiT := time
runLoT := time
runBHiT := time
runBLoT := time
runT0 := time
armed := true
else if sessOpen
runO := open
runH := high
runL := low
runC := close
runBH := bodyHi
runBL := bodyLo
runHiT := time
runLoT := time
runBHiT := time
runBLoT := time
runT0 := time
armed := true
else if sessClose
armed := false
else if active and armed
runC := close
if high >= runH
runH := high
runHiT := time
if low <= runL
runL := low
runLoT := time
if bodyHi >= runBH
runBH := bodyHi
runBHiT := time
if bodyLo <= runBL
runBL := bodyLo
runBLoT := time
int secOpen = anchor == "15" ? t15 : anchor == "60" ? t60 : anchor == "240" ? t240 : anchor == "1D" or anchor == "D" ? tD : anchor == "1W" or anchor == "W" ? tW : anchor == "1M" or anchor == "M" ? tM : na
int secEnd = na(secOpen) ? na : f_next(secOpen, anchor)
var int trkEnd = na
var int trkHiT = na
var int trkLoT = na
var float trkH = na
var float trkL = na
var int holdHiT = na
var int holdLoT = na
var int holdFor = na
if not na(secEnd)
if na(trkEnd) or secEnd != trkEnd
holdHiT := trkHiT
holdLoT := trkLoT
holdFor := trkEnd
trkEnd := secEnd
trkH := high
trkL := low
trkHiT := time
trkLoT := time
else
if na(trkH) or high >= trkH
trkH := high
trkHiT := time
if na(trkL) or low <= trkL
trkL := low
trkLoT := time
var line[] lines = array.new_line()
var label[] labels = array.new_label()
var box[] boxes = array.new_box()
var table pctTab = table.new(pctV == "Top" ? position.top_center : pctV == "Middle" ? position.middle_center : position.bottom_center, 1, 3, border_width=0, frame_width=0)
var table infoTab = table.new(infoV == "Bottom" ? position.bottom_left : infoV == "Middle" ? position.middle_left : position.top_left, 3, 1, border_width=1, frame_width=1, frame_color=infoFrame, border_color=infoFrame)
f_wipe() =>
while array.size(lines) > 0
line.delete(array.pop(lines))
while array.size(labels) > 0
label.delete(array.pop(labels))
while array.size(boxes) > 0
box.delete(array.pop(boxes))
f_seg(x1, y1, x2, y2, col, style, width) =>
array.push(lines, line.new(x1, y1, x2, y2, xloc=xloc.bar_time, color=col, style=style, width=width))
f_pre(kind) =>
kind == "ote" ? "◈ " : "◇ "
f_lab(x, y, txt, col, heavy) =>
array.push(labels, label.new(x, y, txt, xloc=xloc.bar_time, style=label.style_label_left, color=color.new(color.white, 100), textcolor=col, size=f_sz(heavy)))
f_draw(on, px, txt, col, x1, x2, style, width, labelIt, heavy, kind) =>
float y = na
if on and not na(px)
f_seg(x1, px, x2, px, col, style, width)
if labelIt
if kind == "up" or kind == "dn"
array.push(labels, label.new(x2, px, kind == "up" ? "▴" : "▾", xloc=xloc.bar_time, style=label.style_label_left, color=color.new(color.white, 100), textcolor=col, size=size.small))
f_lab(x2, px, " " + txt, col, heavy)
else
f_lab(x2, px, f_pre(kind) + txt, col, heavy)
y := px
y
f_bump(edge, px, useMax) =>
float n = edge
if not na(px)
n := na(n) ? px : useMax ? math.max(n, px) : math.min(n, px)
n
f_ink(lvl) =>
if not adaptive
pctInk
else if lvl >= 1
c110
else if lvl >= 0.845
c90
else if lvl >= 0.77
c79
else if lvl >= 0.7
c75
else if lvl >= 0.5
cOte
else
pctInk
var int pinSwing = na
var int pinAt = na
var float watchHi = na
var float watchLo = na
var bool watchBull = true
var float sideHi = na
var float sideLo = na
var bool oteHit = false
if barstate.islast and (array.size(hist) > 0 or (armed and not na(runH) and ((liveMode and oteType == "Candle") or (oteType == "Manual" and active))))
f_wipe()
bool pushedLive = false
int lastI = array.size(hist) - 1
int fromI = math.max(0, array.size(hist) - (histKeep + 1))
if ((liveMode and oteType == "Candle") or (oteType == "Manual" and active)) and armed and not na(runH) and runH > runL and not f_done(time)
array.push(hist, OeRange.new(runO, runH, runL, runC, runBH, runBL, runHiT, runLoT, runBHiT, runBLoT, runT0, time))
lastI := array.size(hist) - 1
fromI := lastI
pushedLive := true
else if array.size(hist) == 0
lastI := -1
if showInfo
table.cell(infoTab, 0, 0, infoTitle, text_color=infoInk, bgcolor=infoBg, text_size=size.small)
table.cell(infoTab, 1, 0, syminfo.ticker, text_color=color.white, bgcolor=color.black, text_size=size.small)
table.cell(infoTab, 2, 0, "TF · " + f_chart(), text_color=#d5d8e0, bgcolor=#242424, text_size=size.small)
else
table.cell(infoTab, 0, 0, "")
table.cell(infoTab, 1, 0, "")
table.cell(infoTab, 2, 0, "")
float top = na
float bot = na
float p = na
if lastI >= 0
for i = fromI to lastI
OeRange rg = array.get(hist, i)
if f_done(rg.t1)
continue
bool bodies = useBody == "Bodies"
bool live = i == lastI
bool useSec = oteType == "Candle" and not customOn and live and not liveMode
float secO = anchor == "15" ? o15 : anchor == "60" ? o60 : anchor == "240" ? o240 : anchor == "1D" or anchor == "D" ? oD : anchor == "1W" or anchor == "W" ? oW : anchor == "1M" or anchor == "M" ? oM : rg.o
float secH = anchor == "15" ? h15 : anchor == "60" ? h60 : anchor == "240" ? h240 : anchor == "1D" or anchor == "D" ? hD : anchor == "1W" or anchor == "W" ? hW : anchor == "1M" or anchor == "M" ? hM : rg.hi
float secL = anchor == "15" ? l15 : anchor == "60" ? l60 : anchor == "240" ? l240 : anchor == "1D" or anchor == "D" ? lD : anchor == "1W" or anchor == "W" ? lW : anchor == "1M" or anchor == "M" ? lM : rg.lo
float secC = anchor == "15" ? c15 : anchor == "60" ? c60 : anchor == "240" ? c240 : anchor == "1D" or anchor == "D" ? cD : anchor == "1W" or anchor == "W" ? cW : anchor == "1M" or anchor == "M" ? cM : rg.c
float hi = bodies ? rg.bHi : useSec ? secH : rg.hi
float lo = bodies ? rg.bLo : useSec ? secL : rg.lo
float dirO = useSec ? secO : rg.o
float dirC = useSec ? secC : rg.c
int hiT = bodies ? rg.bHiT : rg.hiT
int loT = bodies ? rg.bLoT : rg.loT
int edge = rg.t1
if useSec and not na(secOpen) and not na(secH) and secH > secL and not bodies
edge := f_next(secOpen, anchor)
int wickH = holdFor == secOpen and not na(holdHiT) ? holdHiT : secOpen
int wickL = holdFor == secOpen and not na(holdLoT) ? holdLoT : secOpen
hiT := wickH < secOpen or wickH > edge ? secOpen : wickH
loT := wickL < secOpen or wickL > edge ? secOpen : wickL
top := na
bot := na
if hi > lo
float midPx = (hi + lo) / 2.0
// Body direction, not wick order. The later extreme was flipping the
// whole fib and the OTE box even when the candle closed the other way.
bool bullish = oteType == "Candle" ? dirC >= dirO : dirC >= midPx
bool bull = bullish != rev
int sessMin = (sessEnd * 60 + sessEndM) - (sessStart * 60 + sessStartM)
sessMin := sessMin <= 0 ? sessMin + 1440 : sessMin
int periodMs = customOn ? customMs : oteType == "Session" ? sessMin * 60000 : math.max(stepMs, f_next(edge, anchor) - edge)
int right = extendTo == "Live Price" and live ? time + extendBars * stepMs : edge + periodMs
int tr = live ? 0 : 62
color fibStC = color.new(color.white, 100)
if showCustom and live
float cA = f_px(custA, bull, hi, lo)
float cB = f_px(custB, bull, hi, lo)
array.push(boxes, box.new(edge, math.max(cA, cB), right, math.min(cA, cB), xloc=xloc.bar_time, border_color=fibStC, bgcolor=color.new(cCustom, 20)))
if showZone and live
float zA = f_px(0.62, bull, hi, lo)
float zB = f_px(v79, bull, hi, lo)
array.push(boxes, box.new(edge, math.max(zA, zB), right, math.min(zA, zB), xloc=xloc.bar_time, border_color=fibStC, bgcolor=color.new(cZone, 25)))
p := f_draw(showN100, f_px(vN100, bull, hi, lo), f_pctxt(vN100), color.new(cN100, tr), edge, right, f_style(fibGlobal ? fibGlobalStyle : stN100), fibGlobal ? fibGlobalW : wN100, live, false, "d")
top := f_bump(top, p, true)
bot := f_bump(bot, p, false)
p := f_draw(showN75, f_px(vN75, bull, hi, lo), f_pctxt(vN75), color.new(cN75, tr), edge, right, f_style(fibGlobal ? fibGlobalStyle : stN75), fibGlobal ? fibGlobalW : wN75, live, false, "d")
top := f_bump(top, p, true)
bot := f_bump(bot, p, false)
p := f_draw(showN62, f_px(vN62, bull, hi, lo), f_pctxt(vN62), color.new(cN62, tr), edge, right, f_style(fibGlobal ? fibGlobalStyle : stN62), fibGlobal ? fibGlobalW : wN62, live, false, "d")
top := f_bump(top, p, true)
bot := f_bump(bot, p, false)
p := f_draw(showN50, f_px(vN50, bull, hi, lo), f_pctxt(vN50), color.new(cN50, tr), edge, right, f_style(fibGlobal ? fibGlobalStyle : stN50), fibGlobal ? fibGlobalW : wN50, live, false, "d")
top := f_bump(top, p, true)
bot := f_bump(bot, p, false)
p := f_draw(showN25, f_px(vN25, bull, hi, lo), f_pctxt(vN25), color.new(cN25, tr), edge, right, f_style(fibGlobal ? fibGlobalStyle : stN25), fibGlobal ? fibGlobalW : wN25, live, false, "d")
top := f_bump(top, p, true)
bot := f_bump(bot, p, false)
p := f_draw(show25, f_px(v25, bull, hi, lo), f_pctxt(v25), color.new(c25, tr), edge, right, f_style(fibGlobal ? fibGlobalStyle : st25), fibGlobal ? fibGlobalW : w25, live, false, "d")
top := f_bump(top, p, true)
bot := f_bump(bot, p, false)
p := f_draw(showEq, f_px(0.5, bull, hi, lo), "EQ", color.new(cEq, tr), edge, right, f_style(eqStyle), eqW, live, false, "d")
top := f_bump(top, p, true)
bot := f_bump(bot, p, false)
p := f_draw(showOte, f_px(0.62, bull, hi, lo), "OTE", color.new(cOte, tr), edge, right, f_style(oteStyle), oteW, live, false, "ote")
top := f_bump(top, p, true)
bot := f_bump(bot, p, false)
p := f_draw(show75, f_px(v75, bull, hi, lo), f_pctxt(v75), color.new(c75, tr), edge, right, f_style(fibGlobal ? fibGlobalStyle : st75), fibGlobal ? fibGlobalW : w75, live, false, "d")
top := f_bump(top, p, true)
bot := f_bump(bot, p, false)
p := f_draw(show79, f_px(v79, bull, hi, lo), f_pctxt(v79), color.new(c79, tr), edge, right, f_style(fibGlobal ? fibGlobalStyle : st79), fibGlobal ? fibGlobalW : w79, live, false, "d")
top := f_bump(top, p, true)
bot := f_bump(bot, p, false)
p := f_draw(show90, f_px(v90, bull, hi, lo), f_pctxt(v90), color.new(c90, tr), edge, right, f_style(fibGlobal ? fibGlobalStyle : st90), fibGlobal ? fibGlobalW : w90, live, false, "d")
top := f_bump(top, p, true)
bot := f_bump(bot, p, false)
p := f_draw(show110, f_px(v110, bull, hi, lo), f_pctxt(v110), color.new(c110, tr), edge, right, f_style(fibGlobal ? fibGlobalStyle : st110), fibGlobal ? fibGlobalW : w110, live, false, "d")
top := f_bump(top, p, true)
bot := f_bump(bot, p, false)
bool cutHi = showTime and not bull
bool cutLo = showTime and bull
p := f_draw(showHigh, hi, "HIGH", color.new(cHigh, tr), cutHi ? edge : hiT, right, f_style(highStyle), highW, live, true, "up")
top := f_bump(top, p, true)
bot := f_bump(bot, p, false)
p := f_draw(showLow, lo, "LOW", color.new(cLow, tr), cutLo ? edge : loT, right, f_style(lowStyle), lowW, live, true, "dn")
top := f_bump(top, p, true)
bot := f_bump(bot, p, false)
if live and showTime and ((bull and showLow) or (not bull and showHigh))
int swingT = bull ? loT : hiT
float markP = bull ? lo : hi
color markC = bull ? color.new(cLow, tr) : color.new(cHigh, tr)
int markWidth = bull ? lowW : highW
string markSt = bull ? lowStyle : highStyle
int a = math.min(swingT, edge)
int b = math.max(swingT, edge)
if na(pinSwing) or pinSwing != swingT or na(pinAt)
pinSwing := swingT
int span = math.max(b - a, 1)
int stub = math.max(stepMs * 3, int(span * 0.62))
int at = a + stub
if at >= b - stepMs
at := math.max(a + stepMs, b - stepMs * 4)
pinAt := at
int markAt = pinAt
if markAt > a
f_seg(a, markP, markAt, markP, markC, f_style(markSt), markWidth)
f_lab(markAt, markP, "❖ " + (customOn ? str.tostring(customMin) + "m" : f_name(anchor)), #d5d8e0, false)
int resume = markAt + stepMs * 3
if resume < b
f_seg(resume, markP, b, markP, markC, f_style(markSt), markWidth)
watchHi := hi
watchLo := lo
watchBull := bull
else if live
watchHi := hi
watchLo := lo
watchBull := bull
if showTime and not na(top) and not na(bot)
f_seg(edge, top, edge, bot, color.new(cTime, tr), f_style(timeStyle), timeW)
f_seg(right, top, right, bot, color.new(cTime, tr), f_style(timeStyle), timeW)
if pushedLive
array.pop(hist)
if showPct and not na(watchHi) and watchHi > watchLo
float span = watchHi - watchLo
float pct = watchBull ? (watchHi - close) / span * 100.0 : (close - watchLo) / span * 100.0
float midPx = (watchHi + watchLo) / 2.0
if na(sideHi) or sideHi != watchHi or sideLo != watchLo
sideHi := watchHi
sideLo := watchLo
oteHit := false
float pHigh = watchBull ? (watchHi - high) / span * 100.0 : (high - watchLo) / span * 100.0
float pLow = watchBull ? (watchHi - low) / span * 100.0 : (low - watchLo) / span * 100.0
if math.max(pHigh, pLow) >= 62.0 and math.min(pHigh, pLow) <= 79.0
oteHit := true
bool inOte = pct >= 62.0 and pct <= 79.0
bool rejected = oteHit and pct < 62.0
string side = math.abs(close - midPx) <= span * 0.002 ? "EQ" : close > midPx ? "Premium" : "Discount"
string state = inOte ? "In OTE" : rejected ? "Rejected" : side
color stateInk = inOte ? cOte : side == "Premium" ? cLow : side == "Discount" ? cHigh : #d5d8e0
color stateBg = inOte ? color.new(cOte, 82) : side == "Premium" ? color.new(cLow, 82) : side == "Discount" ? color.new(cHigh, 82) : #1c2430
table.cell(pctTab, 0, 0, str.tostring(pct, "0.00") + "%", text_color=f_ink(pct / 100.0), bgcolor=pctBg, text_size=pctSize == "Large" ? size.large : pctSize == "Small" ? size.small : size.normal, text_halign=text.align_center, text_formatting=text.format_bold)
table.cell(pctTab, 0, 1, (customOn ? str.tostring(customMin) + "m" : f_name(anchor)) + " ❖ OPTIMAL ENTRY", text_color=titleInk, bgcolor=titleBg, text_size=size.small, text_halign=text.align_center, text_formatting=text.format_bold)
table.cell(pctTab, 0, 2, state, text_color=state == "Rejected" ? #d5d8e0 : stateInk, bgcolor=state == "Rejected" ? #1c2430 : stateBg, text_size=size.small, text_halign=text.align_center, text_formatting=text.format_bold)
else
table.cell(pctTab, 0, 0, "")
table.cell(pctTab, 0, 1, "")
table.cell(pctTab, 0, 2, "")
bool fire = false
string msg = ""
if alerts and not na(watchHi) and watchHi > watchLo
float otePx = f_px(0.62, watchBull, watchHi, watchLo)
float eqPx = f_px(0.5, watchBull, watchHi, watchLo)
if alertOn == "OTE" and f_touch(otePx)
fire := true
msg := "OTE touch"
if alertOn == "Low, OTE, High" and (f_touch(watchLo) or f_touch(otePx) or f_touch(watchHi))
fire := true
msg := "Low, OTE, High touch"
if alertOn == "All Levels" and (f_touch(watchLo) or f_touch(watchHi) or f_touch(eqPx) or f_touch(otePx) or f_touch(f_px(v25, watchBull, watchHi, watchLo)) or f_touch(f_px(v75, watchBull, watchHi, watchLo)) or f_touch(f_px(v79, watchBull, watchHi, watchLo)) or f_touch(f_px(v90, watchBull, watchHi, watchLo)) or f_touch(f_px(v110, watchBull, watchHi, watchLo)))
fire := true
msg := "Level touch"
if fire
alert(msg, alert.freq_once_per_bar)
#introductions