Señalizador de distancia sar

• 08/16/2023 at 10:04 AM #219158
  Patrickgarridoo

  Buenos dias, me gustaria que me ayudaran en crear un indicador que te señalice la maxima distancia entre la sar y la sar anterior de una tendencia de la sar y te lo señalice con una flecha, adjunto una imagen para que comprueben lo que quiero y el indicador para que me ayuden. Un saludo

  sar distancia

  psar= SAR[0.02,0.02,0.2] A = ABS(psar[1] - psar) B = ABS(psar - psar[1]) IF psar > close then DrawText("#A#",BarIndex,PSAR+60,dialog,bold,10) elsif psar < close then DrawText("#B#",BarIndex,PSAR-60,dialog,bold,10) ENDIF RETURN

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

  psar= SAR[0.02,0.02,0.2]   A = ABS(psar[1] - psar) B = ABS(psar - psar[1])     IF psar > close then DrawText("#A#",BarIndex,PSAR+60,dialog,bold,10)   elsif psar < close then DrawText("#B#",BarIndex,PSAR-60,dialog,bold,10) ENDIF         RETURN

   

  

  Patrickgarridoo

  Participant

  Topics: 26

  Replies: 68

  Been thanked: 1 time
  08/18/2023 at 2:57 PM #219306
  robertogozzi

  463.52614 es la diferencia entre qué valores?

   

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17134

  Been thanked: 4031 times
  08/20/2023 at 12:58 PM #219367
  Patrickgarridoo

  es la diferencia entre la sar actual y la sar anterior

  

  Patrickgarridoo

  Participant

  Topics: 26

  Replies: 68

  Been thanked: 1 time
  08/21/2023 at 11:16 AM #219411
  robertogozzi

  Ahí tienes:

  psar= SAR[0.02,0.02,0.2] A = ABS(psar - psar[1]) IF psar > close then if psar[1] < close[1]THEN Distancia = 0 ELSE Distancia = max(Distancia, A) IF (Distancia > Distancia[1]) AND (Distancia[1] <> 0) THEN DrawText("↓",BarIndex,PSAR+30,dialog,bold,30) coloured("Red",255) ENDIF ENDIF DrawText("#A#",BarIndex,PSAR+60,dialog,bold,10) elsif psar < close then if psar[1] > close[1]THEN Distancia = 0 ELSE Distancia = max(Distancia, A) IF (Distancia > Distancia[1]) AND (Distancia[1] <> 0) THEN DrawText("↑",BarIndex,PSAR-30,dialog,bold,30) coloured("Green",255) ENDIF ENDIF DrawText("#A#",BarIndex,PSAR-60,dialog,bold,10) ENDIF RETURN //psar AS "Sar"

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24

  psar= SAR[0.02,0.02,0.2] A = ABS(psar - psar[1]) IF psar > close then    if psar[1] < close[1]THEN       Distancia = 0    ELSE       Distancia = max(Distancia, A)       IF (Distancia > Distancia[1]) AND (Distancia[1] <> 0) THEN          DrawText("↓",BarIndex,PSAR+30,dialog,bold,30) coloured("Red",255)       ENDIF    ENDIF    DrawText("#A#",BarIndex,PSAR+60,dialog,bold,10) elsif psar < close then    if psar[1] > close[1]THEN       Distancia = 0    ELSE       Distancia = max(Distancia, A)       IF (Distancia > Distancia[1]) AND (Distancia[1] <> 0) THEN          DrawText("↑",BarIndex,PSAR-30,dialog,bold,30) coloured("Green",255)       ENDIF    ENDIF    DrawText("#A#",BarIndex,PSAR-60,dialog,bold,10) ENDIF RETURN //psar AS "Sar"

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17134

  Been thanked: 4031 times
  08/25/2023 at 8:07 AM #219763
  Patrickgarridoo

  y como puedo hacer para que solo me dibuje una flecha en el maximo de las distancias por tendencia de la parabolica sar, es decir que siempre señale la maxima segun van apareciendo distancias y cuando cambien la tendencia señale la siguiente maxima distancia. Un saludo

  

  Patrickgarridoo

  Participant

  Topics: 26

  Replies: 68

  Been thanked: 1 time
  08/25/2023 at 9:56 AM #219774
  robertogozzi

  Puede utilizar esta versión, pero siempre se trazará solo en la última aparición:

  DEFPARAM DrawOnLastBarOnly = true ONCE r = 0 ONCE g = 0 ONCE b = 0 ONCE t = 255 ONCE p = 0 psar= SAR[0.02,0.02,0.2] A = ABS(psar - psar[1]) IF psar > close then if psar[1] < close[1]THEN Distancia = 0 ELSE Distancia = max(Distancia, A) IF (Distancia > Distancia[1]) AND (Distancia[1] <> 0) THEN myBAR = BarIndex myPSAR = PSAR + 30 r = 255 g = 0 p = 1 ENDIF ENDIF elsif psar < close then if psar[1] > close[1]THEN Distancia = 0 ELSE Distancia = max(Distancia, A) IF (Distancia > Distancia[1]) AND (Distancia[1] <> 0) THEN myBAR = BarIndex myPSAR = PSAR - 30 r = 0 g = 255 p = -1 ENDIF ENDIF ENDIF IF p > 0 THEN DrawText("↓",myBAR,myPSAR,dialog,bold,30) coloured(r,g,b,t) DrawText("#A#",myBAR,myPSAR+30,dialog,bold,10) ELSIF p < 0 THEN DrawText("↑",myBAR,myPSAR,dialog,bold,30) coloured(r,g,b,t) DrawText("#A#",myBAR,myPSAR-30,dialog,bold,10) ENDIF RETURN //psar AS "Sar"

  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 34 35 36 37 38 39 40 41 42 43 44

  DEFPARAM DrawOnLastBarOnly = true ONCE r = 0 ONCE g = 0 ONCE b = 0 ONCE t = 255 ONCE p = 0   psar= SAR[0.02,0.02,0.2] A = ABS(psar - psar[1]) IF psar > close then if psar[1] < close[1]THEN Distancia = 0 ELSE Distancia = max(Distancia, A) IF (Distancia > Distancia[1]) AND (Distancia[1] <> 0) THEN myBAR  = BarIndex myPSAR = PSAR + 30 r = 255 g = 0 p = 1 ENDIF ENDIF elsif psar < close then if psar[1] > close[1]THEN Distancia = 0 ELSE Distancia = max(Distancia, A) IF (Distancia > Distancia[1]) AND (Distancia[1] <> 0) THEN myBAR  = BarIndex myPSAR = PSAR - 30 r = 0 g = 255 p = -1 ENDIF ENDIF ENDIF IF p > 0 THEN DrawText("↓",myBAR,myPSAR,dialog,bold,30) coloured(r,g,b,t) DrawText("#A#",myBAR,myPSAR+30,dialog,bold,10) ELSIF p < 0 THEN DrawText("↑",myBAR,myPSAR,dialog,bold,30) coloured(r,g,b,t) DrawText("#A#",myBAR,myPSAR-30,dialog,bold,10) ENDIF RETURN //psar AS "Sar"

   

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17134

  Been thanked: 4031 times
  09/06/2023 at 10:21 AM #220409
  Patrickgarridoo

  Se podría hacer que no se señale la primera cambio de tendencia de la sar para no ver esa distancia ni flecha solo que cuente a partir de la primera sar. Un saludo

  

  Patrickgarridoo

  Participant

  Topics: 26

  Replies: 68

  Been thanked: 1 time
  09/06/2023 at 10:27 AM #220415
  robertogozzi

  ¿Puedes darme un ejemplo?

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17134

  Been thanked: 4031 times
  09/06/2023 at 2:22 PM #220427
  Patrickgarridoo

  Claro, esta imagen que me enviaste con el codigo pues que el codigo no cuente la primera sar de la tendencia para que no señale tanta distancia ni el contador ni las flechas es decir que no aparezca nada nunca que empiece a contar desde la segunda sar

  

  Patrickgarridoo

  Participant

  Topics: 26

  Replies: 68

  Been thanked: 1 time
  09/08/2023 at 8:39 AM #220542
  robertogozzi

  Esto no se imprime en la primera barra después del cambio:

  //DEFPARAM DrawOnLastBarOnly = true ONCE r = 0 ONCE g = 0 ONCE b = 0 ONCE t = 255 ONCE p = 0 psar= SAR[0.02,0.02,0.2] A = ABS(psar - psar[1]) p = 0 IF psar > close then if psar[1] < close[1]THEN Distancia = 0 ELSE Distancia = max(Distancia, A) IF (Distancia > Distancia[1]) AND (Distancia[1] <> 0) THEN myBAR = BarIndex myPSAR = PSAR + 30 r = 255 g = 0 p = 1 ENDIF ENDIF elsif psar < close then if psar[1] > close[1]THEN Distancia = 0 ELSE Distancia = max(Distancia, A) IF (Distancia > Distancia[1]) AND (Distancia[1] <> 0) THEN myBAR = BarIndex myPSAR = PSAR - 30 r = 0 g = 255 p = -1 ENDIF ENDIF ENDIF IF p > 0 THEN DrawText("↓",myBAR,myPSAR,dialog,bold,30) coloured(r,g,b,t) DrawText("#A#",myBAR,myPSAR+30,dialog,bold,10) //coloured(r,g,b,t) ELSIF p < 0 THEN DrawText("↑",myBAR,myPSAR,dialog,bold,30) coloured(r,g,b,t) DrawText("#A#",myBAR,myPSAR-30,dialog,bold,10) //coloured(r,g,b,t) ENDIF RETURN psar AS "Sar"

  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 34 35 36 37 38 39 40 41 42 43 44 45

  //DEFPARAM DrawOnLastBarOnly = true ONCE r = 0 ONCE g = 0 ONCE b = 0 ONCE t = 255 ONCE p = 0   psar= SAR[0.02,0.02,0.2] A = ABS(psar - psar[1]) p = 0 IF psar > close then if psar[1] < close[1]THEN Distancia = 0 ELSE Distancia = max(Distancia, A) IF (Distancia > Distancia[1]) AND (Distancia[1] <> 0) THEN myBAR  = BarIndex myPSAR = PSAR + 30 r = 255 g = 0 p = 1 ENDIF ENDIF elsif psar < close then if psar[1] > close[1]THEN Distancia = 0 ELSE Distancia = max(Distancia, A) IF (Distancia > Distancia[1]) AND (Distancia[1] <> 0) THEN myBAR  = BarIndex myPSAR = PSAR - 30 r = 0 g = 255 p = -1 ENDIF ENDIF ENDIF IF p > 0 THEN DrawText("↓",myBAR,myPSAR,dialog,bold,30)      coloured(r,g,b,t) DrawText("#A#",myBAR,myPSAR+30,dialog,bold,10) //coloured(r,g,b,t) ELSIF p < 0 THEN DrawText("↑",myBAR,myPSAR,dialog,bold,30)      coloured(r,g,b,t) DrawText("#A#",myBAR,myPSAR-30,dialog,bold,10) //coloured(r,g,b,t) ENDIF RETURN psar AS "Sar"

   

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17134

  Been thanked: 4031 times
  09/13/2023 at 11:39 AM #220924
  Patrickgarridoo

  Lo solucione al final de otra manera. La duda que me surge es como puedo hacer que solo se dibuje las distancia pero de la tendencia actual de la sar y que cuando el precio rebase tanto para alcista como para bajista la sar vuelva a empezar a contar las distancias. Un saludo

  Distancias

  psar = SAR[0.02,0.02,0.2] A = ABS(psar - psar[1]) IF psar > close and psar[1] > close[1] then DrawText("#A#",BarIndex[25],0,dialog,bold,16)COLOURED(0,0,0) ELSIF psar < close and psar[1] < close[1] then DrawText("#A#",BarIndex[25],0,dialog,bold,16)COLOURED(0,0,0) ELSE DrawText("0",BarIndex[25],0,dialog,bold,16)COLOURED(0,0,0) ENDIF RETURN a as "distanciasrestantes:)" COLOURED(0,0,0)

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20

  psar = SAR[0.02,0.02,0.2] A = ABS(psar - psar[1])   IF psar > close and psar[1] > close[1] then DrawText("#A#",BarIndex[25],0,dialog,bold,16)COLOURED(0,0,0) ELSIF psar < close and psar[1] < close[1] then DrawText("#A#",BarIndex[25],0,dialog,bold,16)COLOURED(0,0,0) ELSE DrawText("0",BarIndex[25],0,dialog,bold,16)COLOURED(0,0,0)   ENDIF                 RETURN a as "distanciasrestantes:)" COLOURED(0,0,0)

   

  

  Patrickgarridoo

  Participant

  Topics: 26

  Replies: 68

  Been thanked: 1 time
  09/13/2023 at 3:04 PM #220948
  robertogozzi

  No entiendo la pregunta, ya calculaste la distancia entre el SAR actual y el anterior, ¿qué distancia necesitas?

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17134

  Been thanked: 4031 times
  09/13/2023 at 4:43 PM #220973
  Patrickgarridoo

  La distancia es la misma lo unico que quiero es que solo me cuente de la tendencia actual de la sar y cuando cambie la tendencia se borre todo y empiece de 0 el contador

  

  Patrickgarridoo

  Participant

  Topics: 26

  Replies: 68

  Been thanked: 1 time
  09/14/2023 at 2:40 PM #221028
  robertogozzi

  Lo tengo. Tendré que reescribirlo usando matrices, por lo que pasará algún tiempo antes de poder hacerlo.

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17134

  Been thanked: 4031 times
  09/14/2023 at 3:37 PM #221037
  Patrickgarridoo

  De acuerdo, quedo a la espera de eso. Un saludo

  

  Patrickgarridoo

  Participant

  Topics: 26

  Replies: 68

  Been thanked: 1 time
• Author
  Posts