Open Range Indikator im Chart

Mr_Nice_Guy · Wed, 01 Sep 2021 20:40:52 +0000

Hallo, Kann mir jemand beim Erstellen eines Open Range Indikators Helfen? Oder hat jemand schon einen? Der Indikator sollte im Chart mit Linien die Range anzeigen und ausrechnen wie groß die Range ist. Und dann, die ausgerechnete Range, mit der Vortages ATR und der 60 min ATR abgleichen und mir dann anzeigen, ob Sie nicht größer als die halbe Tages ATR und nicht Kleiner als die 60 min ATR ist! Danke im Voraus!

This topic has 58 replies, 6 voices, and was last updated 2 years ago by Mr_Nice_Guy.

Viewing 15 posts - 16 through 30 (of 59 total)

← 1 2 3 4 →

09/08/2021 at 2:06 PM #177020

Rainer (RFW)

Kurze Hilfestellung…

1 user thanked author for this post.

Razz

Rainer (RFW)

Participant

Topics: 30

Replies: 98

Been thanked: 17 times

09/08/2021 at 8:16 PM #177047

Mr_Nice_Guy

Danke, jetzt funktioniert es!

Es gibt noch ein kleines Problem, hab ihn heute beim S&P ausprobiert und festgestellt das er erst die Linien und Daten anzeigt wenn die letzte Kerze

von der vorgegebenen Zeit abgeschlossen ist.

Davor zeigt er nichts. Das ist etwas problematisch.

Ist es möglich, den so zu machen, dass er während der Entstehung der Range mitläuft?

Mr_Nice_Guy

Participant

Topics: 3

Replies: 27

Been thanked: 0 times

09/08/2021 at 8:24 PM #177052

Mr_Nice_Guy

Und die Range von 0:00 – 8:00 Uhr will er nicht anzeigen

Mr_Nice_Guy

Participant

Topics: 3

Replies: 27

Been thanked: 0 times

09/08/2021 at 8:58 PM #177054

Rainer (RFW)

Guten Abend,
dass die Range bis zur gewünschten Zeit vorab indiziert wird ist machbar, die Close/Zeit Daten logischer Weise nicht, da gehe ich morgen kurz mal ran.
Übermittele mal einen Screenshot Bitte vom Chart und der Indikatoreinstellung, wo keinerlei Daten angezeigt werden.
Schönen Abend und Liebe Grüße
Rainer

Rainer (RFW)

Participant

Topics: 30

Replies: 98

Been thanked: 17 times

09/08/2021 at 9:29 PM #177055

Mr_Nice_Guy

Super Danke 🙂

Mr_Nice_Guy

Participant

Topics: 3

Replies: 27

Been thanked: 0 times

09/09/2021 at 1:25 AM #177068

Rainer (RFW)

Moin,
sollte nunmehr nach Deinen Vorstellungen laufen, bei mir hats funktioniert, gab es ggf. keine 0 Uhr Candle, dann dann läuft der Code nicht an?
Siehe Screenshots. Bitte jedoch ausgiebig testen und ggf. melden. So habe ich auch wieder dazugelernt.
Neue Version anbei.
Mir gefällt allerdings die Darstellung der Uhrzeit nicht. Weglassen?

@RobertoGozzi: Hierzu ggf. von Dir etwas Hilfe möglich? Ich bin gemäß https://www.prorealcode.com/documentation/time/ vorgegangen. Danke vorab.
Schönen erfolgreichen Tag und liebe Grüße
Rainer

Rainer (RFW)

Participant

Topics: 30

Replies: 98

Been thanked: 17 times

09/09/2021 at 7:22 AM #177078

robertogozzi

Sie können Zeile 31 wie folgt ändern:

OTime = Time[BIOx]/10000

1	OTime = Time[BIOx]/10000

robertogozzi

Moderator

Topics: 69

Replies: 17188

Been thanked: 4064 times

09/09/2021 at 7:38 AM #177080

Rainer (RFW)

Guten Morgen Roberto,
vielen Dank für die schnelle Antwort.
Das hatte ich getestet, so richtig funktioniert es jedoch nicht. Aus 08:30:00 Uhr wird 8,3, siehe Screenshot.
Ich denke, damit muss man leben.
Schönen erfolgreichen Tag und liebe Grüße
Rainer

Rainer (RFW)

Participant

Topics: 30

Replies: 98

Been thanked: 17 times

09/09/2021 at 8:40 AM #177086

robertogozzi

Dieser könnte tun. Es zersetzt die Zeit in Stunden, Minuten und Sekunden, dann können Sie einen von ihnen (alle oder nur zwei oder nur einen der drei Teile) separat einplanen.

Gewarnt werden, dass eine einzelne Ziffer nicht ausgerichtet wird, da sie als gemeinsame Zahl verarbeitet wird, nicht als Teil der Zeit:

// Rainer-Franz Wirth - rf.wirth@hotmail.de - Rainer FW (RFW) @prorealcode.com
// Jegliche Haftung aus der Nutzung ist ausgeschlossen.
//********************************************************************************************************************************************************************
Defparam Drawonlastbaronly   = True
Defparam CalculateOnLastBars = 10000
//********************************************************************************************************************************************************************
//TXTD = 0.0003                              // Differenz Zeilenabstand
HighTxTFx1 = 1+TXTD
HighTxTFx2 = 1+(TXTD*2)
HighTxTFx3 = 1+(TXTD*3)
HighTxTFx4 = 1+(TXTD*4)
HighTxTFx5 = 1+(TXTD*5)
HighTxTFx6 = 1+(TXTD*6)
HighTxTFx7 = 1+(TXTD*7)
LowTxTFx1 = 1-TXTD
//********************************************************************************************************************************************************************
Timeframe (1 Day, Updateonclose)
RATR1 = AverageTrueRange[ATRPerioden][1]        // Vortages ATR
RATR2 = AverageTrueRange[ATRPerioden]/2         // aktuelle 1/2 Tages ATR
//********************************************************************************************************************************************************************
TimeFrame(1 Hour)
RATR3 = AverageTrueRange[ATRPerioden]           // 60 Min ATR
//********************************************************************************************************************************************************************
TimeFrame(Default)
//****************
If IsLastBarupdate Then
//********************************************************************************************************************************************************************
For BIOx = 0 To LookBack DO                  // BarIndex OpenTime suchen
If Time[BIOx] = ROpenTime Then
OpenBI = BarIndex[BIOx]
//OTime = Time[BIOx]
x     = Time[BIOx]
OTime = x
oSS   = x MOD 100                // Seconds
x     = (x - oSS) / 100
oMM   = x MOD 100                // Minutes
oHH   = (x - oMM) / 100          // Hours
For BICx = (BIOx-1) DownTo 0 Do
If Time[BICx] = RCloseTime Then     // BarIndex CloseTime suchen
CloseBI = BarIndex[BICx]
//CTime = Time[BICx]/10000
x     = Time[BICx]
CTime = x / 10000
cSS   = x MOD 100                // Seconds
x     = (x - cSS) / 100
cMM   = x MOD 100                // Minutes
cHH   = (x - cMM) / 100          // Hours
RLOW = 999999999
For RLOWx = BIOx DownTo BICx Do  // Low Range-Berechnung suchen
If Low[RLOWx] < RLOW Then
RLOW = Low[RLOWx]
EndIf
Next
RHIGH = 0
For RHIGHx = BIOx DownTo BICx Do // High Range-Berechnung suchen
If High[RHIGHx] > RHIGH Then
RHIGH = High[RHIGHx]
EndIf
Next
ORange = Abs(RHIGH-RLOW)
BITXT = 15
DrawSegment(BarIndex[BIOx],RHIGH,BarIndex[BICx],RHIGH)Coloured(0,255,0)Style(Line,3)
DrawSegment(BarIndex[BIOx],RLOW,BarIndex[BICx],RLOW)Coloured(255,0,0)Style(Line,3)
DrawText("Low = #RLOW#",BarIndex[BIOx],RLOW*LowTxTFx1,Dialog,Bold,14)// coloured(255,255,255,155)
DrawText("High = #RHIGH#",BarIndex[BIOx],RHIGH*HighTxTFx1,Dialog,Bold,14)// coloured(255,255,255,155)

//DrawText("#ORange# = Range / #OTime#- #CTime# Uhr",BarIndex+BITXT,HIGH*HighTxTFx2,Dialog,Bold,14) //coloured(255,255,255,155)
//DrawText("#ORange# = Range / #oHH#:#oMM#:#oSS# - #cHH#:#cMM#:#cSS# Uhr",BarIndex+BITXT,HIGH*HighTxTFx2,Dialog,Bold,14) //coloured(255,255,255,155)
DrawText("#ORange# = Range / #oHH#:#oMM# - #cHH#:#cMM# Uhr",BarIndex+BITXT,HIGH*HighTxTFx2,Dialog,Bold,14) //coloured(255,255,255,155)
If ORange < RATR3 Then
DRAWTEXT("OpenRange < ATR 60min", BarIndex+BITXT,HIGH*HighTxTFx3, Dialog, bold, 14) Coloured(0,255,0)
ElsIf Orange > RATR3 Then
DRAWTEXT("OpenRange > ATR 60min", BarIndex+BITXT,HIGH*HighTxTFx3, Dialog, bold, 14) Coloured(0,255,0)
Endif
DrawText("ATR 60min / #RATR3#",BarIndex+BITXT,HIGH*HighTxTFx4,Dialog,Bold,14) //coloured(255,255,255,155)
If ORange > RATR2 Then
DRAWTEXT("OpenRange > 1/2 ATR-D", BarIndex+BITXT,HIGH*HighTxTFx5, Dialog, bold, 14) Coloured(0,255,0)
ElsIf Orange < RATR2 Then
DRAWTEXT("OpenRange < 1/2 ATR-D", BarIndex+BITXT,HIGH*HighTxTFx5, Dialog, bold, 14) Coloured(0,255,0)
EndIf
DrawText("1/2 ATR-D / #RATR2#",BarIndex+BITXT,HIGH*HighTxTFx6,Dialog,Bold,14) //coloured(255,255,255,155)
DrawText("ATR Vortag / #RATR1#",BarIndex+BITXT,HIGH*HighTxTFx7,Dialog,Bold,14) //coloured(255,255,255,155)
ElsIf (Time > ROpenTime) And (Time < RCloseTime) Then
BICx = 0
CloseBI = BarIndex[BICx]
CTime = Time[BICx]/10000
RLOW = 999999999
For RLOWx = BIOx DownTo BICx Do  // Low Range-Berechnung suchen
If Low[RLOWx] < RLOW Then
RLOW = Low[RLOWx]
EndIf
Next
RHIGH = 0
For RHIGHx = BIOx DownTo BICx Do // High Range-Berechnung suchen
If High[RHIGHx] > RHIGH Then
RHIGH = High[RHIGHx]
EndIf
Next
ORange = Abs(RHIGH-RLOW)
BITXT = 15
DrawSegment(BarIndex[BIOx],RHIGH,BarIndex[BICx],RHIGH)Coloured(0,255,0)Style(Line,3)
DrawSegment(BarIndex[BIOx],RLOW,BarIndex[BICx],RLOW)Coloured(255,0,0)Style(Line,3)
DrawText("Low = #RLOW#",BarIndex[BIOx],RLOW*LowTxTFx1,Dialog,Bold,14)// coloured(255,255,255,155)
DrawText("High = #RHIGH#",BarIndex[BIOx],RHIGH*HighTxTFx1,Dialog,Bold,14)// coloured(255,255,255,155)
DrawText("#ORange# = Range / #OTime#- #CTime# Uhr",BarIndex+BITXT,HIGH*HighTxTFx2,Dialog,Bold,14) //coloured(255,255,255,155)
If ORange < RATR3 Then
DRAWTEXT("OpenRange < ATR 60min", BarIndex+BITXT,HIGH*HighTxTFx3, Dialog, bold, 14) Coloured(0,255,0)
ElsIf Orange > RATR3 Then
DRAWTEXT("OpenRange > ATR 60min", BarIndex+BITXT,HIGH*HighTxTFx3, Dialog, bold, 14) Coloured(0,255,0)
Endif
DrawText("ATR 60min / #RATR3#",BarIndex+BITXT,HIGH*HighTxTFx4,Dialog,Bold,14) //coloured(255,255,255,155)
If ORange > RATR2 Then
DRAWTEXT("OpenRange > 1/2 ATR-D", BarIndex+BITXT,HIGH*HighTxTFx5, Dialog, bold, 14) Coloured(0,255,0)
ElsIf Orange < RATR2 Then
DRAWTEXT("OpenRange < 1/2 ATR-D", BarIndex+BITXT,HIGH*HighTxTFx5, Dialog, bold, 14) Coloured(0,255,0)
EndIf
DrawText("1/2 ATR-D / #RATR2#",BarIndex+BITXT,HIGH*HighTxTFx6,Dialog,Bold,14) //coloured(255,255,255,155)
DrawText("ATR Vortag / #RATR1#",BarIndex+BITXT,HIGH*HighTxTFx7,Dialog,Bold,14) //coloured(255,255,255,155)
EndIf
Next
Break
EndIf
Next
EndIf


Return

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

// Rainer-Franz Wirth - rf.wirth@hotmail.de - Rainer FW (RFW) @prorealcode.com

// Jegliche Haftung aus der Nutzung ist ausgeschlossen.

//********************************************************************************************************************************************************************

Defparam Drawonlastbaronly = True

Defparam CalculateOnLastBars = 10000

//********************************************************************************************************************************************************************

//TXTD = 0.0003 // Differenz Zeilenabstand

HighTxTFx1 = 1+TXTD

HighTxTFx2 = 1+(TXTD*2)

HighTxTFx3 = 1+(TXTD*3)

HighTxTFx4 = 1+(TXTD*4)

HighTxTFx5 = 1+(TXTD*5)

HighTxTFx6 = 1+(TXTD*6)

HighTxTFx7 = 1+(TXTD*7)

LowTxTFx1 = 1-TXTD

//********************************************************************************************************************************************************************

Timeframe (1 Day, Updateonclose)

RATR1 = AverageTrueRange[ATRPerioden][1] // Vortages ATR

RATR2 = AverageTrueRange[ATRPerioden]/2 // aktuelle 1/2 Tages ATR

//********************************************************************************************************************************************************************

TimeFrame(1 Hour)

RATR3 = AverageTrueRange[ATRPerioden] // 60 Min ATR

//********************************************************************************************************************************************************************

TimeFrame(Default)

//****************

If IsLastBarupdate Then

//********************************************************************************************************************************************************************

For BIOx = 0 To LookBack DO // BarIndex OpenTime suchen

If Time[BIOx] = ROpenTime Then

OpenBI = BarIndex[BIOx]

//OTime = Time[BIOx]

x = Time[BIOx]

OTime = x

oSS = x MOD 100 // Seconds

x = (x - oSS) / 100

oMM = x MOD 100 // Minutes

oHH = (x - oMM) / 100 // Hours

For BICx = (BIOx-1) DownTo 0 Do

If Time[BICx] = RCloseTime Then // BarIndex CloseTime suchen

CloseBI = BarIndex[BICx]

//CTime = Time[BICx]/10000

x = Time[BICx]

CTime = x / 10000

cSS = x MOD 100 // Seconds

x = (x - cSS) / 100

cMM = x MOD 100 // Minutes

cHH = (x - cMM) / 100 // Hours

RLOW = 999999999

For RLOWx = BIOx DownTo BICx Do // Low Range-Berechnung suchen

If Low[RLOWx] < RLOW Then

RLOW = Low[RLOWx]

EndIf

RHIGH = 0

For RHIGHx = BIOx DownTo BICx Do // High Range-Berechnung suchen

If High[RHIGHx] > RHIGH Then

RHIGH = High[RHIGHx]

EndIf

ORange = Abs(RHIGH-RLOW)

BITXT = 15

DrawSegment(BarIndex[BIOx],RHIGH,BarIndex[BICx],RHIGH)Coloured(0,255,0)Style(Line,3)

DrawSegment(BarIndex[BIOx],RLOW,BarIndex[BICx],RLOW)Coloured(255,0,0)Style(Line,3)

DrawText("Low = #RLOW#",BarIndex[BIOx],RLOW*LowTxTFx1,Dialog,Bold,14)// coloured(255,255,255,155)

DrawText("High = #RHIGH#",BarIndex[BIOx],RHIGH*HighTxTFx1,Dialog,Bold,14)// coloured(255,255,255,155)

//DrawText("#ORange# = Range / #OTime#- #CTime# Uhr",BarIndex+BITXT,HIGH*HighTxTFx2,Dialog,Bold,14) //coloured(255,255,255,155)

//DrawText("#ORange# = Range / #oHH#:#oMM#:#oSS# - #cHH#:#cMM#:#cSS# Uhr",BarIndex+BITXT,HIGH*HighTxTFx2,Dialog,Bold,14) //coloured(255,255,255,155)

DrawText("#ORange# = Range / #oHH#:#oMM# - #cHH#:#cMM# Uhr",BarIndex+BITXT,HIGH*HighTxTFx2,Dialog,Bold,14) //coloured(255,255,255,155)

If ORange < RATR3 Then

DRAWTEXT("OpenRange < ATR 60min", BarIndex+BITXT,HIGH*HighTxTFx3, Dialog, bold, 14) Coloured(0,255,0)

ElsIf Orange > RATR3 Then

DRAWTEXT("OpenRange > ATR 60min", BarIndex+BITXT,HIGH*HighTxTFx3, Dialog, bold, 14) Coloured(0,255,0)

Endif

DrawText("ATR 60min / #RATR3#",BarIndex+BITXT,HIGH*HighTxTFx4,Dialog,Bold,14) //coloured(255,255,255,155)

If ORange > RATR2 Then

DRAWTEXT("OpenRange > 1/2 ATR-D", BarIndex+BITXT,HIGH*HighTxTFx5, Dialog, bold, 14) Coloured(0,255,0)

ElsIf Orange < RATR2 Then

DRAWTEXT("OpenRange < 1/2 ATR-D", BarIndex+BITXT,HIGH*HighTxTFx5, Dialog, bold, 14) Coloured(0,255,0)

EndIf

DrawText("1/2 ATR-D / #RATR2#",BarIndex+BITXT,HIGH*HighTxTFx6,Dialog,Bold,14) //coloured(255,255,255,155)

DrawText("ATR Vortag / #RATR1#",BarIndex+BITXT,HIGH*HighTxTFx7,Dialog,Bold,14) //coloured(255,255,255,155)

ElsIf (Time > ROpenTime) And (Time < RCloseTime) Then

BICx = 0

CloseBI = BarIndex[BICx]

CTime = Time[BICx]/10000

RLOW = 999999999

For RLOWx = BIOx DownTo BICx Do // Low Range-Berechnung suchen

If Low[RLOWx] < RLOW Then

RLOW = Low[RLOWx]

EndIf

RHIGH = 0

For RHIGHx = BIOx DownTo BICx Do // High Range-Berechnung suchen

If High[RHIGHx] > RHIGH Then

RHIGH = High[RHIGHx]

EndIf

ORange = Abs(RHIGH-RLOW)

BITXT = 15

DrawSegment(BarIndex[BIOx],RHIGH,BarIndex[BICx],RHIGH)Coloured(0,255,0)Style(Line,3)

DrawSegment(BarIndex[BIOx],RLOW,BarIndex[BICx],RLOW)Coloured(255,0,0)Style(Line,3)

DrawText("Low = #RLOW#",BarIndex[BIOx],RLOW*LowTxTFx1,Dialog,Bold,14)// coloured(255,255,255,155)

DrawText("High = #RHIGH#",BarIndex[BIOx],RHIGH*HighTxTFx1,Dialog,Bold,14)// coloured(255,255,255,155)

DrawText("#ORange# = Range / #OTime#- #CTime# Uhr",BarIndex+BITXT,HIGH*HighTxTFx2,Dialog,Bold,14) //coloured(255,255,255,155)

If ORange < RATR3 Then

DRAWTEXT("OpenRange < ATR 60min", BarIndex+BITXT,HIGH*HighTxTFx3, Dialog, bold, 14) Coloured(0,255,0)

ElsIf Orange > RATR3 Then

DRAWTEXT("OpenRange > ATR 60min", BarIndex+BITXT,HIGH*HighTxTFx3, Dialog, bold, 14) Coloured(0,255,0)

Endif

DrawText("ATR 60min / #RATR3#",BarIndex+BITXT,HIGH*HighTxTFx4,Dialog,Bold,14) //coloured(255,255,255,155)

If ORange > RATR2 Then

DRAWTEXT("OpenRange > 1/2 ATR-D", BarIndex+BITXT,HIGH*HighTxTFx5, Dialog, bold, 14) Coloured(0,255,0)

ElsIf Orange < RATR2 Then

DRAWTEXT("OpenRange < 1/2 ATR-D", BarIndex+BITXT,HIGH*HighTxTFx5, Dialog, bold, 14) Coloured(0,255,0)

EndIf

DrawText("1/2 ATR-D / #RATR2#",BarIndex+BITXT,HIGH*HighTxTFx6,Dialog,Bold,14) //coloured(255,255,255,155)

DrawText("ATR Vortag / #RATR1#",BarIndex+BITXT,HIGH*HighTxTFx7,Dialog,Bold,14) //coloured(255,255,255,155)

EndIf

Break

EndIf

Return

Ich hielt sowohl die ursprünglichen Linien als auch die Linie mit Sekunden (ich kommentierte es nur Stunden und Minuten).

robertogozzi

Moderator

Topics: 69

Replies: 17188

Been thanked: 4064 times

09/09/2021 at 8:57 AM #177093

robertogozzi

Entschuldigung, ich habe im Laufe der Zeit nur EINE der DrawText-Zeilen geändert. Für die zweite Zeile können Sie einfach dasselbe tun.

robertogozzi

Moderator

Topics: 69

Replies: 17188

Been thanked: 4064 times

09/09/2021 at 9:11 AM #177099

Rainer (RFW)

Hallo Roberto,
nix zu entschuldigen, im Gegenteil, herzlichen Dank für die Bemühungen und erfolgreiche Hilfe. Ich habe den Rst umgesetzt, neue .itf-Datei anbei.
Schönen erfolgreichen Tag.
Rainer

Rainer (RFW)

Participant

Topics: 30

Replies: 98

Been thanked: 17 times

09/09/2021 at 8:23 PM #177164

Mr_Nice_Guy

Vielen lieben Dank, wirklich super Arbeit!

Eine Bitte hätte ich noch, wenn es möglich ist!

Das die Vorgaben 1/2 ATR und ATR 60 von grün auf rot schalten, wenn die Bedingungen nicht erfüllt werden.

Nur, wenn es keine großen Umstände macht!

Mr_Nice_Guy

Participant

Topics: 3

Replies: 27

Been thanked: 0 times

09/09/2021 at 9:08 PM #177169

Rainer (RFW)

Guten Abend,
kein Problem, gerne, anbei.
Zu gegebener Zeit müsstest Du mir mal wenn möglich erklären, wie Du dies sinnvoll/erfolgreich im Trading einsetzt/umsetzt.
Schönes Wochenende und liebe Grüße
Rainer

Rainer (RFW)

Participant

Topics: 30

Replies: 98

Been thanked: 17 times

09/10/2021 at 8:26 AM #177179

Mr_Nice_Guy

Morgen Reiner,

Danke, jetzt ist es perfekt, sogar mit einem Detail 🙂 das sich das Vorzeichen ändert, echt super!

Ich kann versuchen es zu erklären, bin aber ein Neuling in diesem Business.

Im Prinzip muss man erstmal auf 60Min ein Trend haben, der erst vorherrscht, wenn zwei aufeinander steigende Hochs und Tiefs folgen oder eben umgekehrt.

Und dann wird unter der Einhaltung der Vorgaben in Trendrichtung gehandelt.

Ziel ist die Verdoppelung der Range.

Ich handel im Moment nur vier Märkte BUND, DAX, EUR/USD, S&P

Ist die Strategie von Birger Schäfermeier .

Mr_Nice_Guy

Participant

Topics: 3

Replies: 27

Been thanked: 0 times

09/10/2021 at 9:11 AM #177186

Mr_Nice_Guy

Hie noch das Bild.

Mit dem Indikator ist es viel einfacher 🙂

Mr_Nice_Guy

Participant

Topics: 3

Replies: 27

Been thanked: 0 times

Author

Posts

Viewing 15 posts - 16 through 30 (of 59 total)

← 1 2 3 4 →

Find exclusive trading pro-tools on