TDI Trader Dynamic Index

• 10/31/2021 at 3:03 PM #180662
  supertiti

  Bonjour à tous,

  Est-il possible de créer un indicateur qui nous retourne les divergences baissières et haussières sous forme d’histogrammes rouges et verts d’après l’indicateur

  de Nicolas ?

  Ici vous avez plus d’info sur le fonctionnement du TDI :

  https://www.tradingforexsp.com/metodo-market-maker

  En bas de page dans secretos TDI MMM vous avez un tuto en Anglais.

  TDI

  //parameters // lengthRSI = 13 // lengthband = 34 // lengthrsipl = 2 // lengthtradesl = 7 r = rsi[lengthrsi](close) ma = average[lengthband](r) offs = (1.6185 * std[lengthband](r)) up = ma+offs dn = ma-offs mid = (up+dn)/2 mab = average[lengthrsipl](r) mbb = average[lengthtradesl](r) lineup = 68 linemid = 50 linedown = 32 RETURN lineup as "line up", linemid as "line mid", linedown as "line down", up coloured(0,238,238) as "up", dn coloured(0,238,238) as "dn", mid coloured(255,165,0) as "mid", mab coloured(0,255,0), mbb coloured(255,0,0)

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

  //parameters // lengthRSI = 13 // lengthband = 34 // lengthrsipl = 2 // lengthtradesl = 7 r = rsi[lengthrsi](close) ma = average[lengthband](r) offs = (1.6185 * std[lengthband](r)) up = ma+offs dn = ma-offs mid = (up+dn)/2 mab = average[lengthrsipl](r) mbb = average[lengthtradesl](r) lineup = 68 linemid = 50 linedown = 32 RETURN lineup as "line up", linemid as "line mid", linedown as "line down", up coloured(0,238,238) as "up", dn coloured(0,238,238) as "dn", mid coloured(255,165,0) as "mid", mab coloured(0,255,0), mbb coloured(255,0,0)

   

  

  supertiti

  Participant

  Topics: 121

  Replies: 717

  Been thanked: 72 times
  11/01/2021 at 11:11 AM #180737
  Nicolas

  Le TDI c’est simplement un RSI de période 13 lissé par une moyenne mobile simple de 2 périodes. Donc même divergence qu’un RSI traditionnel.

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20828

  Been thanked: 4738 times
  11/01/2021 at 1:46 PM #180742
  supertiti

  merci Nicolas, je regarde cela dans la journée.

  Bonne semaine

  

  supertiti

  Participant

  Topics: 121

  Replies: 717

  Been thanked: 72 times
  11/01/2021 at 3:51 PM #180751
  supertiti

  J’ai fais ça mais j’ai des doutes cela n’a pas trop l’air effectif ?!

  DIVERGENCES TDI

  // DIVERGENCES TDI TRADER DYNAMIC INDEX by Nicolas modifié DID // TDI by Nicolas //parameters // lengthRSI = 13 perso =12 lengthband = 34 // lengthrsipl = 2 lengthtradesl = 7 r = rsi[lengthrsi](close) ma = average[lengthband](r) offs = (1.6185 * std[lengthband](r)) up = ma+offs dn = ma-offs mid = (up+dn)/2 mab = average[lengthrsipl](r) mbb = average[lengthtradesl](r) lineup = 68 linemid = 50 linedown = 32 //RETURN lineup as "line up", linemid as "line mid", linedown as "line down", up //coloured(0,238,238) as "up", dn coloured(0,238,238) as "dn", mid coloured(255,165,0) as //"mid", mab coloured(0,255,0), mbb coloured(255,0,0) ////////////////////////////////////////////////////////////////////////////////////// //PRC_AnotherRSIdivergences | indicator //25.02.2019 //Nicolas @ www.prorealcode.com //Sharing ProRealTime knowledge // --- settings TDIp=12 //TDI period perso = 12 obLevel=68 //overbought level osLevel=32 //oversold level minimalBars=5 //minimal count of bars where TDI is ob or os // --- end of settings // irsi = rsi[RSIp] itdi = mab[TDIp] ob = itdi>obLevel os = itdi<osLevel if ob then if not ob[1] then maxmab = 0 maxprice = 0 firstobbar = barindex endif maxtdi=max(maxmab,itdi) maxprice=max(maxprice,high) if maxtdi<>maxtdi[1] then maxtdibar=barindex endif endif if os then if not os[1] then mintdi = 100 minprice = close*100 firstosbar = barindex endif mintdi=min(mintdi,itdi) minprice=min(minprice,low) if mintdi<>mintdi[1] then mintdibar=barindex endif endif divsell=0 if itdi crosses under obLevel then //verif divergence div = maxprice>oldmaxprice and maxtdi<oldmaxtdi and (barindex-firstobbar)>=minimalBars if div then drawsegment(oldmaxtdibar,oldmaxtdi,maxtdibar,maxtdi) coloured(200,0,0) drawarrowdown(maxtdibar,maxtdi) coloured(200,0,0) divsell=osLevel endif oldmaxtdi = maxtdi oldmaxprice = maxprice oldmaxtdibar = maxtdibar endif divbuy=0 if itdi crosses over osLevel then //verif divergence div = minprice<oldminprice and mintdi>oldmintdi and (barindex-firstosbar)>=minimalBars if div then drawsegment(oldmintdibar,oldmintdi,mintdibar,mintdi) coloured(0,200,0) drawarrowup(mintdibar,mintdi) coloured(0,200,0) divbuy=osLevel endif oldmintdi = mintdi oldminprice = minprice oldmintdibar = mintdibar endif return itdi style(line,2) as "TDI",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

  // DIVERGENCES TDI TRADER DYNAMIC INDEX  by Nicolas modifié DID   // TDI by Nicolas //parameters // lengthRSI = 13 perso =12 lengthband = 34 // lengthrsipl = 2 lengthtradesl = 7   r = rsi[lengthrsi](close) ma = average[lengthband](r) offs = (1.6185 * std[lengthband](r)) up = ma+offs dn = ma-offs mid = (up+dn)/2 mab = average[lengthrsipl](r) mbb = average[lengthtradesl](r) lineup = 68 linemid = 50 linedown = 32   //RETURN lineup as "line up", linemid as "line mid", linedown as "line down", up //coloured(0,238,238) as "up", dn coloured(0,238,238) as "dn", mid coloured(255,165,0) as //"mid", mab coloured(0,255,0), mbb coloured(255,0,0)   ////////////////////////////////////////////////////////////////////////////////////// //PRC_AnotherRSIdivergences | indicator //25.02.2019 //Nicolas @ www.prorealcode.com //Sharing ProRealTime knowledge // --- settings TDIp=12 //TDI period perso = 12 obLevel=68 //overbought level osLevel=32 //oversold level minimalBars=5 //minimal count of bars where TDI is ob or os // --- end of settings // irsi = rsi[RSIp] itdi = mab[TDIp] ob = itdi>obLevel os = itdi<osLevel if ob then if not ob[1] then maxmab = 0 maxprice = 0 firstobbar = barindex endif maxtdi=max(maxmab,itdi) maxprice=max(maxprice,high) if maxtdi<>maxtdi[1] then maxtdibar=barindex endif endif if os then if not os[1] then mintdi = 100 minprice = close*100 firstosbar = barindex endif mintdi=min(mintdi,itdi) minprice=min(minprice,low) if mintdi<>mintdi[1] then mintdibar=barindex endif endif divsell=0 if itdi crosses under obLevel then //verif divergence div = maxprice>oldmaxprice and maxtdi<oldmaxtdi and (barindex-firstobbar)>=minimalBars if div then drawsegment(oldmaxtdibar,oldmaxtdi,maxtdibar,maxtdi) coloured(200,0,0) drawarrowdown(maxtdibar,maxtdi) coloured(200,0,0) divsell=osLevel endif oldmaxtdi = maxtdi oldmaxprice = maxprice oldmaxtdibar = maxtdibar endif divbuy=0 if itdi crosses over osLevel then //verif divergence div = minprice<oldminprice and mintdi>oldmintdi and (barindex-firstosbar)>=minimalBars if div then drawsegment(oldmintdibar,oldmintdi,mintdibar,mintdi) coloured(0,200,0) drawarrowup(mintdibar,mintdi) coloured(0,200,0) divbuy=osLevel endif oldmintdi = mintdi oldminprice = minprice oldmintdibar = mintdibar endif return itdi style(line,2) as "TDI",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" ////////////////////////////////////////////////////////////////////////////////////////////////////////

   

  

  supertiti

  Participant

  Topics: 121

  Replies: 717

  Been thanked: 72 times
• Author
  Posts