breakout ligne de tendance

• 12/12/2024 at 1:34 PM #241359
  christophe11560

  Bonjour,
  J’ai besoin de calculer une ligne de tendance entre les 2 sommets consécutifs baissiers les plus récents ou entre les 2 creux haussiers les plus récents.
  Creux et sommet défini comme suit:
  *creux= low[2]>low[1] and low[1]high
  En effet, je dois connaître le niveau de prix de la ligne de tendance les jours suivant le dernier sommet ou le dernier creux définis suivant les conditions ci-dessus.

  Pour ajouter des conditions complémentaires à ma stratégie, je dois également connaître les valeurs suivantes:
  – Pour les 2 sommets consécutifs à la baisse notés S1 et S2:
  * Le niveau de prix (clôture) et la position de S1
  * Le niveau de prix (clôture) et la position de S2
  – Pour les 2 creux consécutifs à la hausse notés C1 et C2:
  * Le niveau de prix (clôture) et la position de C1
  * Le niveau de prix (clôture) et la position de C2

  En vous remerciant par avance!

  

  christophe11560

  Participant

  Topics: 28

  Replies: 160

  Been thanked: 9 times
  12/12/2024 at 6:15 PM #241367
  christophe11560

  Nota: Petites erreurs de frappe, lire:
  Creux et sommet définis comme suit:
  *creux= low[2]>low[1] and low[1]high

  

  christophe11560

  Participant

  Topics: 28

  Replies: 160

  Been thanked: 9 times
  12/12/2024 at 7:04 PM #241368
  christophe11560

  def creux et sommet

  //excuser moi, il y a un soucis lors de l'envoi, le message est tronqué. creux= low[2]>low[1] and low[1]<low sommet= high[2]<high[1] and high[1]>high

  1 2 3

  //excuser moi, il y a un soucis lors de l'envoi, le message est tronqué. creux= low[2]>low[1] and low[1]<low sommet= high[2]<high[1] and high[1]>high

  

  christophe11560

  Participant

  Topics: 28

  Replies: 160

  Been thanked: 9 times
  12/16/2024 at 9:50 AM #241453
  Iván

  Bonjour. Ce code vous servira de base pour faire ce que vous voulez. Au final ce que vous recherchez c'est un point x,y qui se trouve à l'intérieur d'une droite qui passe par 2 points x1,y1 (creux) et x2,y2 (sommet). Cela doit être vrai (x-x1)/(x2-x1) = (y-y1)/(y2-y1) . y = y1+(x-x1)*(y2-y1)/(x2-x1) nous effaçons le Y que vous avez pour n'importe quelle valeur par rapport à celle que vous proposez. Il vous suffit d'ajuster cette partie à vos intérêts et elle sera prête.

  //Punto Rotura de linea de maximos ////inputs///////////////// prd = 10 /////pivots low if low > low[prd] and lowest[prd](low) > low[prd] and low[prd] < lowest[prd](low)[prd+1] then $pl[z+1] = low[prd] $plx[z+1] = barindex[prd] z = z + 1 endif /////pivots high if high < high[prd] and highest[prd](high)<high[prd] and high[prd]>highest[prd](high)[prd+1] then $ph[t+1]=high[prd] $phx[t+1]=barindex[prd] t=t+1 endif //////////////////////////////////////////////////////////// if islastbarupdate then for j=t downto 0 do if $ph[j] < $ph[max(0,j-1)] then $Highlow[j] = $ph[j] $Highlowx[j] = $phx[j] else $HighMax[j] = $ph[j] $HighMaxx[j] = $phx[j] break endif next //(x-x1)/(x2-x1) = (y-y1)/(y2-y1) y1 = $Highmax[max(0,lastset($Highmax))] x1 = $Highmaxx[max(0,lastset($Highmaxx))] y2 = $Highlow[max(0,lastset($Highlow))] x2 = $Highlowx[max(0,lastset($Highlowx))] for i=barindex downto x2 do yy = y1+(i-x1)*(y2-y1)/(x2-x1) if close[barindex-i] > yy and close[barindex-i+1] < yy then drawarrowup(i,low[barindex-i+1]) xx=i BREAK endif next lowestlow=y1 for i=x1 to xx do if low[barindex-i] < lowestlow then lowestlow=low[barindex-i] lowestlowx=i else lowestlow=lowestlow endif next x = barindex+1 y = y1+(x-x1)*(y2-y1)/(x2-x1) Drawsegment(x1,y1,x,y) drawpoint(x1,y1,2)coloured("blue") drawpoint(xx,yy,2)coloured("blue") drawpoint(lowestlowx,lowestlow,2)coloured("red") endif ////////draw pivot points if z <> z[1] then drawtext("L",barindex[prd],low[prd]-0.35*tr) elsif t <> t[1] then drawtext("H",barindex[prd],high[prd]+0.35*tr) 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 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66

  //Punto Rotura de linea de maximos ////inputs///////////////// prd = 10 /////pivots low if low > low[prd] and lowest[prd](low) > low[prd] and low[prd] < lowest[prd](low)[prd+1] then $pl[z+1] = low[prd] $plx[z+1] = barindex[prd] z = z + 1 endif /////pivots high if high < high[prd] and highest[prd](high)<high[prd] and high[prd]>highest[prd](high)[prd+1] then $ph[t+1]=high[prd] $phx[t+1]=barindex[prd] t=t+1 endif //////////////////////////////////////////////////////////// if islastbarupdate then for j=t downto 0 do if $ph[j] < $ph[max(0,j-1)] then $Highlow[j] = $ph[j] $Highlowx[j] = $phx[j] else $HighMax[j] = $ph[j] $HighMaxx[j] = $phx[j] break endif next //(x-x1)/(x2-x1) = (y-y1)/(y2-y1) y1 = $Highmax[max(0,lastset($Highmax))] x1 = $Highmaxx[max(0,lastset($Highmaxx))] y2 = $Highlow[max(0,lastset($Highlow))] x2 = $Highlowx[max(0,lastset($Highlowx))] for i=barindex downto x2 do yy = y1+(i-x1)*(y2-y1)/(x2-x1) if close[barindex-i] > yy and close[barindex-i+1] < yy then drawarrowup(i,low[barindex-i+1]) xx=i BREAK endif next lowestlow=y1 for i=x1 to xx do if low[barindex-i] < lowestlow then lowestlow=low[barindex-i] lowestlowx=i else lowestlow=lowestlow endif next x = barindex+1 y = y1+(x-x1)*(y2-y1)/(x2-x1) Drawsegment(x1,y1,x,y) drawpoint(x1,y1,2)coloured("blue") drawpoint(xx,yy,2)coloured("blue") drawpoint(lowestlowx,lowestlow,2)coloured("red") endif   ////////draw pivot points if z <> z[1] then drawtext("L",barindex[prd],low[prd]-0.35*tr) elsif t <> t[1] then drawtext("H",barindex[prd],high[prd]+0.35*tr) endif     return

  1 user thanked author for this post.

  plbourse

  

  Iván

  Moderator

  Topics: 0

  Replies: 1049

  Been thanked: 375 times
  12/16/2024 at 12:51 PM #241460
  LucasBest

  Bonjour Iván,
  tu peux accélérer sensiblement ton code, notamment en simplifiant les lignes qui détectent les points pivots, ligne 5 et 11 :

  Equivalent à

  If low[prd] = lowest[prd*2+1](low) then

  1	If low[prd] = lowest[prd*2+1](low) then

  

  LucasBest

  Participant

  Topics: 16

  Replies: 222

  Been thanked: 80 times
  12/16/2024 at 5:48 PM #241474
  Iván

  Bien sûr ! Merci pour votre contribution

  

  Iván

  Moderator

  Topics: 0

  Replies: 1049

  Been thanked: 375 times
• Author
  Posts