Hallo zusammen,

ich entwickle einen RBO-Indikator und habe zwei spezifische Probleme mit der Darstellung:

1. DrawSegment: Ich möchte, dass die Projektionslinien (Segmente) nur in der aktuellen Live-Sitzung gezeichnet werden. In den Boxen der Vergangenheit sollen diese Segmente automatisch verschwinden, um den Chart sauber zu halten.
2. DrawText (Overprinting): Mein aktueller Code schreibt die Labels (High/Low/Ps) bei jeder neuen Kerze neu. Das führt in der Historie zu “Farbflecken” (Overprinting), da hunderte Texte übereinander liegen und unleserlich werden.

Ziel: Die Labels sollen nur einmalig pro Box gezeichnet werden (z.B. beim Abschluss der Range) und die Segmente sollen nur für die heutige Sitzung sichtbar sein.

Wie kann ich den Code effizient filtern, damit PRT nicht bei jedem Tick die gesamte Historie neu “beschreibt”?

Vielen Dank für eure Tipps!

Hier ist mein aktueller Code:

//================================================================
// RBO
//================================================================

once NbBar = 1
if BarIndex < NbBar + 2 then
MyDay = openday
dayminutes = 1440 * (MyDay - MyDay[1])
MyHour = openhour
hourminutes = 60 * (MyHour - MyHour[1])
MyMin = openminute
barminutes = abs(MyMin - MyMin[1] + hourminutes + dayminutes)
Mybarminutes = lowest[NbBar](barminutes)[1]
endif

tfOK = 1
if Mybarminutes = 1 then
Frame = 480
EndtimeA = 080100
elsif Mybarminutes = 5 then
Frame = 96
EndtimeA = 080500
elsif Mybarminutes = 10 then
Frame = 48
EndtimeA = 081000
elsif Mybarminutes = 15 then
Frame = 32
EndtimeA = 081500
elsif Mybarminutes = 30 then
Frame = 16
EndtimeA = 083000
else
Frame = 1
EndtimeA = 080000
tfOK = 0
endif

// [B2]
once lastMax = 0
once lastMin = 0
once lastMid = 0
once lastEnd = 0
once lastPips = 0

// [B3]
if tfOK = 1 and time = EndtimeA then
lastMax = highest[max(1, Frame)](high)
lastMin = lowest[max(1, Frame)](low)
lastMid = lastMin + (lastMax - lastMin) / 2
lastEnd = barindex
lastPips = (lastMax - lastMin) / pointsize

DrawRectangle(barindex - Frame, lastMax, barindex, lastMin) coloured("firebrick", 20) bordercolor("firebrick", 100)
DrawText("#lastPips#", barindex - round(0.5 * Frame), lastMid, SansSerif, Bold, 16) coloured("firebrick", 150)
endif

// [B4]
if tfOK = 1 and date = today and lastMax > 0 then
//
DrawRectangle(lastEnd - Frame, lastMax, lastEnd, lastMin) coloured("firebrick", Transparency) bordercolor("firebrick", 255)
if islastbarupdate then
centerX = lastEnd - round(0.5 * Frame)
offset = AverageTrueRange[14](close) * 0.5
DrawText("RBO ", centerX, lastMax + offset * 3, SansSerif, Bold, 12) coloured("firebrick", 255)
DrawText("H: #lastMax#", centerX, lastMax + offset, SansSerif, Bold, 10) coloured("firebrick", 255)
DrawText("L: #lastMin#", centerX, lastMin - offset, SansSerif, Bold, 10) coloured("firebrick", 255)
endif

//
if barindex >= lastEnd and time = 150000 then
DrawSegment(lastEnd, lastMax, barindex, lastMax) coloured("firebrick", 255)
DrawSegment(lastEnd, lastMin, barindex, lastMin) coloured("firebrick", 255)
DrawSegment(lastEnd, lastMid, barindex, lastMid) style(dottedline3) coloured("firebrick", 180)
endif
endif

return