Linea de tendencia Unir los dos puntos máximos en el periodo de 1 año

• 02/27/2023 at 7:30 PM #210616
  Mikel9300

  Hola,

  Me gustaría saber si es posible hacer un indicador de línea con la siguiente característica (adjunto fotos con ejemplos):

  • Unir los dos puntos máximos en el periodo de 1 año

  Gracias

  

  Mikel9300

  Participant

  Topics: 14

  Replies: 20

  Been thanked: 1 time
  05/02/2023 at 2:48 AM #213962
  robertogozzi

  No es fácil detectar las oscilaciones altas correctas dentro de 1 año.
  Dividí ese período en dos períodos de 26 semanas.
  Espero que te guste:

  DEFPARAM DrawOnLastBarOnly = true H1 = highest[26](high[26]) Bar1 = BarIndex[51] FOR i = 51 DOWNTO 26 IF high[i] = H1 THEN Bar1 = BarIndex[i] break ENDIF NEXT H2 = highest[26](high) Bar2 = BarIndex[25] FOR i = 25 DOWNTO 0 IF high[i] = H2 THEN Bar2 = BarIndex[i] break ENDIF NEXT Pdiff = H2 - H1 Bdiff = (Bar2 - Bar1) - 1 Ptemp = Pdiff / Bdiff Btemp = (BarIndex - Bar2) H3 = round(H2 + (Ptemp * Btemp),5) DrawSegment(Bar1,H1,BarIndex+1,H3) style(line,3) coloured("Blue") //Offset = highest[52](high) + range //DrawText("Bar1: #Bar1#",BarIndex,Offset) //DrawText("Bar2: #Bar2#",BarIndex,Offset * 1.005) //DrawText("Bdiff: #Bdiff#",BarIndex,Offset * 1.010) //DrawText("H1: #H1#",BarIndex,Offset * 1.015) //DrawText("H2: #H2#",BarIndex,Offset * 1.020) //DrawText("Pdiff: #Pdiff#",BarIndex,Offset * 1.025) //DrawText("H3: #H3#",BarIndex,Offset * 1.030) 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

  DEFPARAM DrawOnLastBarOnly = true H1   = highest[26](high[26]) Bar1 = BarIndex[51] FOR i = 51 DOWNTO 26    IF high[i] = H1 THEN       Bar1 = BarIndex[i]       break    ENDIF NEXT H2   = highest[26](high) Bar2 = BarIndex[25] FOR i = 25 DOWNTO 0    IF high[i] = H2 THEN       Bar2 = BarIndex[i]       break    ENDIF NEXT Pdiff = H2 - H1 Bdiff = (Bar2 - Bar1) - 1 Ptemp = Pdiff / Bdiff Btemp = (BarIndex - Bar2) H3    = round(H2 + (Ptemp * Btemp),5) DrawSegment(Bar1,H1,BarIndex+1,H3) style(line,3) coloured("Blue") //Offset = highest[52](high) + range //DrawText("Bar1:        #Bar1#",BarIndex,Offset) //DrawText("Bar2:        #Bar2#",BarIndex,Offset * 1.005) //DrawText("Bdiff:          #Bdiff#",BarIndex,Offset * 1.010) //DrawText("H1:     #H1#",BarIndex,Offset * 1.015) //DrawText("H2:     #H2#",BarIndex,Offset * 1.020) //DrawText("Pdiff:     #Pdiff#",BarIndex,Offset * 1.025) //DrawText("H3:     #H3#",BarIndex,Offset * 1.030) RETURN

   

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 16469

  Been thanked: 3643 times
• Author
  Posts