Fibonaccibogen Programmier code

• 04/22/2025 at 3:10 PM #246227
  robertogozzi

  Sie müssen mir sagen, bei welcher Kerze (Balken) der erste Kreis beginnen und enden soll.
  Geben Sie dann bei jedem neuen Kreis an, wie viele Balken (ganze Zahl) sowohl vom Startpunkt als auch vom Endpunkt entfernt sein sollen.

   

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 18013

  Been thanked: 4592 times
  11/01/2025 at 10:32 AM #253170
  elviko

  Hallo Roberto,

  ich möchte, dass die Fibonacci-Bögen dauerhaft mit dem SMA 21 verbunden bleiben und sich dynamisch mitbewegen.

  So soll es funktionieren:

  • Punkt 1 lege ich am aktuellen Ende des SMA 21 fest (die neueste Kerze)
  • Punkt 2 lege ich weiter zurück auf dem SMA 21 fest (z.B. 100 Kerzen zurück)
  • Die Fibonacci-Bögen werden zwischen diesen beiden Punkten auf dem SMA gezeichnet

  Das Wichtige: Wenn sich der SMA 21 bewegt (bei jeder neuen Kerze), sollen sich beide Punkte automatisch mit dem SMA mitbewegen. Die Bögen bleiben also immer auf dem SMA “geklebt” und passen sich dynamisch an die Kursentwicklung an.

  So wie auf den Bildern zu sehen: Die Fibonacci-Linien entstehen als Bögen, die vom SMA ausgehen und mit ihm verbunden bleiben.

  

  elviko

  Participant

  Topics: 13

  Replies: 59

  Been thanked: 2 times
  11/04/2025 at 1:04 PM #253276
  robertogozzi

  Prüfen Sie, ob dieser Code Ihren Vorstellungen nahekommt (siehe beigefügtes Foto):

  defparam drawonlastbaronly=true ONCE PeriodSma = 21 ONCE Decalage = 2 * PipSize //0.5 ONCE LookBack = 100 IF BarIndex = 0 THEN // Fibonacci-Level Definition (Array) $Fib[1] = 0.236 $Fib[2] = 0.382 $Fib[3] = 0.5 $Fib[4] = 0.618 $Fib[5] = 0.786 //$Fib[6] = 1.0 ENDIF Sma21 = average[PeriodSMA](close) IF BarIndex >= max(PeriodSma,LookBack) THEN Point1 = Sma21 Point2 = Sma21[LookBack] Distance = Point1 - Point2 DRAWTEXT("0,00%", barindex+10,Point2+Decalage) DRAWELLIPSE(barindex, Point1, barindex-LookBack, Point2) STYLE(DOTTEDLINE,3) COLOURED("brown") for i = 1 to 5 do fibLevel = $Fib[i] fibValue = Point2 + (Distance * fibLevel) DRAWELLIPSE(BarIndex,Point1,BarIndex - LookBack,FibValue )STYLE(DOTTEDLINE,2) COLOURED("red") textLabel = fibLevel * 100 DRAWTEXT("#textLabel#%", barindex + 10, fibValue) next ENDIF return

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33

  defparam drawonlastbaronly=true ONCE PeriodSma = 21 ONCE Decalage  = 2 * PipSize  //0.5 ONCE LookBack  = 100   IF BarIndex = 0 THEN    // Fibonacci-Level Definition (Array)    $Fib[1] = 0.236    $Fib[2] = 0.382    $Fib[3] = 0.5    $Fib[4] = 0.618    $Fib[5] = 0.786    //$Fib[6] = 1.0 ENDIF   Sma21 = average[PeriodSMA](close)   IF BarIndex >= max(PeriodSma,LookBack) THEN    Point1 = Sma21    Point2 = Sma21[LookBack]    Distance = Point1 - Point2    DRAWTEXT("0,00%", barindex+10,Point2+Decalage)    DRAWELLIPSE(barindex, Point1, barindex-LookBack, Point2) STYLE(DOTTEDLINE,3) COLOURED("brown")      for i = 1 to 5 do       fibLevel = $Fib[i]       fibValue = Point2 + (Distance * fibLevel)       DRAWELLIPSE(BarIndex,Point1,BarIndex - LookBack,FibValue )STYLE(DOTTEDLINE,2) COLOURED("red")       textLabel = fibLevel * 100       DRAWTEXT("#textLabel#%", barindex + 10, fibValue)    next ENDIF return

   

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 18013

  Been thanked: 4592 times
  11/04/2025 at 4:38 PM #253286
  elviko

  erstmal danke…wie bei den beigefügten Foto

  

  elviko

  Participant

  Topics: 13

  Replies: 59

  Been thanked: 2 times
  11/12/2025 at 10:40 PM #253571
  elviko

  Roberto???

  

  elviko

  Participant

  Topics: 13

  Replies: 59

  Been thanked: 2 times
  11/13/2025 at 7:00 PM #253604
  robertogozzi

  Bitte haben Sie Geduld; die größte Herausforderung war das Drucken der Kreise.
  Ich hoffe, es klappt bald.

   

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 18013

  Been thanked: 4592 times
  11/14/2025 at 2:34 PM #253640
  elviko

  Ich küss deine Hände….

  

  elviko

  Participant

  Topics: 13

  Replies: 59

  Been thanked: 2 times
  11/20/2025 at 12:13 PM #253806
  robertogozzi

  Es ist fast eine Woche her, aber ich habe immer noch keine Lösung gefunden.
  Ich kann täglich ein paar Stunden dafür aufwenden, nicht mehr. Bitte haben Sie Geduld.

   

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 18013

  Been thanked: 4592 times
  11/21/2025 at 11:49 PM #253874
  elviko

  Erstmal vielen dank dafür , Du kannst dir ruhig Zeit lassen….

  

  elviko

  Participant

  Topics: 13

  Replies: 59

  Been thanked: 2 times
  12/02/2025 at 1:21 PM #254152
  robertogozzi

  Hallo elviko, nach so langer Zeit muss ich dir leider mitteilen, dass es nicht möglich ist, Kreise automatisch in Charts zu zeichnen. Du kannst dies jedoch manuell mit den Werkzeugen in der ProRealTime-Symbolleiste tun.
  Es gibt zwar einen Befehl zum Zeichnen einer Ellipse, aber keinen zum Zeichnen eines Kreises. Ich habe auch die von AI vorgeschlagenen Formeln ausprobiert, aber ohne Erfolg. Die Umwandlung von Balken und Kursen in X- und Y-Koordinaten, die den Eindruck einer Kugel erwecken, ist nicht möglich.

   

   

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 18013

  Been thanked: 4592 times
  12/12/2025 at 4:05 PM #254511
  elviko

  Danke 🙏🏼 für deine mühe 🙇🏿🙇🏿🙇🏿🙇🏿🙇🏿

  

  elviko

  Participant

  Topics: 13

  Replies: 59

  Been thanked: 2 times
• Author
  Posts