Conversion Indicateur RSI cyclic smoothed v2 de TV à PRT

• 11/18/2024 at 9:05 PM #240510
  AdilMed10

  Bonjour à toute l’équipe ProRealCode,

  Tout d’abord, merci pour votre travail exceptionnel et votre contribution à la communauté ProRealTime.

  SVP est il possible de convertir cet indicateur TradingView en ProRealTime : Lien vers l’indicateur TV. De plus, serait-il envisageable d’y ajouter des divergences haussières et baissières (ligne verte et rouge) similaires à celles décrites dans cet indicateur RSI de votre forum : Lien vers l’indicateur PRT.

  Cet outil serait précieux pour identifier les renversements. Merci d’avance pour votre aide !

  Cordialement,

  RSI cyclic smoothed v2

  //@version=4 // // Copyright (C) 2017 CC BY, whentotrade / Lars von Thienen // Source: // Book: Decoding The Hidden Market Rhythm - Part 1: Dynamic Cycles (2017) // Chapter 4: "Fine-tuning technical indicators for more details on the cRSI Indicator // // Usage: // You need to derive the dominant cycle as input parameter for the cycle length as described in chapter 4. // // License: // This work is licensed under a Creative Commons Attribution 4.0 International License. // You are free to share the material in any medium or format and remix, transform, and build upon the material for any purpose, // even commercially. You must give appropriate credit to the authors book and website, provide a link to the license, and indicate // if changes were made. You may do so in any reasonable manner, but not in any way that suggests the licensor endorses you or your use. // study(title="RSI cyclic smoothed", shorttitle="cRSI") src = close domcycle = input(20, minval=10, title="Dominant Cycle Length") crsi = 0.0 cyclelen = domcycle / 2 vibration = 10 leveling = 10.0 cyclicmemory = domcycle * 2 //set min/max ranges? h1 = hline(30, color=color.silver, linestyle=hline.style_dashed) h2 = hline(70, color=color.silver, linestyle=hline.style_dashed) torque = 2.0 / (vibration + 1) phasingLag = (vibration - 1) / 2.0 up = rma(max(change(src), 0), cyclelen) down = rma(-min(change(src), 0), cyclelen) rsi = down == 0 ? 100 : up == 0 ? 0 : 100 - 100 / (1 + up / down) crsi := torque * (2 * rsi - rsi[phasingLag]) + (1 - torque) * nz(crsi[1]) lmax = -999999.0 lmin = 999999.0 for i = 0 to cyclicmemory - 1 by 1 if nz(crsi[i], -999999.0) > lmax lmax := nz(crsi[i]) lmax else if nz(crsi[i], 999999.0) < lmin lmin := nz(crsi[i]) lmin mstep = (lmax - lmin) / 100 aperc = leveling / 100 db = 0.0 for steps = 0 to 100 by 1 testvalue = lmin + mstep * steps above = 0 below = 0 for m = 0 to cyclicmemory - 1 by 1 below := below + iff(crsi[m] < testvalue, 1, 0) below ratio = below / cyclicmemory if ratio >= aperc db := testvalue break else continue ub = 0.0 for steps = 0 to 100 by 1 testvalue = lmax - mstep * steps above = 0 for m = 0 to cyclicmemory - 1 by 1 above := above + iff(crsi[m] >= testvalue, 1, 0) above ratio = above / cyclicmemory if ratio >= aperc ub := testvalue break else continue lowband = plot(db, "LowBand", color.aqua) highband = plot(ub, "HighBand", color.aqua) fill(h1, h2, color=color.silver, transp=90) fill(lowband, highband, color=color.gray, transp=90) plot(crsi, "CRSI", color.fuchsia)

  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

  //@version=4 // // Copyright (C) 2017 CC BY, whentotrade / Lars von Thienen // Source: // Book: Decoding The Hidden Market Rhythm - Part 1: Dynamic Cycles (2017) // Chapter 4: "Fine-tuning technical indicators for more details on the cRSI Indicator // // Usage: // You need to derive the dominant cycle as input parameter for the cycle length as described in chapter 4. // // License: // This work is licensed under a Creative Commons Attribution 4.0 International License. // You are free to share the material in any medium or format and remix, transform, and build upon the material for any purpose, // even commercially. You must give appropriate credit to the authors book and website, provide a link to the license, and indicate // if changes were made. You may do so in any reasonable manner, but not in any way that suggests the licensor endorses you or your use. // study(title="RSI cyclic smoothed", shorttitle="cRSI") src = close domcycle = input(20, minval=10, title="Dominant Cycle Length") crsi = 0.0 cyclelen = domcycle / 2 vibration = 10 leveling = 10.0 cyclicmemory = domcycle * 2 //set min/max ranges?   h1 = hline(30, color=color.silver, linestyle=hline.style_dashed) h2 = hline(70, color=color.silver, linestyle=hline.style_dashed)   torque = 2.0 / (vibration + 1) phasingLag = (vibration - 1) / 2.0   up = rma(max(change(src), 0), cyclelen) down = rma(-min(change(src), 0), cyclelen) rsi = down == 0 ? 100 : up == 0 ? 0 : 100 - 100 / (1 + up / down) crsi := torque * (2 * rsi - rsi[phasingLag]) + (1 - torque) * nz(crsi[1])   lmax = -999999.0 lmin = 999999.0 for i = 0 to cyclicmemory - 1 by 1     if nz(crsi[i], -999999.0) > lmax         lmax := nz(crsi[i])         lmax     else         if nz(crsi[i], 999999.0) < lmin             lmin := nz(crsi[i])             lmin   mstep = (lmax - lmin) / 100 aperc = leveling / 100   db = 0.0 for steps = 0 to 100 by 1     testvalue = lmin + mstep * steps     above = 0     below = 0     for m = 0 to cyclicmemory - 1 by 1         below := below + iff(crsi[m] < testvalue, 1, 0)         below       ratio = below / cyclicmemory     if ratio >= aperc         db := testvalue         break     else         continue   ub = 0.0 for steps = 0 to 100 by 1     testvalue = lmax - mstep * steps     above = 0     for m = 0 to cyclicmemory - 1 by 1         above := above + iff(crsi[m] >= testvalue, 1, 0)         above       ratio = above / cyclicmemory     if ratio >= aperc         ub := testvalue         break     else         continue     lowband = plot(db, "LowBand", color.aqua) highband = plot(ub, "HighBand", color.aqua) fill(h1, h2, color=color.silver, transp=90) fill(lowband, highband, color=color.gray, transp=90) plot(crsi, "CRSI", color.fuchsia)

   

  

  AdilMed10

  Participant

  Topics: 2

  Replies: 6

  Been thanked: 0 times
  11/19/2024 at 4:19 PM #240537
  Iván

  Voici ce que vous avez :

  //-------------------------------------// //PRC_RSI Cyclic Smoothed //version = 0 //19.11.2024 //Iván González @ www.prorealcode.com //Sharing ProRealTime knowledge //-------------------------------------// //Inputs //-------------------------------------// src=close domcycle=20 cyclelen=domcycle/2 vibration=10 leveling=10 cyclicmemory=domcycle*2 once crsi=0 //-------------------------------------// // CRSI calculation //-------------------------------------// torque=2/(vibration+1) phasinglag=floor((vibration-1)/2) length = cyclelen alpha = 1/length srcUp = max(src-src[1],0) if barindex = length then up = average[length](srcUp) else up = alpha*srcUp + (1-alpha)*up[1] endif srcDw = -min(src-src[1],0) if barindex = length then dw = average[length](srcdw) else dw = alpha*srcdw + (1-alpha)*dw[1] endif if dw=0 then myrsi=100 elsif up=0 then myrsi=0 else myrsi=100-100/(1+up/dw) endif if barindex>cyclicmemory then crsi=torque*(2*myrsi-myrsi[phasinglag])+(1-torque)*crsi[1] endif //-------------------------------------// // LowBand and HighBand calculation //-------------------------------------// Period=cyclicMemory percent = leveling/100 periodMinusone = period-1 maxima = -999999.0 minima = 999999.0 for i=0 to periodMinusone do if crsi[i] > maxima then maxima = crsi[i] elsif crsi[i] < minima then minima = crsi[i] endif next stepfactor = (maxima-minima)/100 lowband = 0 for steps=0 to 100 do testvalue = minima+stepfactor*steps below=0 for m=0 to periodMinusone do if crsi[m]<testvalue then below=below+1 endif next if below/period >= percent then lowband = testvalue break endif next highband=0 for steps=0 to 100 do testvalue=maxima-stepfactor*steps above=0 for m=0 to periodMinusone do if crsi[m]>=testvalue then above=above+1 endif next if above/Period >= percent then highband=testvalue break endif next colorbetween(highband,lowband,204,204,119,90) //-------------------------------------// // Plot //-------------------------------------// h1=30 h2=70 //-------------------------------------// return highband as "UpperBand"coloured("aqua"),lowband as "LowerBand"coloured("aqua"),crsi as "CRSI"coloured("fuchsia")style(line,2), h1 as "OB level"style(dottedline), h2 as "OS level"style(dottedline)

  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 105 106 107

  //-------------------------------------// //PRC_RSI Cyclic Smoothed //version = 0 //19.11.2024 //Iván González @ www.prorealcode.com //Sharing ProRealTime knowledge //-------------------------------------// //Inputs //-------------------------------------// src=close domcycle=20 cyclelen=domcycle/2 vibration=10 leveling=10 cyclicmemory=domcycle*2   once crsi=0 //-------------------------------------// // CRSI calculation //-------------------------------------// torque=2/(vibration+1) phasinglag=floor((vibration-1)/2)   length = cyclelen alpha = 1/length   srcUp = max(src-src[1],0) if barindex = length then up = average[length](srcUp) else up = alpha*srcUp + (1-alpha)*up[1] endif   srcDw = -min(src-src[1],0) if barindex = length then dw = average[length](srcdw) else dw = alpha*srcdw + (1-alpha)*dw[1] endif   if dw=0 then myrsi=100 elsif up=0 then myrsi=0 else myrsi=100-100/(1+up/dw) endif if barindex>cyclicmemory then crsi=torque*(2*myrsi-myrsi[phasinglag])+(1-torque)*crsi[1] endif //-------------------------------------// // LowBand and HighBand calculation //-------------------------------------// Period=cyclicMemory percent = leveling/100 periodMinusone = period-1 maxima = -999999.0 minima =  999999.0   for i=0 to periodMinusone do   if crsi[i] > maxima then maxima = crsi[i] elsif crsi[i] < minima then minima = crsi[i] endif next   stepfactor = (maxima-minima)/100 lowband = 0   for steps=0 to 100 do testvalue = minima+stepfactor*steps below=0 for m=0 to periodMinusone do if crsi[m]<testvalue then below=below+1 endif next if below/period >= percent then lowband = testvalue break endif next   highband=0 for steps=0 to 100 do testvalue=maxima-stepfactor*steps above=0 for m=0 to periodMinusone do if crsi[m]>=testvalue then above=above+1 endif next if above/Period >= percent then highband=testvalue break endif next colorbetween(highband,lowband,204,204,119,90) //-------------------------------------// // Plot //-------------------------------------// h1=30 h2=70 //-------------------------------------// return highband as "UpperBand"coloured("aqua"),lowband as "LowerBand"coloured("aqua"),crsi as "CRSI"coloured("fuchsia")style(line,2), h1 as "OB level"style(dottedline), h2 as "OS level"style(dottedline)

  1 user thanked author for this post.

  AdilMed10

  

  Iván

  Moderator

  Topics: 0

  Replies: 1051

  Been thanked: 375 times
  11/19/2024 at 4:45 PM #240542
  AdilMed10

  Super merci bcp , c ‘est génial ,   Stp , serait-il envisageable d’y ajouter des divergences haussières et baissières (ligne verte et rouge) similaires à celles décrites dans cet indicateur RSI de votre forum : Lien vers l’indicateur PRT. ? merci

  

  AdilMed10

  Participant

  Topics: 2

  Replies: 6

  Been thanked: 0 times
  11/20/2024 at 9:37 AM #240564
  finplus

  Alors là le RSI paramétré comme indiqué avec une “mémoire” des cycles me parait hyper intéressant.

  Merci d’y avoir pensé et de l’avoir codé pour PRT.

  1 user thanked author for this post.

  AdilMed10

  

  finplus

  Participant

  Topics: 108

  Replies: 419

  Been thanked: 10 times
  11/20/2024 at 9:45 AM #240565
  Iván

  Bonjour. Pour les divergences il vous suffit de copier le code indiqué dans votre lien en dessous de l'indicateur et de changer la ligne dans laquelle est définie la variable irsi :

  minimalBars=5 obLevel=h2 osLevel=h1 irsi = crsi

  1 2 3 4

  minimalBars=5 obLevel=h2 osLevel=h1 irsi = crsi

  1 user thanked author for this post.

  AdilMed10

  

  Iván

  Moderator

  Topics: 0

  Replies: 1051

  Been thanked: 375 times
  11/20/2024 at 10:26 AM #240574
  AdilMed10

  oui je viens de faire ca mais j ‘ai une erreur au niveau de la ligne 119 , ci-joint une photo et voici le code mixé , pourrais tu m’aider à résoudre ca ? merci bcp pour ton aide Ivan.

   

  Mixt des deux script

  //-------------------------------------// //PRC_RSI Cyclic Smoothed //version = 0 //19.11.2024 //Iván González @ www.prorealcode.com //Sharing ProRealTime knowledge //-------------------------------------// defparam drawonlastbaronly=true DEFPARAM CALCULATEONLASTBARS = 300 //Inputs //-------------------------------------// src=close domcycle=32 cyclelen=domcycle/2 vibration=10 leveling=10 cyclicmemory=domcycle*2 once crsi=0 //-------------------------------------// // CRSI calculation //-------------------------------------// torque=2/(vibration+1) phasinglag=floor((vibration-1)/2) length = cyclelen alpha = 1/length srcUp = max(src-src[1],0) if barindex = length then up = average[length](srcUp) else up = alpha*srcUp + (1-alpha)*up[1] endif srcDw = -min(src-src[1],0) if barindex = length then dw = average[length](srcdw) else dw = alpha*srcdw + (1-alpha)*dw[1] endif if dw=0 then myrsi=100 elsif up=0 then myrsi=0 else myrsi=100-100/(1+up/dw) endif if barindex>cyclicmemory then crsi=torque*(2*myrsi-myrsi[phasinglag])+(1-torque)*crsi[1] endif //-------------------------------------// // LowBand and HighBand calculation //-------------------------------------// Period=cyclicMemory percent = leveling/100 periodMinusone = period-1 maxima = -999999.0 minima = 999999.0 for i=0 to periodMinusone do if crsi[i] > maxima then maxima = crsi[i] elsif crsi[i] < minima then minima = crsi[i] endif next stepfactor = (maxima-minima)/100 lowband = 0 for steps=0 to 100 do testvalue = minima+stepfactor*steps below=0 for m=0 to periodMinusone do if crsi[m]<testvalue then below=below+1 endif next if below/period >= percent then lowband = testvalue break endif next highband=0 for steps=0 to 100 do testvalue=maxima-stepfactor*steps above=0 for m=0 to periodMinusone do if crsi[m]>=testvalue then above=above+1 endif next if above/Period >= percent then highband=testvalue break endif next colorbetween(highband,lowband,204,204,119,90) //-------------------------------------// // Plot //-------------------------------------// h1=30 h2=70 //-------------------------------------// return highband as "UpperBand"coloured("aqua"),lowband as "LowerBand"coloured("aqua"),crsi as "CRSI"coloured("fuchsia")style(line,2), h1 as "OB level"style(dottedline), h2 as "OS level"style(dottedline) //-------------------------------------// //PRC_AnotherRSIdivergences | indicator //25.02.2019 //Nicolas @ www.prorealcode.com //Sharing ProRealTime knowledge // --- settings RSIp=14 //RSI period minimalBars=5 //minimal count of bars where RSI is ob or os obLevel=h2 // Adjusted to match the previous h2 osLevel=h1 // Adjusted to match the previous h1 // --- end of settings irsi = crsi // Adjusted irsi to use crsi ob = irsi>obLevel os = irsi<osLevel if ob then if not ob[1] then maxrsi = 0 maxprice = 0 firstobbar = barindex endif maxrsi=max(maxrsi,irsi) maxprice=max(maxprice,high) if maxrsi<>maxrsi[1] then maxrsibar=barindex endif endif if os then if not os[1] then minrsi = 100 minprice = close*100 firstosbar = barindex endif minrsi=min(minrsi,irsi) minprice=min(minprice,low) if minrsi<>minrsi[1] then minrsibar=barindex endif endif divsell=0 if irsi crosses under obLevel then //verif divergence div = maxprice>oldmaxprice and maxrsi<oldmaxrsi and (barindex-firstobbar)>=minimalBars if div then drawsegment(oldmaxrsibar,oldmaxrsi,maxrsibar,maxrsi) coloured(200,0,0) drawarrowdown(maxrsibar,maxrsi) coloured(200,0,0) divsell=osLevel endif oldmaxrsi = maxrsi oldmaxprice = maxprice oldmaxrsibar = maxrsibar endif divbuy=0 if irsi crosses over osLevel then //verif divergence div = minprice<oldminprice and minrsi>oldminrsi and (barindex-firstosbar)>=minimalBars if div then drawsegment(oldminrsibar,oldminrsi,minrsibar,minrsi) coloured(0,200,0) drawarrowup(minrsibar,minrsi) coloured(0,200,0) divbuy=osLevel endif oldminrsi = minrsi oldminprice = minprice oldminrsibar = minrsibar endif return irsi style(line,2) as "RSI",obLevel coloured(168,168,168) style(dottedline,1) as "overbought level", osLevel coloured(168,168,168) style(dottedline,1) as "oversold level", divsell coloured(200,0,0) style(histogram) as "sell divergence", divbuy coloured(0,200,0) style(histogram) as "buy divergence"

  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 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184

  //-------------------------------------// //PRC_RSI Cyclic Smoothed //version = 0 //19.11.2024 //Iván González @ www.prorealcode.com //Sharing ProRealTime knowledge //-------------------------------------// defparam drawonlastbaronly=true DEFPARAM CALCULATEONLASTBARS = 300   //Inputs //-------------------------------------// src=close domcycle=32 cyclelen=domcycle/2 vibration=10 leveling=10 cyclicmemory=domcycle*2   once crsi=0 //-------------------------------------// // CRSI calculation //-------------------------------------// torque=2/(vibration+1) phasinglag=floor((vibration-1)/2)   length = cyclelen alpha = 1/length   srcUp = max(src-src[1],0) if barindex = length then up = average[length](srcUp) else up = alpha*srcUp + (1-alpha)*up[1] endif   srcDw = -min(src-src[1],0) if barindex = length then dw = average[length](srcdw) else dw = alpha*srcdw + (1-alpha)*dw[1] endif   if dw=0 then myrsi=100 elsif up=0 then myrsi=0 else myrsi=100-100/(1+up/dw) endif if barindex>cyclicmemory then crsi=torque*(2*myrsi-myrsi[phasinglag])+(1-torque)*crsi[1] endif //-------------------------------------// // LowBand and HighBand calculation //-------------------------------------// Period=cyclicMemory percent = leveling/100 periodMinusone = period-1 maxima = -999999.0 minima =  999999.0   for i=0 to periodMinusone do   if crsi[i] > maxima then maxima = crsi[i] elsif crsi[i] < minima then minima = crsi[i] endif next   stepfactor = (maxima-minima)/100 lowband = 0   for steps=0 to 100 do testvalue = minima+stepfactor*steps below=0 for m=0 to periodMinusone do if crsi[m]<testvalue then below=below+1 endif next if below/period >= percent then lowband = testvalue break endif next   highband=0 for steps=0 to 100 do testvalue=maxima-stepfactor*steps above=0 for m=0 to periodMinusone do if crsi[m]>=testvalue then above=above+1 endif next if above/Period >= percent then highband=testvalue break endif next colorbetween(highband,lowband,204,204,119,90) //-------------------------------------// // Plot //-------------------------------------// h1=30 h2=70 //-------------------------------------// return highband as "UpperBand"coloured("aqua"),lowband as "LowerBand"coloured("aqua"),crsi as "CRSI"coloured("fuchsia")style(line,2), h1 as "OB level"style(dottedline), h2 as "OS level"style(dottedline)   //-------------------------------------// //PRC_AnotherRSIdivergences | indicator //25.02.2019 //Nicolas @ www.prorealcode.com //Sharing ProRealTime knowledge   // --- settings RSIp=14 //RSI period minimalBars=5 //minimal count of bars where RSI is ob or os obLevel=h2 // Adjusted to match the previous h2 osLevel=h1 // Adjusted to match the previous h1 // --- end of settings   irsi = crsi // Adjusted irsi to use crsi   ob = irsi>obLevel os = irsi<osLevel   if ob then if not ob[1] then maxrsi = 0 maxprice = 0 firstobbar = barindex endif maxrsi=max(maxrsi,irsi) maxprice=max(maxprice,high) if maxrsi<>maxrsi[1] then maxrsibar=barindex endif endif   if os then if not os[1] then minrsi = 100 minprice = close*100 firstosbar = barindex endif minrsi=min(minrsi,irsi) minprice=min(minprice,low) if minrsi<>minrsi[1] then minrsibar=barindex endif endif   divsell=0 if irsi crosses under obLevel then //verif divergence div = maxprice>oldmaxprice and maxrsi<oldmaxrsi and (barindex-firstobbar)>=minimalBars if div then drawsegment(oldmaxrsibar,oldmaxrsi,maxrsibar,maxrsi) coloured(200,0,0) drawarrowdown(maxrsibar,maxrsi) coloured(200,0,0) divsell=osLevel endif oldmaxrsi = maxrsi oldmaxprice = maxprice oldmaxrsibar = maxrsibar endif   divbuy=0 if irsi crosses over osLevel then //verif divergence div = minprice<oldminprice and minrsi>oldminrsi and (barindex-firstosbar)>=minimalBars if div then drawsegment(oldminrsibar,oldminrsi,minrsibar,minrsi) coloured(0,200,0) drawarrowup(minrsibar,minrsi) coloured(0,200,0) divbuy=osLevel endif oldminrsi = minrsi oldminprice = minprice oldminrsibar = minrsibar endif   return irsi style(line,2) as "RSI",obLevel coloured(168,168,168) style(dottedline,1) as "overbought level", osLevel coloured(168,168,168) style(dottedline,1) as "oversold level", divsell coloured(200,0,0) style(histogram) as "sell divergence", divbuy coloured(0,200,0) style(histogram) as "buy divergence"

  

  AdilMed10

  Participant

  Topics: 2

  Replies: 6

  Been thanked: 0 times
  11/20/2024 at 2:02 PM #240581
  jacquesgermain

  hello

  votre erreur ligne 119 est causée par le return de la ligne 110 , il ne doit y avoir qu’un seul return en fin de code .

  1 user thanked author for this post.

  AdilMed10

  

  jacquesgermain

  Participant

  Topics: 3

  Replies: 116

  Been thanked: 46 times
  11/20/2024 at 2:16 PM #240583
  AdilMed10

  hello , merci pour ta réponse ,  il faut que je fasse quoi ?  supprimer le return de la ligne 110  et garder que ca  : ” highband as UpperBand”coloured(“aqua”),lowband as “LowerBand”coloured(“aqua”),crsi as “CRSI”coloured(“fuchsia”)style(line,2), h1 as “OB level”style(dottedline), h2 as “OS level”style(dottedline) ”

  j’ai fais ca mais tjrs une erreur enfait au niveau de la ligne 178 179 .. désolé mais j ai aucune connaissance en programmation je m’aide avec GPT ..

  //-------------------------------------// // PRC_RSI Cyclic Smoothed // version = 0 // 19.11.2024 // Iván González @ www.prorealcode.com //-------------------------------------// defparam drawonlastbaronly = true defparam calculateonlastbars = 300 // Inputs src = close domcycle = 32 cyclelen = domcycle / 2 vibration = 10 leveling = 10 cyclicmemory = domcycle * 2 once crsi = 0 //-------------------------------------// // CRSI Calculation //-------------------------------------// torque = 2 / (vibration + 1) phasinglag = floor((vibration - 1) / 2) length = cyclelen alpha = 1 / length srcUp = max(src - src[1], 0) if barindex = length then up = average[length](srcUp) else up = alpha * srcUp + (1 - alpha) * up[1] endif srcDw = -min(src - src[1], 0) if barindex = length then dw = average[length](srcDw) else dw = alpha * srcDw + (1 - alpha) * dw[1] endif if dw = 0 then myrsi = 100 elsif up = 0 then myrsi = 0 else myrsi = 100 - 100 / (1 + up / dw) endif if barindex > cyclicmemory then crsi = torque * (2 * myrsi - myrsi[phasinglag]) + (1 - torque) * crsi[1] endif //-------------------------------------// // LowBand and HighBand Calculation //-------------------------------------// period = cyclicmemory percent = leveling / 100 periodMinusone = period - 1 maxima = -999999.0 minima = 999999.0 for i = 0 to periodMinusone do if crsi[i] > maxima then maxima = crsi[i] elsif crsi[i] < minima then minima = crsi[i] endif next stepfactor = (maxima - minima) / 100 lowband = 0 for steps = 0 to 100 do testvalue = minima + stepfactor * steps below = 0 for m = 0 to periodMinusone do if crsi[m] < testvalue then below = below + 1 endif next if below / period >= percent then lowband = testvalue break endif next highband = 0 for steps = 0 to 100 do testvalue = maxima - stepfactor * steps above = 0 for m = 0 to periodMinusone do if crsi[m] >= testvalue then above = above + 1 endif next if above / period >= percent then highband = testvalue break endif next colorbetween(highband, lowband, 204, 204, 119, 90) //-------------------------------------// // Divergence Detection and Plot //-------------------------------------// h1 = 30 h2 = 70 RSIp = 14 minimalBars = 5 obLevel = h2 osLevel = h1 irsi = crsi // Overbought logic ob = irsi > obLevel if ob then if not ob[1] then maxrsi = 0 maxprice = 0 firstobbar = barindex endif maxrsi = max(maxrsi, irsi) maxprice = max(maxprice, high) if maxrsi <> maxrsi[1] then maxrsibar = barindex endif endif // Oversold logic os = irsi < osLevel if os then if not os[1] then minrsi = 100 minprice = close * 100 firstosbar = barindex endif minrsi = min(minrsi, irsi) minprice = min(minprice, low) if minrsi <> minrsi[1] then minrsibar = barindex endif endif // Divergence Logic divsell = 0 if irsi crosses under obLevel then div = maxprice > oldmaxprice and maxrsi < oldmaxrsi and (barindex - firstobbar) >= minimalBars if div then drawsegment(oldmaxrsibar, oldmaxrsi, maxrsibar, maxrsi) coloured(200, 0, 0) drawarrowdown(maxrsibar, maxrsi) coloured(200, 0, 0) divsell = osLevel endif oldmaxrsi = maxrsi oldmaxprice = maxprice oldmaxrsibar = maxrsibar endif divbuy = 0 if irsi crosses over osLevel then div = minprice < oldminprice and minrsi > oldminrsi and (barindex - firstosbar) >= minimalBars if div then drawsegment(oldminrsibar, oldminrsi, minrsibar, minrsi) coloured(0, 200, 0) drawarrowup(minrsibar, minrsi) coloured(0, 200, 0) divbuy = osLevel endif oldminrsi = minrsi oldminprice = minprice oldminrsibar = minrsibar endif // Unified return return highband as "UpperBand" coloured("aqua"), lowband as "LowerBand" coloured("aqua"), crsi as "CRSI" coloured("fuchsia") style(line, 2), h1 as "OB level" style(dottedline), h2 as "OS level" style(dottedline), divsell coloured(200, 0, 0) style(histogram) as "sell divergence", divbuy coloured(0, 200, 0) style(histogram) as "buy divergence"

  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 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184

  //-------------------------------------// // PRC_RSI Cyclic Smoothed // version = 0 // 19.11.2024 // Iván González @ www.prorealcode.com //-------------------------------------//   defparam drawonlastbaronly = true defparam calculateonlastbars = 300   // Inputs src = close domcycle = 32 cyclelen = domcycle / 2 vibration = 10 leveling = 10 cyclicmemory = domcycle * 2   once crsi = 0   //-------------------------------------// // CRSI Calculation //-------------------------------------// torque = 2 / (vibration + 1) phasinglag = floor((vibration - 1) / 2)   length = cyclelen alpha = 1 / length   srcUp = max(src - src[1], 0) if barindex = length then     up = average[length](srcUp) else     up = alpha * srcUp + (1 - alpha) * up[1] endif   srcDw = -min(src - src[1], 0) if barindex = length then     dw = average[length](srcDw) else     dw = alpha * srcDw + (1 - alpha) * dw[1] endif   if dw = 0 then     myrsi = 100 elsif up = 0 then     myrsi = 0 else     myrsi = 100 - 100 / (1 + up / dw) endif   if barindex > cyclicmemory then     crsi = torque * (2 * myrsi - myrsi[phasinglag]) + (1 - torque) * crsi[1] endif   //-------------------------------------// // LowBand and HighBand Calculation //-------------------------------------// period = cyclicmemory percent = leveling / 100 periodMinusone = period - 1 maxima = -999999.0 minima = 999999.0   for i = 0 to periodMinusone do     if crsi[i] > maxima then         maxima = crsi[i]     elsif crsi[i] < minima then         minima = crsi[i]     endif next   stepfactor = (maxima - minima) / 100 lowband = 0   for steps = 0 to 100 do     testvalue = minima + stepfactor * steps     below = 0     for m = 0 to periodMinusone do         if crsi[m] < testvalue then             below = below + 1         endif     next     if below / period >= percent then         lowband = testvalue         break     endif next   highband = 0 for steps = 0 to 100 do     testvalue = maxima - stepfactor * steps     above = 0     for m = 0 to periodMinusone do         if crsi[m] >= testvalue then             above = above + 1         endif     next     if above / period >= percent then         highband = testvalue         break     endif next   colorbetween(highband, lowband, 204, 204, 119, 90)   //-------------------------------------// // Divergence Detection and Plot //-------------------------------------// h1 = 30 h2 = 70   RSIp = 14 minimalBars = 5 obLevel = h2 osLevel = h1   irsi = crsi   // Overbought logic ob = irsi > obLevel if ob then     if not ob[1] then         maxrsi = 0         maxprice = 0         firstobbar = barindex     endif     maxrsi = max(maxrsi, irsi)     maxprice = max(maxprice, high)     if maxrsi <> maxrsi[1] then         maxrsibar = barindex     endif endif   // Oversold logic os = irsi < osLevel if os then     if not os[1] then         minrsi = 100         minprice = close * 100         firstosbar = barindex     endif     minrsi = min(minrsi, irsi)     minprice = min(minprice, low)     if minrsi <> minrsi[1] then         minrsibar = barindex     endif endif   // Divergence Logic divsell = 0 if irsi crosses under obLevel then     div = maxprice > oldmaxprice and maxrsi < oldmaxrsi and (barindex - firstobbar) >= minimalBars     if div then         drawsegment(oldmaxrsibar, oldmaxrsi, maxrsibar, maxrsi) coloured(200, 0, 0)         drawarrowdown(maxrsibar, maxrsi) coloured(200, 0, 0)         divsell = osLevel     endif     oldmaxrsi = maxrsi     oldmaxprice = maxprice     oldmaxrsibar = maxrsibar endif   divbuy = 0 if irsi crosses over osLevel then     div = minprice < oldminprice and minrsi > oldminrsi and (barindex - firstosbar) >= minimalBars     if div then         drawsegment(oldminrsibar, oldminrsi, minrsibar, minrsi) coloured(0, 200, 0)         drawarrowup(minrsibar, minrsi) coloured(0, 200, 0)         divbuy = osLevel     endif     oldminrsi = minrsi     oldminprice = minprice     oldminrsibar = minrsibar endif   // Unified return return highband as "UpperBand" coloured("aqua"),        lowband as "LowerBand" coloured("aqua"),        crsi as "CRSI" coloured("fuchsia") style(line, 2),        h1 as "OB level" style(dottedline),        h2 as "OS level" style(dottedline),        divsell coloured(200, 0, 0) style(histogram) as "sell divergence",        divbuy coloured(0, 200, 0) style(histogram) as "buy divergence"

  

  AdilMed10

  Participant

  Topics: 2

  Replies: 6

  Been thanked: 0 times
  11/20/2024 at 2:34 PM #240584
  finplus

  le “return” doit être placé uniquement en fin de code. C’est une instruction qui affichent les informations définies juste après.

  1 user thanked author for this post.

  AdilMed10

  

  finplus

  Participant

  Topics: 108

  Replies: 419

  Been thanked: 10 times
  11/20/2024 at 2:34 PM #240585
  jacquesgermain

  il faut  supprimer la ligne 110 et  grouper en derniere ligne

  return highband as “UpperBand”coloured(“aqua”),lowband as “LowerBand”coloured(“aqua”),crsi as “CRSI”coloured(“fuchsia”)style(line,2), h1 as “OB level”style(dottedline), h2 as “OS level”style(dottedline),irsi style(line,2) as “RSI”,obLevel coloured(168,168,168) style(dottedline,1) as “overbought level”, osLevel coloured(168,168,168) style(dottedline,1) as “oversold level”, divsell coloured(200,0,0) style(histogram) as “sell divergence”, divbuy coloured(0,200,0) style(histogram) as “buy divergence”

  1 user thanked author for this post.

  AdilMed10

  

  jacquesgermain

  Participant

  Topics: 3

  Replies: 116

  Been thanked: 46 times
  11/20/2024 at 2:35 PM #240586
  RicLg

  Mettez le Return sur une seule ligne pour voir.

  // Unified return return highband as "UpperBand" coloured("aqua"),lowband as "LowerBand" coloured("aqua"),crsi as "CRSI" coloured("fuchsia") style(line, 2),h1 as "OB level" style(dottedline),h2 as "OS level" style(dottedline),divsell coloured(200, 0, 0) style(histogram) as "sell divergence",divbuy coloured(0, 200, 0) style(histogram) as "buy divergence"

  1 2

  // Unified return return highband as "UpperBand" coloured("aqua"),lowband as "LowerBand" coloured("aqua"),crsi as "CRSI" coloured("fuchsia") style(line, 2),h1 as "OB level" style(dottedline),h2 as "OS level" style(dottedline),divsell coloured(200, 0, 0) style(histogram) as "sell divergence",divbuy coloured(0, 200, 0) style(histogram) as "buy divergence"

  1 user thanked author for this post.

  AdilMed10

  

  RicLg

  Participant

  Topics: 27

  Replies: 68

  Been thanked: 9 times
  11/20/2024 at 3:51 PM #240588
  Iván

  Et enfin, une chose importante. Supprimez la ligne 8. Sinon vous n’obtiendrez de résultats que dans la dernière bougie. Vous pouvez également modifier le nombre de bougies dans lesquelles l'indicateur est calculé pour accélérer les calculs en modifiant la ligne 9.

  

  Iván

  Moderator

  Topics: 0

  Replies: 1051

  Been thanked: 375 times
• Author
  Posts