Probleme de code de Distribution des données

• 12/01/2022 at 9:16 AM #205102
  Antoine

  Bonjour à tous les prorealcodeurs,

  Je rencontre actuellement un problème pour effectuer une distribution d’un indicateur stochastic.

  En effet j’ai essayé de mettre en place un code qui charge rapidement les données plutot que de faire un lookback par rapport au temps présent.

  Seulement plusieurs problèmes se posent à moi..

  • Je n’arrive pas à réactualiser à chaque nouvelle Barindex
  • Il y a une erreur dans le comptage des données sur les y

  Est-ce que vous auriez une idée pour que je puisse avancer ?

  Merci par avance.

  Code

  Defparam drawonlastbaronly=true once signal=undefined p = max(1,p) k = max(1,k) indicator = round(stochastic[p,k](close)) IF date >Startdate Then signal=indicator for a = 0 to 100 if signal = a then $perc[a] = $perc[a]+1 count=count+1 maxval=max(maxval,count) If islastbarupdate Then Break endif endif next ENDIF drawtext("#maxval#",barindex,50,sansserif,bold,14) coloured(0,0,258) for b = 0 to 100 texttable=$perc[b] drawrectangle(barindex+5,b,barindex+5+$perc[b],b) coloured(0,255,255) drawtext("#texttable#",barindex+7+$perc[b],b,sansserif,bold,14) coloured(0,0,258) next return 0 coloured(0,0,0,0) as "Line",108 coloured(0,0,0,0) as "Line",signal as "Signal"

  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

  Defparam drawonlastbaronly=true   once signal=undefined p = max(1,p) k = max(1,k) indicator = round(stochastic[p,k](close))     IF date >Startdate Then   signal=indicator     for a = 0 to 100 if signal = a then $perc[a] = $perc[a]+1 count=count+1 maxval=max(maxval,count) If islastbarupdate Then Break endif endif next   ENDIF drawtext("#maxval#",barindex,50,sansserif,bold,14) coloured(0,0,258)   for b = 0 to 100 texttable=$perc[b] drawrectangle(barindex+5,b,barindex+5+$perc[b],b) coloured(0,255,255) drawtext("#texttable#",barindex+7+$perc[b],b,sansserif,bold,14) coloured(0,0,258) next   return 0 coloured(0,0,0,0) as "Line",108 coloured(0,0,0,0) as "Line",signal as "Signal"

   

  

  Antoine

  Participant

  Topics: 17

  Replies: 41

  Been thanked: 2 times
  12/01/2022 at 9:33 AM #205106
  Nicolas

  Selon moi, et si j’ai bien compris ton idée, tu devrais faire comme ceci:
  En lisant l’historique (à partir de startdate) on stocke les valeurs.
  Puis à chaque tick reçu sur la dernière barre, on update le graphique de la distribution. Par contre, ta variable $perc va continuer à s’incrémenter selon la position de la stochastic en temps réel, est-ce souhaitable ?

  Defparam drawonlastbaronly=true startdate=20221120 p=8 k=5 once signal=undefined once p = max(1,p) once k = max(1,k) indicator = round(stochastic[p,k](close)) IF date >Startdate Then signal=indicator for a = 0 to 100 if signal = a then $perc[a] = $perc[a]+1 count=count+1 maxval=max(maxval,count) endif next ENDIF if islastbarupdate then for b = 0 to 100 texttable=$perc[b] drawrectangle(barindex+5,b,barindex+5+$perc[b],b) coloured(0,255,255) drawtext("#texttable#",barindex+7+$perc[b],b,sansserif,bold,14) coloured(0,0,258) next drawtext("#maxval#",barindex,50,sansserif,bold,14) coloured(0,0,258) endif return 0 coloured(0,0,0,0) as "Line",108 coloured(0,0,0,0) as "Line",signal as "Signal",indicator

  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

  Defparam drawonlastbaronly=true   startdate=20221120 p=8 k=5   once signal=undefined once p = max(1,p) once k = max(1,k) indicator = round(stochastic[p,k](close))     IF date >Startdate Then   signal=indicator   for a = 0 to 100 if signal = a then $perc[a] = $perc[a]+1 count=count+1 maxval=max(maxval,count) endif next   ENDIF     if islastbarupdate then for b = 0 to 100 texttable=$perc[b] drawrectangle(barindex+5,b,barindex+5+$perc[b],b) coloured(0,255,255) drawtext("#texttable#",barindex+7+$perc[b],b,sansserif,bold,14) coloured(0,0,258)   next drawtext("#maxval#",barindex,50,sansserif,bold,14) coloured(0,0,258) endif   return 0 coloured(0,0,0,0) as "Line",108 coloured(0,0,0,0) as "Line",signal as "Signal",indicator

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20828

  Been thanked: 4741 times
  12/01/2022 at 9:51 AM #205108
  Antoine

  Bonjour Nicolas,

  Merci pour ton retour.

  Justement non l’incrémentation doit être stoppée ‘est pour ca que j’ai essayé de break à chaque nouvelle barindex , sinon il comptera a chaque fois que le sto touchera un niveau …

  Je souhaiterai que le code se recalcul a chaque fois que l’on a une nouvelle barindex.

  Et je ne sais pas si tu as remarqué mais il y a une erreur sur les rectangles dessinés supérieurs au 50, quelques uns ne se dessinent pas. Je n’arrive pas à comprendre pourquoi ..

  

  Antoine

  Participant

  Topics: 17

  Replies: 41

  Been thanked: 2 times
  12/01/2022 at 11:21 AM #205111
  Nicolas

  Dans cette version j’introduit une variable $lastbar qui permet de tester si on a déjà récupéré les infos sur ce chandelier ou non.

  Pour les valeurs qui ne s’affichent pas, c’est uniquement car les valeurs ne sont pas renseignés dans le tableau $perc (à cause de l’arrondi sans doute) et du coup renvoi un N/A et tu utilises cette info dans tes coordonnées, j’ai modifié ce comportement.

  Defparam drawonlastbaronly=true startdate=20221120 p=8 k=5 once signal=undefined once p = max(1,p) once k = max(1,k) indicator = round(stochastic[p,k](close)) IF date >Startdate and barindex<>$lastbar[0] Then $lastbar[0]=barindex signal=indicator for a = 0 to 100 if signal = a then $perc[a] = $perc[a]+1 count=count+1 maxval=max(maxval,count) endif next ENDIF if islastbarupdate then for b = 0 to 100 texttable=$perc[b] if $perc[b]>0 then drawrectangle(barindex+5,b,barindex+5+$perc[b],b) coloured(0,255,255) drawtext("#texttable#",barindex+7+$perc[b],b,sansserif,bold,14) coloured(0,0,258) else drawtext("#texttable#",barindex+7,b,sansserif,bold,14) coloured(0,0,258) endif next drawtext("#maxval#",barindex,50,sansserif,bold,14) coloured(0,0,258) endif return 0 coloured(0,0,0,0) as "Line",108 coloured(0,0,0,0) as "Line",signal as "Signal",indicator

  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

  Defparam drawonlastbaronly=true   startdate=20221120 p=8 k=5   once signal=undefined once p = max(1,p) once k = max(1,k) indicator = round(stochastic[p,k](close))     IF date >Startdate and barindex<>$lastbar[0] Then   $lastbar[0]=barindex signal=indicator   for a = 0 to 100 if signal = a then $perc[a] = $perc[a]+1 count=count+1 maxval=max(maxval,count) endif next   ENDIF     if islastbarupdate then for b = 0 to 100 texttable=$perc[b] if $perc[b]>0 then drawrectangle(barindex+5,b,barindex+5+$perc[b],b) coloured(0,255,255) drawtext("#texttable#",barindex+7+$perc[b],b,sansserif,bold,14) coloured(0,0,258) else drawtext("#texttable#",barindex+7,b,sansserif,bold,14) coloured(0,0,258) endif next drawtext("#maxval#",barindex,50,sansserif,bold,14) coloured(0,0,258) endif   return 0 coloured(0,0,0,0) as "Line",108 coloured(0,0,0,0) as "Line",signal as "Signal",indicator

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20828

  Been thanked: 4741 times
  12/01/2022 at 1:17 PM #205125
  Antoine

  Merci pour ton aide ! J’aurais pu chercher encore longtemps ^^

  J’avais une petite idée en parallèle que j’aimerai essayer (ne me donne pas la solution).

  Nous avons l’habitude de travailler sur le close de différents indicateurs. Et je me suis demandé si je pouvais capturer le passage des hauts/bas de chaque points de stochastic sur des périodes courantes.

  Mes questions sont les suivantes :

  • est ce que je dois utiliser deux tables distincites haut et bas.
  • ou alors est ce que je peux utiliser les fonctions high et low ?
  • et est ce que au chargement du programme, le code peut il récupérer les mouvements haut et bas qui se sont produits ?

  Bien à toi

  

  Antoine

  Participant

  Topics: 17

  Replies: 41

  Been thanked: 2 times
  12/01/2022 at 1:39 PM #205128
  Antoine

  Pour l’histoire de l’arrondi ce qui est bizarre c’est que le signal qui est retourné il est arrondi correctement.

  Et que lorsque tu essayes de les intérger dans la table ils ne sont pas présents.

  J’ai entouré en bleu les anomalies

  

  Antoine

  Participant

  Topics: 17

  Replies: 41

  Been thanked: 2 times
  12/01/2022 at 4:57 PM #205132
  Nicolas

  Antoine wrote:

  Pour l’histoire de l’arrondi ce qui est bizarre c’est que le signal qui est retourné il est arrondi correctement.

  Oui mais puisque tu testes un seuil de la stochastic précis, il est possible que ce seuil ne soit jamais présent, si tu testes 55 et que la stochastique passe de 50 à 60 sans s’arrêter sur 55 (à fin de bougie), tu n’auras pas de comptage.

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20828

  Been thanked: 4741 times
  12/01/2022 at 9:48 PM #205152
  Antoine

  Sur le principe je suis d’accord avec toi, seulement le signal renvoyé est close est donc logiquement je devrais le capturer sur le niveau en question .. Quelque chose m’échappe

  Le moyen que j’aurais pour vérifier se serait de controler mon maxval en comptant manuellement l’ensemble des closes.

  

  Antoine

  Participant

  Topics: 17

  Replies: 41

  Been thanked: 2 times
  12/02/2022 at 9:25 AM #205157
  Nicolas

  Puisque tu testes un niveau exact:

  signal = a

  Il faut impérativement que la stochastique soit strictement égale à 1,2,3,4,5,6,.ou..100 lors d’une clôture.

  Si cela n’est pas vérifié sur les X dernières bougies, alors on n’incrémente pas.

  L’idéal c’est de le vérifier à la main. Sur la copie d’écran jointe, on voit bien que la sto n’a jamais été fixé tout en haut (au dessus de 90), donc pas de comptage.

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20828

  Been thanked: 4741 times
  12/06/2022 at 10:40 PM #205327
  Antoine

  Bonsoir Nicolas,

  Désoler de la réponse tardive.

  Pour moi il y a toujours un petit problème.

  J’ai comparé mon maxval par rapport à la somme des “texttable” (compté manuellement) et je ne trouve pas la même valeur alors que le maxval est juste par rapport à sa date d’activation.

  Lorsque j’ai compté manuellement j’ai eu un écart de presque 10 données.

   

  

  Antoine

  Participant

  Topics: 17

  Replies: 41

  Been thanked: 2 times
  12/07/2022 at 9:36 AM #205334
  JC_Bywan

  Bonjour Antoine,

  Parmi les façons de résoudre ceci, j’ai pris la moins élégante et la plus intéressante à la fois, car permet d’écrire un exemple d’usage d’isset:

  Defparam drawonlastbaronly=true startdate=20221120 p=8 k=5 once signal=undefined once p = max(1,p) once k = max(1,k) indicator = round(stochastic[p,k](close)) IF date >Startdate and barindex<>$lastbar[0] Then $lastbar[0]=barindex signal=indicator for a = 0 to 100 if not(isset($perc[a])) then $perc[a] = 0 endif if signal = a then $perc[a] = $perc[a]+1 count=count+1 maxval=max(maxval,count) endif next ENDIF if islastbarupdate then for b = 0 to 100 texttable=$perc[b] if $perc[b]>0 then drawrectangle(barindex+5,b,barindex+5+$perc[b],b) coloured(0,255,255) drawtext("#texttable#",barindex+7+$perc[b],b,sansserif,bold,14) coloured(0,0,258) else drawtext("#texttable#",barindex+7,b,sansserif,bold,14) coloured(0,0,258) endif next drawtext("#maxval#",barindex,50,sansserif,bold,14) coloured(0,0,258) endif return 0 coloured(0,0,0,0) as "Line",108 coloured(0,0,0,0) as "Line",signal as "Signal",indicator

  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

  Defparam drawonlastbaronly=true startdate=20221120 p=8 k=5 once signal=undefined once p = max(1,p) once k = max(1,k) indicator = round(stochastic[p,k](close)) IF date >Startdate and barindex<>$lastbar[0] Then $lastbar[0]=barindex signal=indicator for a = 0 to 100 if not(isset($perc[a])) then $perc[a] = 0 endif if signal = a then $perc[a] = $perc[a]+1 count=count+1 maxval=max(maxval,count) endif next ENDIF if islastbarupdate then for b = 0 to 100 texttable=$perc[b] if $perc[b]>0 then drawrectangle(barindex+5,b,barindex+5+$perc[b],b) coloured(0,255,255) drawtext("#texttable#",barindex+7+$perc[b],b,sansserif,bold,14) coloured(0,0,258) else drawtext("#texttable#",barindex+7,b,sansserif,bold,14) coloured(0,0,258) endif next drawtext("#maxval#",barindex,50,sansserif,bold,14) coloured(0,0,258) endif return 0 coloured(0,0,0,0) as "Line",108 coloured(0,0,0,0) as "Line",signal as "Signal",indicator

  2 users thanked author for this post.

  Nicolas, Antoine

  

  JC_Bywan

  Moderator

  Topics: 20

  Replies: 2546

  Been thanked: 838 times
  12/07/2022 at 10:29 AM #205339
  robertogozzi

  @Antoine .. Veuillez NE PAS inclure d’images et de fichiers dans le texte, car cela ralentira le chargement de la page. Utilisez le bouton « Select File » pour les pièces jointes. Merci 🙂

  2 users thanked author for this post.

  Antoine, JC_Bywan

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 16469

  Been thanked: 3643 times
  12/07/2022 at 7:06 PM #205359
  Antoine

  Bonjour JC,

  Merci pour ta réponse.

  Est ce que tu peux expliquer un peu plus la condition que tu viens d’ajouter ?

   

   

  

  Antoine

  Participant

  Topics: 17

  Replies: 41

  Been thanked: 2 times
  12/07/2022 at 9:42 PM #205366
  JC_Bywan

  Elle force la définition quel que soit le rang, afin d’empêcher d’avoir des valeurs non définies qui se réinjectent en elles-mêmes (plus de détails dans nos échanges par email si besoin).

  1 user thanked author for this post.

  Antoine

  

  JC_Bywan

  Moderator

  Topics: 20

  Replies: 2546

  Been thanked: 838 times
• Author
  Posts