Croisement de 2 indicateurs

• 09/25/2022 at 10:50 AM #201339
  finplus

  Bonjour,

  j’ai tenté de coder le screener suivant qui est un simple croisement de 2 indicateurs (celui en 4h croise celui en daily) dont j’avais demandé l’adaptation pour Prorealtime (merci encore Nicolas).

  J’ai l’impression que mon codage n’est pas parfait car certains croisements n’apparaissent pas correctement.

  Quelqu’un pourrait il y jeter un oeil et éventuellement apporter les corrections nécessaires (il fonctionne en UT 4heures).

  Merci.

  Croisement de 2 indicateurs en Daily et en 4h

  //////////////////////////////// Trend Envelopppes timeframe(Daily) timePeriodDaily=14 DeviationDaily=0.1 price1Daily=customclose dsmaDaily = WeightedAverage[timePeriodDaily](price1Daily) valuesHighDaily = (1 + deviationDaily / 100) * dsmaDaily valuesLowDaily = (1 - deviationDaily / 100) * dsmaDaily inputsDaily=price1Daily if (inputsDaily > valuesHighDaily)then trendDaily = 1 elsif (inputsDaily < valuesLowDaily) then trendDaily = -1 endif if (trendDaily > 0) then if ( valuesLowDaily < valuesLowDaily[1]) then valuesLowDaily = valuesLowDaily[1] endif if trendDaily[1]>0 then outputs0Daily = valuesLowDaily outputs1Daily = valueshighDaily endif else if (valuesHighDaily > valuesHighDaily[1]) then valuesHighDaily = valuesHighDaily[1] endif if trendDaily[1]<0 then outputs1Daily = valuesHighDaily outputs0Daily = valueslowDaily endif endif Timeframe (4 hours) //////////////////////////////// Trend Envelopppes timePeriod=14 Deviation=0.1 price1=customclose dsma = WeightedAverage[timePeriod](price1) valuesHigh = (1 + deviation / 100) * dsma valuesLow = (1 - deviation / 100) * dsma inputs=price1 if (inputs > valuesHigh)then trend = 1 elsif (inputs < valuesLow) then trend = -1 endif if (trend > 0) then if ( valuesLow < valuesLow[1]) then valuesLow = valuesLow[1] endif if trend[1]>0 then outputs0 = valuesLow outputs1 = valueshigh endif else if (valuesHigh > valuesHigh[1]) then valuesHigh = valuesHigh[1] endif if trend[1]<0 then outputs1 = valuesHigh outputs0 = valueslow endif endif CrossUp = (outputs0 crosses over outputs0Daily) CrossDn = (outputs1 crosses under Outputs1Daily) Screener [CrossUp or CrossDn]

  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

  //////////////////////////////// Trend Envelopppes timeframe(Daily) timePeriodDaily=14 DeviationDaily=0.1 price1Daily=customclose dsmaDaily = WeightedAverage[timePeriodDaily](price1Daily) valuesHighDaily = (1 + deviationDaily / 100) * dsmaDaily valuesLowDaily = (1 - deviationDaily / 100) * dsmaDaily inputsDaily=price1Daily if (inputsDaily > valuesHighDaily)then trendDaily = 1 elsif (inputsDaily < valuesLowDaily) then trendDaily = -1 endif if (trendDaily > 0) then if ( valuesLowDaily < valuesLowDaily[1]) then valuesLowDaily = valuesLowDaily[1] endif if trendDaily[1]>0 then outputs0Daily = valuesLowDaily outputs1Daily = valueshighDaily endif else if (valuesHighDaily > valuesHighDaily[1]) then valuesHighDaily = valuesHighDaily[1] endif if trendDaily[1]<0 then outputs1Daily = valuesHighDaily outputs0Daily = valueslowDaily endif endif     Timeframe (4 hours)   //////////////////////////////// Trend Envelopppes   timePeriod=14 Deviation=0.1 price1=customclose dsma = WeightedAverage[timePeriod](price1)   valuesHigh = (1 + deviation / 100) * dsma valuesLow = (1 - deviation / 100) * dsma inputs=price1   if (inputs > valuesHigh)then trend = 1 elsif (inputs < valuesLow) then trend = -1 endif if (trend > 0) then if ( valuesLow < valuesLow[1]) then valuesLow = valuesLow[1] endif if trend[1]>0 then outputs0 = valuesLow outputs1 = valueshigh endif else if (valuesHigh > valuesHigh[1]) then valuesHigh = valuesHigh[1] endif if trend[1]<0 then outputs1 = valuesHigh outputs0 = valueslow endif endif CrossUp = (outputs0 crosses over outputs0Daily) CrossDn = (outputs1 crosses under Outputs1Daily)   Screener [CrossUp or CrossDn]

   

  

  finplus

  Participant

  Topics: 106

  Replies: 398

  Been thanked: 8 times
  09/26/2022 at 9:10 AM #201400
  Nicolas

  Pourrais-tu fournir l’indicateur qui trace ces courbes stp (donc 1 seul indicateur multi timeframe) ? Cela afin de vérifier les valeurs. Merci.

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4773 times
  09/26/2022 at 4:46 PM #201451
  finplus

  Bonsoir, je ne comprends pas la demande. L’indicateur est disponible dans ma demande. Le rendu est dans le graphique en pièce jointe (paire CHF JPY) prise le 26 septembre à 17h45 environ Time frame 4 heure : une courbe en tracé plein donc en UT 4 heures et une 2ème en tracé en pointillé qui correspond à l’indicateur en daily.

  

  finplus

  Participant

  Topics: 106

  Replies: 398

  Been thanked: 8 times
  09/26/2022 at 6:25 PM #201458
  finplus

  Je les ajoute tous les deux sur une UT 4 heures

  //////////////////////////////// Trend Envelopppes timeframe(Daily,updateonclose) timePeriod=14 Deviation=0.1 price1=customclose dsma = WeightedAverage[timePeriod](price1) valuesHigh = (1 + deviation / 100) * dsma valuesLow = (1 - deviation / 100) * dsma inputs=price1 if (inputs > valuesHigh)then trend = 1 elsif (inputs < valuesLow) then trend = -1 endif if (trend > 0) then alpha1 = 0 if ( valuesLow < valuesLow[1]) then valuesLow = valuesLow[1] endif if trend[1]>0 then outputs0 = valuesLow outputs1 = valueshigh alpha0 = 255 endif else alpha0=0 if (valuesHigh > valuesHigh[1]) then valuesHigh = valuesHigh[1] endif if trend[1]<0 then outputs1 = valuesHigh outputs0 = valueslow alpha1 = 255 endif endif return outputs0 coloured(65,105,225,alpha0) as "EnvelopUpDaily", outputs1 coloured(255,0,0,alpha1) as "EnvelopdnDaily"

  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

  //////////////////////////////// Trend Envelopppes   timeframe(Daily,updateonclose)   timePeriod=14 Deviation=0.1   price1=customclose   dsma = WeightedAverage[timePeriod](price1)   valuesHigh = (1 + deviation / 100) * dsma valuesLow = (1 - deviation / 100) * dsma   inputs=price1   if (inputs > valuesHigh)then trend = 1 elsif (inputs < valuesLow) then trend = -1 endif   if (trend > 0) then alpha1 = 0 if ( valuesLow < valuesLow[1]) then valuesLow = valuesLow[1] endif if trend[1]>0 then outputs0 = valuesLow outputs1 = valueshigh alpha0 = 255 endif else alpha0=0 if (valuesHigh > valuesHigh[1]) then valuesHigh = valuesHigh[1] endif if trend[1]<0 then outputs1 = valuesHigh outputs0 = valueslow alpha1 = 255 endif endif return outputs0 coloured(65,105,225,alpha0) as "EnvelopUpDaily", outputs1 coloured(255,0,0,alpha1) as "EnvelopdnDaily"

   

  //////////////////////////////// Trend Envelopppes timePeriod=14 Deviation=0.1 price1=customclose dsma = WeightedAverage[timePeriod](price1) valuesHigh = (1 + deviation / 100) * dsma valuesLow = (1 - deviation / 100) * dsma inputs=price1 if (inputs > valuesHigh)then trend = 1 elsif (inputs < valuesLow) then trend = -1 endif if (trend > 0) then alpha1 = 0 if ( valuesLow < valuesLow[1]) then valuesLow = valuesLow[1] endif if trend[1]>0 then outputs0 = valuesLow outputs1 = valueshigh alpha0 = 255 endif else alpha0=0 if (valuesHigh > valuesHigh[1]) then valuesHigh = valuesHigh[1] endif if trend[1]<0 then outputs1 = valuesHigh outputs0 = valueslow alpha1 = 255 endif endif return outputs0 coloured(65,105,225,alpha0) as "EnvelopUp", outputs1 coloured(255,0,0,alpha1) as "Envelopdn"

  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

  //////////////////////////////// Trend Envelopppes   timePeriod=14 Deviation=0.1   price1=customclose   dsma = WeightedAverage[timePeriod](price1)   valuesHigh = (1 + deviation / 100) * dsma valuesLow = (1 - deviation / 100) * dsma   inputs=price1   if (inputs > valuesHigh)then trend = 1 elsif (inputs < valuesLow) then trend = -1 endif   if (trend > 0) then alpha1 = 0 if ( valuesLow < valuesLow[1]) then valuesLow = valuesLow[1] endif if trend[1]>0 then outputs0 = valuesLow outputs1 = valueshigh alpha0 = 255 endif else alpha0=0 if (valuesHigh > valuesHigh[1]) then valuesHigh = valuesHigh[1] endif if trend[1]<0 then outputs1 = valuesHigh outputs0 = valueslow alpha1 = 255 endif endif   return outputs0 coloured(65,105,225,alpha0) as "EnvelopUp", outputs1 coloured(255,0,0,alpha1) as "Envelopdn"

   

   

  

  finplus

  Participant

  Topics: 106

  Replies: 398

  Been thanked: 8 times
  10/08/2022 at 6:04 PM #202116
  finplus

  Bonsoir,

  je me permets de remonter ma demande. Merci.

  

  finplus

  Participant

  Topics: 106

  Replies: 398

  Been thanked: 8 times
• Author
  Posts