TRend lines

• 08/01/2017 at 8:10 AM #42151
  Phil4910

  Bonjour Nicolas,

  J’utilise le code des fractales de Bill Williams mais appliquées à la clôture pour dessiner les trendlines.

  Pour les trendlines descendantes, je souhaiterais que celles-ci se dessinent en reliant la dernière fractale avec l’avant-dernière fractale qui a une valeur supérieure à la valeur de la dernière fractale (ignorer les valeurs de fractales inférieures) et inversément pour les trendlines ascendantes. De la sorte, cela représentera toujours un triangle.

  Mieux qu’une description compliquée, je joins une image et le code que j’utilise.

  FRACTALS DE BILL WILLIAMS

  /////////// FRACTALS DE BILL WILLIAMS //Varible = cp - par défaut =2 defparam drawonlastbaronly = true if close[cp] >= highest[2*cp+1](close) then LH = 1 else LH=0 endif if close[cp] <= lowest[2*cp+1](close) then LL= -1 else LL=0 endif if LH=1 then oldTOPy = TOPy[1] oldTOPx = TOPx[1] TOPy = close[cp] TOPx = barindex[cp] endif if LL = -1 then oldBOTy = BOTy[1] oldBOTx = BOTx[1] BOTy = close[cp] BOTx = barindex[cp] endif //trend line DRAWLINE(oldTOPx,oldTOPy,TOPx,TOPy)coloured(112,169,161) DRAWLINE(oldBOTx,oldBOTy,BOTx,BOTy)coloured(211,78,36) //support/resistance if showSR then DRAWHLINE(TOPy) COLOURED(51,51,255,255) DRAWHLINE(BOTy) COLOURED(51,51,255,255) 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

  /////////// FRACTALS DE BILL WILLIAMS //Varible = cp  - par défaut =2   defparam drawonlastbaronly = true if close[cp] >= highest[2*cp+1](close) then LH = 1 else LH=0 endif   if close[cp] <= lowest[2*cp+1](close)  then LL= -1 else LL=0 endif   if LH=1 then oldTOPy = TOPy[1] oldTOPx = TOPx[1] TOPy = close[cp] TOPx = barindex[cp] endif   if LL = -1 then oldBOTy = BOTy[1] oldBOTx = BOTx[1] BOTy = close[cp] BOTx = barindex[cp] endif   //trend line DRAWLINE(oldTOPx,oldTOPy,TOPx,TOPy)coloured(112,169,161) DRAWLINE(oldBOTx,oldBOTy,BOTx,BOTy)coloured(211,78,36)     //support/resistance if showSR then DRAWHLINE(TOPy) COLOURED(51,51,255,255) DRAWHLINE(BOTy) COLOURED(51,51,255,255) endif return

  Un tout grand merci pour ton aide.

  Phil4910.

  

  Phil4910

  Participant

  Topics: 15

  Replies: 61

  Been thanked: 3 times
  08/01/2017 at 1:59 PM #42214
  Madrosat

  bonjour  Phil

  ton code ne passe pas il manque qq chose   La plate forme me demande de  définir la variable showsr??

  Dans l’attente de ton aide

  M.

   

  

  Madrosat

  Participant

  Topics: 23

  Replies: 224

  Been thanked: 9 times
  08/01/2017 at 2:31 PM #42217
  Nicolas

  Donc la ligne de support sera toujours ascendante et la ligne de résistance toujours descendante ? Ai-je bien compris ? Si oui on essaiera de faire sans une boucle, on verra bien ce que ça donne ..

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4773 times
  08/01/2017 at 2:50 PM #42227
  Phil4910

  Oui Nicolas, c’est exactement cela!

  @ Madrosat : tu dois mettre la variable “ShowSR” pour tracer les supports/résistances horizontaux.

   

  Phil4910.

  

  Phil4910

  Participant

  Topics: 15

  Replies: 61

  Been thanked: 3 times
  08/03/2017 at 5:03 PM #42432
  Phil4910

  Bonjour Nicolas,

  As-tu eu le temps de jeter un oeil à la modification du code?

  Merci,

  Phil4910

  

  Phil4910

  Participant

  Topics: 15

  Replies: 61

  Been thanked: 3 times
  08/24/2017 at 10:31 AM #44515
  Phil4910

  Bonjour Nicolas,

  Peux-tu m’aider pour le code?

  Merci,

  Phil4910

  

  Phil4910

  Participant

  Topics: 15

  Replies: 61

  Been thanked: 3 times
  08/24/2017 at 2:52 PM #44562
  supertiti

  Bonjour à tous,

  Pour être plus complet la variable showsr doit être qualifiée de ” booléen ” puis on coche vrai ou faux selon que l’on veuille voir apparaitre ou non les supports et résistances.

  

  supertiti

  Participant

  Topics: 123

  Replies: 738

  Been thanked: 76 times
  09/15/2017 at 8:29 AM #46249
  Phil4910

  Bonjour Nicolas,

  Peux-tu m’aider pour le code?

  Merci,

  Phil4910

  

  Phil4910

  Participant

  Topics: 15

  Replies: 61

  Been thanked: 3 times
  09/16/2017 at 8:22 PM #46366
  Nicolas

  Phil, désolé j’ai été très pris. Je vais remettre à la semaine prochaine le code, pour l’heure je suis sur mon smartphone. N’hésite pas à le remonter encore une fois si jamais… 😉

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4773 times
  10/26/2017 at 8:53 AM #50576
  Phil4910

  Bonjour Nicolas,

  Je te relance comme tu me l’as suggéré!

  Une idée pour mon code trend lines (j’en reviens toujours à cette méthode)?

   

  Merci,

  Phil4910

  

  Phil4910

  Participant

  Topics: 15

  Replies: 61

  Been thanked: 3 times
  11/24/2017 at 12:06 PM #53841
  Phil4910

  Bonjour Nicolas,

  Je te relance comme tu me l’as suggéré!

  Une idée pour mon code trend lines (j’en reviens toujours à cette méthode)?

   

  Merci,

  Phil4910

  

  Phil4910

  Participant

  Topics: 15

  Replies: 61

  Been thanked: 3 times
  12/18/2017 at 5:38 PM #55998
  Phil4910

  Bonjour Nicolas,

  Comme tu m’avais demandé de te le rappeler, j’ouvre cette file pour que tu puisses te remettre en mémoire ma demande dans la file https://www.prorealcode.com/topic/trend-lines/

  As-tu trouvé une solution à ma demande?

  Merci Nicolas.

  Phil4910

  

  Phil4910

  Participant

  Topics: 15

  Replies: 61

  Been thanked: 3 times
  12/18/2017 at 5:59 PM #56001
  Nicolas

  Désolé, à chaque fois que je reviens dans ce sujet, je me heurte à des problèmes de boucle infini, donc je ne poste rien 😐 J’essaierai encore demain !

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4773 times
  12/19/2017 at 10:19 AM #56045
  Nicolas

  Bon, en attendant de faire mieux, j’affiche uniquement les “trend lines” si la première coordonnée est plus haute et plus basse pour former un triangle.

  /////////// FRACTALS DE BILL WILLIAMS //Varible = cp - par défaut =2 defparam drawonlastbaronly = true if close[cp] >= highest[2*cp+1](close) then LH = 1 else LH=0 endif if close[cp] <= lowest[2*cp+1](close) then LL= -1 else LL=0 endif if LH=1 then oldTOPy = TOPy[1] oldTOPx = TOPx[1] TOPy = close[cp] TOPx = barindex[cp] endif if LL = -1 then oldBOTy = BOTy[1] oldBOTx = BOTx[1] BOTy = close[cp] BOTx = barindex[cp] endif //trend line if oldTOPy>TOPy and oldBOTy<BOTy then DRAWLINE(oldTOPx,oldTOPy,TOPx,TOPy)coloured(112,169,161) DRAWLINE(oldBOTx,oldBOTy,BOTx,BOTy)coloured(211,78,36) 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

  /////////// FRACTALS DE BILL WILLIAMS //Varible = cp  - par défaut =2   defparam drawonlastbaronly = true if close[cp] >= highest[2*cp+1](close) then LH = 1 else LH=0 endif   if close[cp] <= lowest[2*cp+1](close)  then LL= -1 else LL=0 endif   if LH=1 then oldTOPy = TOPy[1] oldTOPx = TOPx[1] TOPy = close[cp] TOPx = barindex[cp] endif   if LL = -1 then oldBOTy = BOTy[1] oldBOTx = BOTx[1] BOTy = close[cp] BOTx = barindex[cp] endif   //trend line if oldTOPy>TOPy and oldBOTy<BOTy then DRAWLINE(oldTOPx,oldTOPy,TOPx,TOPy)coloured(112,169,161) DRAWLINE(oldBOTx,oldBOTy,BOTx,BOTy)coloured(211,78,36) endif   return

  Je vais maintenant tenter de trouver dans le passé les bonnes coordonnées si jamais les précédentes ne sont pas suffisantes pour former un triangle …

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4773 times
  12/19/2017 at 10:35 AM #56049
  Nicolas

  Cette autre version devrait être satisfaisante, on recherche dans le passé les premières coordonnées qui sont valables pour tracer un triangle comparativement avec les derniers fractals connus.

  Attention, si rien ne s’affiche, cela signifie qu’il faut pousser plus loin dans le passé et adjuster la valeur de la variable “lookback” au début du code (ici réglé à 200 bars en arrière par défaut).

  defparam drawonlastbaronly = true cp = 20 lookback = 200 if close[cp] >= highest[2*cp+1](close) then LH = 1 else LH=0 endif if close[cp] <= lowest[2*cp+1](close) then LL= -1 else LL=0 endif if LH=1 then oldTOPy = TOPy[1] oldTOPx = TOPx[1] TOPy = close[cp] TOPx = barindex[cp] endif if LL = -1 then oldBOTy = BOTy[1] oldBOTx = BOTx[1] BOTy = close[cp] BOTx = barindex[cp] endif //trend line firsttopy=0 firstboty=0 for i = 1 to lookback do if oldtopy[i]>topy then firsttopY=oldtopy[i] firsttopX=oldtopx[i] endif if oldboty[i]<boty then firstbotY=oldboty[i] firstbotX=oldbotx[i] endif if firsttopy>0 and firstboty>0 then DRAWLINE(firstTOPx,firstTOPy,TOPx,TOPy)coloured(112,169,161) DRAWLINE(firstBOTx,firstBOTy,BOTx,BOTy)coloured(211,78,36) break endif next 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

  defparam drawonlastbaronly = true   cp = 20 lookback = 200   if close[cp] >= highest[2*cp+1](close) then LH = 1 else LH=0 endif   if close[cp] <= lowest[2*cp+1](close)  then LL= -1 else LL=0 endif   if LH=1 then oldTOPy = TOPy[1] oldTOPx = TOPx[1] TOPy = close[cp] TOPx = barindex[cp] endif   if LL = -1 then oldBOTy = BOTy[1] oldBOTx = BOTx[1] BOTy = close[cp] BOTx = barindex[cp] endif   //trend line firsttopy=0 firstboty=0 for i = 1 to lookback do   if oldtopy[i]>topy then firsttopY=oldtopy[i] firsttopX=oldtopx[i] endif if oldboty[i]<boty then firstbotY=oldboty[i] firstbotX=oldbotx[i] endif if firsttopy>0 and firstboty>0 then DRAWLINE(firstTOPx,firstTOPy,TOPx,TOPy)coloured(112,169,161) DRAWLINE(firstBOTx,firstBOTy,BOTx,BOTy)coloured(211,78,36) break endif next       return

  Sur l’exemple joint, j’indique avec les flèches rouges les lignes des trend lines  tracés sans cette recherche de triangle, les autres lignes formant elles parfaitement la figure recherchée. Bons tests.

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4773 times
• Author
  Posts