Array: récupérer une valeur/index selon période définie

• 05/13/2020 at 6:08 PM #131546
  RicLg

  Bonjour
  C’est la 1ere fois que j’utilise Array, j’épprouve quelques difficultés.
  j’ai un tableau des Top : $Topy

  Je souhaiterai récupérer..
  1 – la valeur du top le plus haut durant les indices (1 to 15) , indice Zero n’est pas inclus dans la période
  2 – ainsi que la barIndex qui lui est associé.

  Merci pour votre aide.

  ps: Suggestion concernant Arraymax, ArrayMin
  Arraymax              ($variable) [période]
  ArraymaxIndex   ($variable) [période]

   

  

  RicLg

  Participant

  Topics: 25

  Replies: 58

  Been thanked: 6 times
  05/14/2020 at 8:31 AM #131608
  Nicolas

  Il faut créer 2 tableaux, l’un qui comportera le barindex et l’autre le prix associé, au même index du tableau.

  Pour trouver le barindex de la valeur la plus haute du tableau du prix, alors il faudra faire une boucle entre  1 et 15. Si tu connais cet index pour le prix, alors celui du tableau de tes barindex sera le même et tu connaîtra donc la coordonnée en abscisse de ta valeur prix.

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20828

  Been thanked: 4738 times
  05/14/2020 at 4:23 PM #131679
  RicLg

  Bonjour

  Merci Nicolas pour tes indications.

  A la ligne 29, pourrai-tu m’orienter ?

  Comment afficher la courbe de valeurs du tableau?

  Cela me permettrait une vérification du résultat du code.

  Merci pour les exemples de codes liés au Tableau/Array

  Merci Nicolas

  ArrayRecupValeursSelonPeriod

  // https://www.prorealcode.com/topic/array-variables-availability-in-prorealtime/ // (please do not remove the link above for future reference) // Example #1: support and resistance example, based on fractals points defparam drawonlastbaronly=true cp=10 Rem LEs Tableaux if high[cp] >= highest[(cp)*2+1](high) then //new fractal high found $TOPy[lastset($TOPy)+1] = high[cp] //store fractal value $TOPx[lastset($TOPx)+1] = barindex[cp] //store fractal barindex endif if low[cp] <= lowest[(cp)*2+1](low) then //new fractal low found $BOTy[lastset($BOTy)+1] = low[cp] //store fractal value $BOTx[lastset($BOTx)+1] = barindex[cp] //stire fractal barindex endif Rem Traitement if(islastbarupdate and isset($topy[0]) and isset($boty[0])) then once HighestTopTmp=$TOPy[lastset($TOPy)] Rem TOP for i = lastset($TOPy)-15 to lastset($TOPy) do // Définition de la Periode Rem Le plus HAUT des 15 derniers indices Rem -------------------------------------- if $TOPy[i]> HighestTopTmp then HighestTopTmp=$TOPy[i] idxHighestTopTmp=$TOPx[i] endif Rem Afficher la courbe du tableau $TOPy Rem -------------------------------------- CourbeTopArray=$TOPy[i] // comment afficher la courbe de valeurs du tableau? next Rem DRAWTEXT : Le plus HAUT des 15 derniers indices Rem -------------------------------------------------------------------- DRAWTEXT("#HighestTopTmp#", idxHighestTopTmp, high[barIndex- idxHighestTopTmp],dialog,bold,20) //coloured (255,255,255,alphaTopCount)) endif return CourbeTopArray as "CourbeTopArray"

  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

  // https://www.prorealcode.com/topic/array-variables-availability-in-prorealtime/ // (please do not remove the link above for future reference) // Example #1: support and resistance example, based on fractals points defparam drawonlastbaronly=true cp=10 Rem LEs Tableaux if high[cp] >= highest[(cp)*2+1](high) then //new fractal high found $TOPy[lastset($TOPy)+1] = high[cp] //store fractal value $TOPx[lastset($TOPx)+1] = barindex[cp] //store fractal barindex endif if low[cp] <= lowest[(cp)*2+1](low)  then //new fractal low found $BOTy[lastset($BOTy)+1] = low[cp] //store fractal value $BOTx[lastset($BOTx)+1] = barindex[cp] //stire fractal barindex endif   Rem Traitement if(islastbarupdate and isset($topy[0]) and isset($boty[0])) then once HighestTopTmp=$TOPy[lastset($TOPy)] Rem TOP for i = lastset($TOPy)-15 to lastset($TOPy) do  // Définition de la Periode Rem Le plus HAUT des 15 derniers indices Rem -------------------------------------- if  $TOPy[i]> HighestTopTmp then HighestTopTmp=$TOPy[i] idxHighestTopTmp=$TOPx[i] endif Rem Afficher la courbe du tableau $TOPy Rem -------------------------------------- CourbeTopArray=$TOPy[i]               //  comment afficher la courbe de valeurs du tableau? next Rem DRAWTEXT : Le plus HAUT des 15 derniers indices Rem -------------------------------------------------------------------- DRAWTEXT("#HighestTopTmp#", idxHighestTopTmp, high[barIndex- idxHighestTopTmp],dialog,bold,20) //coloured (255,255,255,alphaTopCount)) endif   return  CourbeTopArray as "CourbeTopArray"

   

  

  RicLg

  Participant

  Topics: 25

  Replies: 58

  Been thanked: 6 times
  05/14/2020 at 8:34 PM #131710
  RicLg

  Par curiosité je voulais vérifier si le code fonctionne avec le  critère inverse de la ligne 23

  J’ai donc injecté le bloc de la ligne 29

  Et voila que le code fonctionne bizarrement. Je n’y comprends plus rien.

  Merci pour votre aide.

  *Je suis en EoD version gratuite chez Prorealtime. Marché Euronext action

  *ArrayRecupValeursSelonPeriod

  // https://www.prorealcode.com/topic/array-variables-availability-in-prorealtime/ // (please do not remove the link above for future reference) // Example #1: support and resistance example, based on fractals points defparam drawonlastbaronly=true cp=10 Rem LEs Tableaux if high[cp] >= highest[(cp)*2+1](high) then //new fractal high found $TOPy[lastset($TOPy)+1] = high[cp] //store fractal value $TOPx[lastset($TOPx)+1] = barindex[cp] //store fractal barindex endif if low[cp] <= lowest[(cp)*2+1](low) then //new fractal low found $BOTy[lastset($BOTy)+1] = low[cp] //store fractal value $BOTx[lastset($BOTx)+1] = barindex[cp] //stire fractal barindex endif Rem Traitement if(islastbarupdate and isset($topy[0]) and isset($boty[0])) then once HighestTopTmp=$TOPy[lastset($TOPy)] once LowestTopTmp=$TOPy[lastset($TOPy)] Rem TOP for i = lastset($TOPy)-15 to lastset($TOPy) do // Définition de la Periode Rem Le plus HAUT des 15 derniers indices Rem ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀ if $TOPy[i]> HighestTopTmp then HighestTopTmp=$TOPy[i] idxHighestTopTmp=$TOPx[i] endif Rem Le plus BAS des 15 derniers indices // INJECTION Rem ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀ if $TOPy[i]< LowestTopTmp then LowestTopTmp=$TOPy[i] idxLowestTopTmp=$TOPx[i] endif Rem Afficher la courbe du tableau $TOPy Rem ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀ CourbeTopArray=$TOPy[i] // comment afficher la courbe de valeurs du tableau? next Rem DRAWTEXT : Le plus HAUT/BAS des 15 derniers indices Rem ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀ DRAWVLINE(idxHighestTopTmp) DRAWTEXT("#HighestTopTmp#", idxHighestTopTmp, high[barIndex- idxHighestTopTmp],dialog,bold,20) Rem .. DRAWVLINE(idxLowestTopTmp) DRAWTEXT("#LowestTopTmp#", idxLowestTopTmp, high[barIndex- idxLowestTopTmp],dialog,bold,20) endif return CourbeTopArray as "CourbeTopArray"

  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

  // https://www.prorealcode.com/topic/array-variables-availability-in-prorealtime/ // (please do not remove the link above for future reference) // Example #1: support and resistance example, based on fractals points defparam drawonlastbaronly=true cp=10 Rem LEs Tableaux if high[cp] >= highest[(cp)*2+1](high) then //new fractal high found $TOPy[lastset($TOPy)+1] = high[cp] //store fractal value $TOPx[lastset($TOPx)+1] = barindex[cp] //store fractal barindex endif if low[cp] <= lowest[(cp)*2+1](low)  then //new fractal low found $BOTy[lastset($BOTy)+1] = low[cp] //store fractal value $BOTx[lastset($BOTx)+1] = barindex[cp] //stire fractal barindex endif   Rem Traitement if(islastbarupdate and isset($topy[0]) and isset($boty[0])) then once HighestTopTmp=$TOPy[lastset($TOPy)] once LowestTopTmp=$TOPy[lastset($TOPy)] Rem TOP for i = lastset($TOPy)-15 to lastset($TOPy) do  // Définition de la Periode   Rem Le plus HAUT des 15 derniers indices Rem ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀ if  $TOPy[i]> HighestTopTmp then HighestTopTmp=$TOPy[i] idxHighestTopTmp=$TOPx[i] endif Rem Le plus BAS des 15 derniers indices     // INJECTION Rem ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀ if  $TOPy[i]< LowestTopTmp then LowestTopTmp=$TOPy[i] idxLowestTopTmp=$TOPx[i] endif   Rem Afficher la courbe du tableau $TOPy Rem ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀ CourbeTopArray=$TOPy[i]               //  comment afficher la courbe de valeurs du tableau? next   Rem DRAWTEXT : Le plus HAUT/BAS des 15 derniers indices Rem ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀ DRAWVLINE(idxHighestTopTmp) DRAWTEXT("#HighestTopTmp#", idxHighestTopTmp, high[barIndex- idxHighestTopTmp],dialog,bold,20) Rem .. DRAWVLINE(idxLowestTopTmp) DRAWTEXT("#LowestTopTmp#", idxLowestTopTmp, high[barIndex- idxLowestTopTmp],dialog,bold,20) endif   return  CourbeTopArray as "CourbeTopArray"

   

  

  RicLg

  Participant

  Topics: 25

  Replies: 58

  Been thanked: 6 times
  05/18/2020 at 12:36 PM #132133
  RicLg

  Bonjour,

  je sollicite votre aide car je je  ne réussi pas à résoudre le problème de mon codage. j’ai fais une copie d’écran qui résume la situation.j’essaie de comprendre et de manipuler les données d’un tableau.

  Je vous remercie pour votre aide.

   

  

  RicLg

  Participant

  Topics: 25

  Replies: 58

  Been thanked: 6 times
  05/20/2020 at 9:36 AM #132367
  RicLg

  Bonjour

  S’il vous plait, une petite aide pour mon petit problème. merci

  

  RicLg

  Participant

  Topics: 25

  Replies: 58

  Been thanked: 6 times
  05/20/2020 at 3:48 PM #132435
  Nicolas

  J’ai repris ton dernier code, le problème c’est que tu ne reset jamais le max et le min avant une boucle, sauf à la première itération où ça fonctionne car tu utilises ONCE. Pour mémoire, ONCE ne permet qu’une seule fois de donner une valeur à une variable. En retirant ONCE, les valeurs trouvées restent affichées.

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20828

  Been thanked: 4738 times
  05/20/2020 at 4:42 PM #132452
  RicLg

  Rhaaaa , trop merci  :-).   Je comprends enfin le problème grâce à tes explications. Je vais pouvoir avancer sur l’apprentissage du Array.

  Merci de nouveau Nicolas.

  

  RicLg

  Participant

  Topics: 25

  Replies: 58

  Been thanked: 6 times
• Author
  Posts