Trendline : Une approche du trading

• 10/30/2021 at 5:40 PM #180615
  Manu L.

  En quoi consiste cet indicateur : Swapping Trendline area 3 ?

  

  Manu L.

  Participant

  Topics: 7

  Replies: 61

  Been thanked: 5 times
  10/30/2021 at 5:43 PM #180617
  Nicolas

  Sauf erreur de ma part, il est issue de ce sujet: https://www.prorealcode.com/topic/prc_quickfibtl/

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4773 times
  10/30/2021 at 5:50 PM #180618
  Manu L.

  Malgré la saisie show S/R en début de code, pas d’affichage graphique !?

   

  defparam drawonlastbaronly = true defparam calculateonlastbars = 500 showSR = 1 //fractals cp = lookback if high[cp] >= highest[(cp)*2+1](high) then LLH = 1 else LLH = 0 endif if low[cp] <= lowest[(cp)*2+1](low) then LLL = -1 else LLL = 0 endif if LLH = 1 then oldLTOPy = LTOPy[1] oldLTOPx = LTOPx[1] LTOPy = high[cp] LTOPx = barindex[cp] endif if LLL = -1 then oldLBOTy = LBOTy[1] oldLBOTx = LBOTx[1] LBOTy = low[cp] LBOTx = barindex[cp] endif //trend line DRAWLINE(oldLTOPx,oldLTOPy,LTOPx,LTOPy)coloured(112,169,161) DRAWLINE(oldLBOTx,oldLBOTy,LBOTx,LBOTy)coloured(211,78,36) //support/resistance if showSR then DRAWHLINE(LTOPy) COLOURED(207,215,199,100) DRAWHLINE(LBOTy) COLOURED(207,215,199,100) endif barelapsedTOP=barindex-LTOPX barelapsedBOTTOM=barindex-LBOTX factorTOP = (LTOPy-oldLTOPy)/(LTOPx-oldLTOPx) factorBOTTOM = (LBOTy-oldLBOTy)/(LBOTx-oldLBOTx) //drawtext("#factor#",barindex,low-10*pipsize,Dialog,Bold,20) nowTOP = LTOPy+(barelapsedTOP*factorTOP) drawtext("X",barindex,nowTOP,Dialog,Bold,20) coloured(112,169,161) nowBOTTOM = LBOTy+(barelapsedBOTTOM*factorBOTTOM) drawtext("X",barindex,nowBOTTOM,Dialog,Bold,20) coloured(211,78,36) RETURN nowTOP coloured(110,0,0,0), nowBOTTOM coloured(110,0,0,0)

  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

  defparam drawonlastbaronly = true defparam calculateonlastbars = 500   showSR = 1 //fractals   cp = lookback if high[cp] >= highest[(cp)*2+1](high) then LLH = 1 else LLH = 0 endif if low[cp] <= lowest[(cp)*2+1](low)  then LLL = -1 else LLL = 0 endif if LLH = 1 then oldLTOPy = LTOPy[1] oldLTOPx = LTOPx[1] LTOPy = high[cp] LTOPx = barindex[cp] endif if LLL = -1 then oldLBOTy = LBOTy[1] oldLBOTx = LBOTx[1] LBOTy = low[cp] LBOTx = barindex[cp] endif //trend line DRAWLINE(oldLTOPx,oldLTOPy,LTOPx,LTOPy)coloured(112,169,161) DRAWLINE(oldLBOTx,oldLBOTy,LBOTx,LBOTy)coloured(211,78,36) //support/resistance if showSR then DRAWHLINE(LTOPy) COLOURED(207,215,199,100) DRAWHLINE(LBOTy) COLOURED(207,215,199,100) endif barelapsedTOP=barindex-LTOPX barelapsedBOTTOM=barindex-LBOTX factorTOP = (LTOPy-oldLTOPy)/(LTOPx-oldLTOPx) factorBOTTOM = (LBOTy-oldLBOTy)/(LBOTx-oldLBOTx) //drawtext("#factor#",barindex,low-10*pipsize,Dialog,Bold,20) nowTOP = LTOPy+(barelapsedTOP*factorTOP) drawtext("X",barindex,nowTOP,Dialog,Bold,20) coloured(112,169,161) nowBOTTOM = LBOTy+(barelapsedBOTTOM*factorBOTTOM) drawtext("X",barindex,nowBOTTOM,Dialog,Bold,20) coloured(211,78,36) RETURN nowTOP coloured(110,0,0,0), nowBOTTOM coloured(110,0,0,0)

   

   

  

  Manu L.

  Participant

  Topics: 7

  Replies: 61

  Been thanked: 5 times
  10/30/2021 at 5:51 PM #180619
  Nicolas

  Il faut appliquer l’indicateur sur le prix.

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4773 times
  10/30/2021 at 6:03 PM #180620
  Manu L.

  Rien !? 🙁

  

  Manu L.

  Participant

  Topics: 7

  Replies: 61

  Been thanked: 5 times
  11/04/2021 at 2:50 PM #180958
  Nicolas

  Dans le code ci-dessus il te manque la variable lookback à ajouter en tête de code:

  lookback = 10

  1	lookback = 10

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4773 times
  11/08/2021 at 10:01 PM #181268
  Manu L.

  ça ne fonctionne pas !? 🙁

   

  defparam drawonlastbaronly = true defparam calculateonlastbars = 500 lookback = 10 showSR = 1 //fractals cp = lookback if high[cp] >= highest[(cp)*2+1](high) then LLH = 1 else LLH = 0 endif if low[cp] <= lowest[(cp)*2+1](low) then LLL = -1 else LLL = 0 endif if LLH = 1 then oldLTOPy = LTOPy[1] oldLTOPx = LTOPx[1] LTOPy = high[cp] LTOPx = barindex[cp] endif if LLL = -1 then oldLBOTy = LBOTy[1] oldLBOTx = LBOTx[1] LBOTy = low[cp] LBOTx = barindex[cp] endif //trend line DRAWLINE(oldLTOPx,oldLTOPy,LTOPx,LTOPy)coloured(112,169,161) DRAWLINE(oldLBOTx,oldLBOTy,LBOTx,LBOTy)coloured(211,78,36) //support/resistance if showSR then DRAWHLINE(LTOPy) COLOURED(207,215,199,100) DRAWHLINE(LBOTy) COLOURED(207,215,199,100) endif barelapsedTOP=barindex-LTOPX barelapsedBOTTOM=barindex-LBOTX factorTOP = (LTOPy-oldLTOPy)/(LTOPx-oldLTOPx) factorBOTTOM = (LBOTy-oldLBOTy)/(LBOTx-oldLBOTx) //drawtext("#factor#",barindex,low-10*pipsize,Dialog,Bold,20) nowTOP = LTOPy+(barelapsedTOP*factorTOP) drawtext("X",barindex,nowTOP,Dialog,Bold,20) coloured(112,169,161) nowBOTTOM = LBOTy+(barelapsedBOTTOM*factorBOTTOM) drawtext("X",barindex,nowBOTTOM,Dialog,Bold,20) coloured(211,78,36) RETURN nowTOP coloured(110,0,0,0), nowBOTTOM coloured(110,0,0,0)

  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

  defparam drawonlastbaronly = true defparam calculateonlastbars = 500 lookback = 10 showSR = 1 //fractals   cp = lookback if high[cp] >= highest[(cp)*2+1](high) then LLH = 1 else LLH = 0 endif if low[cp] <= lowest[(cp)*2+1](low)  then LLL = -1 else LLL = 0 endif if LLH = 1 then oldLTOPy = LTOPy[1] oldLTOPx = LTOPx[1] LTOPy = high[cp] LTOPx = barindex[cp] endif if LLL = -1 then oldLBOTy = LBOTy[1] oldLBOTx = LBOTx[1] LBOTy = low[cp] LBOTx = barindex[cp] endif //trend line DRAWLINE(oldLTOPx,oldLTOPy,LTOPx,LTOPy)coloured(112,169,161) DRAWLINE(oldLBOTx,oldLBOTy,LBOTx,LBOTy)coloured(211,78,36) //support/resistance if showSR then DRAWHLINE(LTOPy) COLOURED(207,215,199,100) DRAWHLINE(LBOTy) COLOURED(207,215,199,100) endif barelapsedTOP=barindex-LTOPX barelapsedBOTTOM=barindex-LBOTX factorTOP = (LTOPy-oldLTOPy)/(LTOPx-oldLTOPx) factorBOTTOM = (LBOTy-oldLBOTy)/(LBOTx-oldLBOTx) //drawtext("#factor#",barindex,low-10*pipsize,Dialog,Bold,20) nowTOP = LTOPy+(barelapsedTOP*factorTOP) drawtext("X",barindex,nowTOP,Dialog,Bold,20) coloured(112,169,161) nowBOTTOM = LBOTy+(barelapsedBOTTOM*factorBOTTOM) drawtext("X",barindex,nowBOTTOM,Dialog,Bold,20) coloured(211,78,36) RETURN nowTOP coloured(110,0,0,0), nowBOTTOM coloured(110,0,0,0)

   

   

  

  Manu L.

  Participant

  Topics: 7

  Replies: 61

  Been thanked: 5 times
  11/09/2021 at 9:12 AM #181279
  Nicolas

  ça fonctionne avec le code que tu as fourni, l’appliques tu sur le prix stp ?

   

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4773 times
  11/17/2021 at 9:00 AM #181714
  JJ Tec

  Bonjour, J’ai une question concernnant les lignes de tendance, pourrions-nous appliquer la même idée de rupture de ligne de tendance au RSI? À quoi ressemblerait le code? Merci à tous.

  

  JJ Tec

  Participant

  Topics: 8

  Replies: 26

  Been thanked: 0 times
  11/17/2021 at 9:55 AM #181722
  Nicolas

  Le code ci-dessous trace les lignes de trendline sur l’indicateur RSI. On peut changer l’indicateur avec n’importe quel autre dans la variable “source”.

  defparam drawonlastbaronly = true defparam calculateonlastbars = 500 lookback = 20 showSR = 0 source = rsi[14] //fractals cp = lookback if source[cp] >= highest[(cp)*2+1](source) then LLH = 1 else LLH = 0 endif if source[cp] <= lowest[(cp)*2+1](source) then LLL = -1 else LLL = 0 endif if LLH = 1 then oldLTOPy = LTOPy[1] oldLTOPx = LTOPx[1] LTOPy = source[cp] LTOPx = barindex[cp] endif if LLL = -1 then oldLBOTy = LBOTy[1] oldLBOTx = LBOTx[1] LBOTy = source[cp] LBOTx = barindex[cp] endif //trend line DRAWLINE(oldLTOPx,oldLTOPy,LTOPx,LTOPy)coloured(112,169,161) DRAWLINE(oldLBOTx,oldLBOTy,LBOTx,LBOTy)coloured(211,78,36) //support/resistance if showSR then DRAWHLINE(LTOPy) COLOURED(207,215,199,100) DRAWHLINE(LBOTy) COLOURED(207,215,199,100) endif barelapsedTOP=barindex-LTOPX barelapsedBOTTOM=barindex-LBOTX factorTOP = (LTOPy-oldLTOPy)/(LTOPx-oldLTOPx) factorBOTTOM = (LBOTy-oldLBOTy)/(LBOTx-oldLBOTx) //drawtext("#factor#",barindex,low-10*pipsize,Dialog,Bold,20) nowTOP = LTOPy+(barelapsedTOP*factorTOP) drawtext("X",barindex,nowTOP,Dialog,Bold,20) coloured(112,169,161) nowBOTTOM = LBOTy+(barelapsedBOTTOM*factorBOTTOM) drawtext("X",barindex,nowBOTTOM,Dialog,Bold,20) coloured(211,78,36) RETURN source as "indicator", nowTOP coloured(110,0,0,0), nowBOTTOM coloured(110,0,0,0)

  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

  defparam drawonlastbaronly = true defparam calculateonlastbars = 500 lookback = 20 showSR = 0   source = rsi[14]   //fractals cp = lookback if source[cp] >= highest[(cp)*2+1](source) then LLH = 1 else LLH = 0 endif if source[cp] <= lowest[(cp)*2+1](source)  then LLL = -1 else LLL = 0 endif if LLH = 1 then oldLTOPy = LTOPy[1] oldLTOPx = LTOPx[1] LTOPy = source[cp] LTOPx = barindex[cp] endif if LLL = -1 then oldLBOTy = LBOTy[1] oldLBOTx = LBOTx[1] LBOTy = source[cp] LBOTx = barindex[cp] endif //trend line DRAWLINE(oldLTOPx,oldLTOPy,LTOPx,LTOPy)coloured(112,169,161) DRAWLINE(oldLBOTx,oldLBOTy,LBOTx,LBOTy)coloured(211,78,36) //support/resistance if showSR then DRAWHLINE(LTOPy) COLOURED(207,215,199,100) DRAWHLINE(LBOTy) COLOURED(207,215,199,100) endif barelapsedTOP=barindex-LTOPX barelapsedBOTTOM=barindex-LBOTX factorTOP = (LTOPy-oldLTOPy)/(LTOPx-oldLTOPx) factorBOTTOM = (LBOTy-oldLBOTy)/(LBOTx-oldLBOTx) //drawtext("#factor#",barindex,low-10*pipsize,Dialog,Bold,20) nowTOP = LTOPy+(barelapsedTOP*factorTOP) drawtext("X",barindex,nowTOP,Dialog,Bold,20) coloured(112,169,161) nowBOTTOM = LBOTy+(barelapsedBOTTOM*factorBOTTOM) drawtext("X",barindex,nowBOTTOM,Dialog,Bold,20) coloured(211,78,36) RETURN source as "indicator", nowTOP coloured(110,0,0,0), nowBOTTOM coloured(110,0,0,0)

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4773 times
  11/17/2021 at 11:21 AM #181733
  JJ Tec

  Bonjour, Merci pour la réponse, je teste avec ce code d’un partenaire.
  Et j’aimerais savoir comment je pourrais faire un dépistage en petits groupes avec cet indicaur.
  Merci encore.

  //parthapersonal Fractals v1.2 //PRT v11 //By Vonasi //Date: 20201217 defparam drawonlastbaronly = true //Settings BarsBefore = 3 BarsAfter = 3 Support = 3 Resistance = 3 Points = 3 T=rsi[9](totalprice) //Make sure all settings are valid ones BarsBefore = max(BarsBefore,1) BarsAfter = max(BarsAfter,1) StartBack = max(0,startback) if barindex >= barsbefore + barsafter then //Look for a low fractal BarLookBack = BarsAfter + 1 if t[BarsAfter] < lowest[BarsBefore](t)[BarLookBack] THEN if t[BarsAfter] = lowest[BarLookBack](t) THEN a = a + 1 $supportbar[a] = barindex[barsafter] $supportvalue[a] = t[barsafter] endif endif //Look for a high fractal if t[BarsAfter] > highest[BarsBefore](t)[BarLookBack] THEN if t[BarsAfter] = highest[BarLookBack](t) THEN b = b + 1 $resistancebar[b] = barindex[barsafter] $resistancevalue[b] = t[barsafter] endif endif if islastbarupdate then //support line if a >= 2 then if support then flag = 0 zz = 0 for z = a-zz downto 1 for xx = 1 to a if z-xx < 1 then break endif if $supportvalue[z] > $supportvalue[z-xx] then drawsegment($supportbar[z-xx],$supportvalue[z-xx],$supportbar[z],$supportvalue[z],barindex+5) coloured(128,0,0)style(line,2) if points then drawpoint($supportbar[z],$supportvalue[z],2) coloured(128,0,0) drawpoint($supportbar[z-xx],$supportvalue[z-xx],2) coloured(128,0,0) endif flag = 1 break endif zz = zz + 1 next if flag = 1 then break endif zz = 0 next endif endif //resistance line if b >= 2 then if resistance then flag = 0 zz = 0 for z = b-zz downto 1 for xx = 1 to b if z-xx < 1 then break endif if $resistancevalue[z] < $resistancevalue[z-xx] then DRAWSEGMENT($resistancebar[z-xx],$resistancevalue[z-xx],$resistancebar[z],$resistancevalue[z],barindex+5) coloured(100,200,100)style(line,2) if points then drawpoint($resistancebar[z],$resistancevalue[z],2) coloured(0,128,0) drawpoint($resistancebar[z-xx],$resistancevalue[z-xx],2) coloured(0,128,0) endif flag = 1 break endif zz = zz + 1 next if flag = 1 then break endif zz = 0 next endif endif endif endif return T as "r"

  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 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104

  //parthapersonal Fractals v1.2 //PRT v11 //By Vonasi //Date: 20201217   defparam drawonlastbaronly = true //Settings BarsBefore = 3 BarsAfter = 3 Support = 3 Resistance = 3 Points = 3   T=rsi[9](totalprice)   //Make sure all settings are valid ones BarsBefore = max(BarsBefore,1) BarsAfter = max(BarsAfter,1) StartBack = max(0,startback)   if barindex >= barsbefore + barsafter then   //Look for a low fractal BarLookBack = BarsAfter + 1 if t[BarsAfter] < lowest[BarsBefore](t)[BarLookBack] THEN if t[BarsAfter] = lowest[BarLookBack](t) THEN a = a + 1 $supportbar[a] = barindex[barsafter] $supportvalue[a] = t[barsafter] endif endif   //Look for a high fractal if t[BarsAfter] > highest[BarsBefore](t)[BarLookBack] THEN if t[BarsAfter] = highest[BarLookBack](t) THEN b = b + 1 $resistancebar[b] = barindex[barsafter] $resistancevalue[b] = t[barsafter] endif endif   if islastbarupdate then //support line if a >= 2 then if support then flag = 0 zz = 0 for z = a-zz downto 1 for xx = 1 to a if z-xx < 1 then break endif if $supportvalue[z] > $supportvalue[z-xx] then drawsegment($supportbar[z-xx],$supportvalue[z-xx],$supportbar[z],$supportvalue[z],barindex+5) coloured(128,0,0)style(line,2) if points then drawpoint($supportbar[z],$supportvalue[z],2) coloured(128,0,0) drawpoint($supportbar[z-xx],$supportvalue[z-xx],2) coloured(128,0,0) endif flag = 1 break endif zz = zz + 1 next if flag = 1 then break endif zz = 0 next endif endif   //resistance line if b >= 2 then if resistance then flag = 0 zz = 0 for z = b-zz downto 1 for xx = 1 to b if z-xx < 1 then break endif if $resistancevalue[z] < $resistancevalue[z-xx] then DRAWSEGMENT($resistancebar[z-xx],$resistancevalue[z-xx],$resistancebar[z],$resistancevalue[z],barindex+5) coloured(100,200,100)style(line,2) if points then drawpoint($resistancebar[z],$resistancevalue[z],2) coloured(0,128,0) drawpoint($resistancebar[z-xx],$resistancevalue[z-xx],2) coloured(0,128,0) endif flag = 1 break endif zz = zz + 1 next if flag = 1 then break endif zz = 0 next endif endif   endif endif   return T as "r"

   

  

  JJ Tec

  Participant

  Topics: 8

  Replies: 26

  Been thanked: 0 times
• Author
  Posts