//@version=6
indicator("HTF Candles — D / H4 / H1 / M15 (fixed)", overlay=true)
// --- Inputs
tfD = input.timeframe("D", "Daily TF")
tfH4 = input.timeframe("240", "H4 TF")
tfH1 = input.timeframe("60", "H1 TF")
tfM15= input.timeframe("15", "M15 TF")
shiftD = input.int(45, "Shift D (bars to the right)")
shiftH4 = input.int(30, "Shift H4 (bars to the right)")
shiftH1 = input.int(15, "Shift H1 (bars to the right)")
shiftM15= input.int(0, "Shift M15 (bars to the right)")
boxWidth = input.int(6, "Box width (bars)", minval=1)
// --- Fetch HTF OHLC via request.security
oD = request.security(syminfo.tickerid, tfD, open)
hD = request.security(syminfo.tickerid, tfD, high)
lD = request.security(syminfo.tickerid, tfD, low)
cD = request.security(syminfo.tickerid, tfD, close)
oH4 = request.security(syminfo.tickerid, tfH4, open)
hH4 = request.security(syminfo.tickerid, tfH4, high)
lH4 = request.security(syminfo.tickerid, tfH4, low)
cH4 = request.security(syminfo.tickerid, tfH4, close)
oH1 = request.security(syminfo.tickerid, tfH1, open)
hH1 = request.security(syminfo.tickerid, tfH1, high)
lH1 = request.security(syminfo.tickerid, tfH1, low)
cH1 = request.security(syminfo.tickerid, tfH1, close)
oM15 = request.security(syminfo.tickerid, tfM15, open)
hM15 = request.security(syminfo.tickerid, tfM15, high)
lM15 = request.security(syminfo.tickerid, tfM15, low)
cM15 = request.security(syminfo.tickerid, tfM15, close)
// --- Draw helper (vẽ 1 cây nến HTF ở vị trí offset)
drawHTF(_name, _o, _h, _l, _c, _shift) =>
bcol = _c >= _o ? color.green : color.red
left = bar_index + _shift
right = bar_index + _shift + boxWidth
top = math.max(_o, _c)
bot = math.min(_o, _c)
// thân
_ = box.new(left, top, right, bot, border_color = bcol, bgcolor = color.new(bcol, 0), xloc = xloc.bar_index)
// râu
wickX = bar_index + _shift + math.round(boxWidth / 2)
_ = line.new(wickX, _h, wickX, _l, color = bcol, xloc = xloc.bar_index)
// label (giá trị)
_ = label.new(bar_index + _shift + boxWidth + 1, _h, text = _name + " H: " + str.tostring(_h), xloc = xloc.bar_index, style = label.style_label_left, color = color.new(bcol,80), textcolor = bcol)
_ = label.new(bar_index + _shift + boxWidth + 1, _o, text = "O: " + str.tostring(_o), xloc = xloc.bar_index, style = label.style_label_left, color = color.new(bcol,80), textcolor = bcol)
_ = label.new(bar_index + _shift + boxWidth + 1, _l, text = "L: " + str.tostring(_l), xloc = xloc.bar_index, style = label.style_label_left, color = color.new(bcol,80), textcolor = bcol)
// --- Xoá các đồ họa cũ và vẽ lại chỉ ở barstate.islast để tránh tạo quá nhiều object
if barstate.islast
for ln in line.all
ln.delete()
for lb in label.all
lb.delete()
for bx in box.all
bx.delete()
// Vẽ 4 khung
drawHTF("D", oD, hD, lD, cD, shiftD)
drawHTF("H4", oH4, hH4, lH4, cH4, shiftH4)
drawHTF("H1", oH1, hH1, lH1, cH1, shiftH1)
drawHTF("M15",oM15,hM15,lM15,cM15,shiftM15)
// --- (Tuỳ chọn) hiển thị bảng nhỏ thông tin
var tbl = table.new(position.middle_right, 1, 4, border_width=1, bgcolor=color.new(#eeeeee, 30))
if barstate.islast
table.cell(tbl, 0, 0, "TF: " + tfD + " / " + tfH4 + " / " + tfH1 + " / " + tfM15)
table.cell(tbl, 0, 1, "D O: " + str.tostring(oD) + " C: " + str.tostring(cD))
table.cell(tbl, 0, 2, "H4 O: " + str.tostring(oH4) + " C: " + str.tostring(cH4))
table.cell(tbl, 0, 3, "H1 O: " + str.tostring(oH1) + " C: " + str.tostring(cH1))
