Renvoi d’information inexacte

This topic has 9 replies, 4 voices, and was last updated 3 weeks ago by Pascal 44.

Viewing 10 posts - 1 through 10 (of 10 total)

08/19/2025 at 4:21 PM #249875

Pascal 44

Bonjour,

J’ai deux scripts identiques :

• l’un cherche un “Plus haut” et retourne des résultats exacts… avec l’instruction “HAUTindex = BarsSince(High=HAUTcours)”

• l’autre cherche un “plus bas” et renvoie des résultats erronés… avec l’instruction “BASindex = BarsSince(Low=BAScours)”

Après avoir lu beaucoup de posts sur le forum, je ne n’ai pas trouvé comment corriger cette erreur.

Merci pour votre aide éventuelle.

XXXXXXXXXXXXXXXX

Voici le script…

Pascal 44

Participant

Topics: 2

Replies: 6

Been thanked: 2 times

08/19/2025 at 4:55 PM #249877

robertogozzi

Comme indiqué dans l’encadré JAUNE ci-dessous :

N’incluez pas d’informations personnelles telles que des adresses e-mail ou des numéros de téléphone dans vos messages.

Merci 🙂

robertogozzi

Moderator

Topics: 69

Replies: 17832

Been thanked: 4467 times

08/19/2025 at 6:03 PM #249881

robertogozzi

J’ai également remarqué des données incorrectes. Je vais essayer d’en savoir plus et je vous tiendrai au courant.

robertogozzi

Moderator

Topics: 69

Replies: 17832

Been thanked: 4467 times

08/19/2025 at 6:42 PM #249886

Pascal 44

Merci pour votre réactivité
À bientôt

Pascal 44

Participant

Topics: 2

Replies: 6

Been thanked: 2 times

08/20/2025 at 7:57 AM #249895

Iván

Bonjour. Je trouve ton code correct. Si je ne me trompe pas, ce que tu cherches, c’est la valeur la plus basse des 60 dernières bougies et quand elle s’est produite, n’est-ce pas ?
Dans ce cas, tu devrais utiliser une boucle plus appropriée.
Avec ton code actuel, tu demandes à localiser la bougie où low = lowest[60](low). Comme tu peux le voir sur la capture d’écran, cela a pu se produire il y a plus de 60 périodes, même si ta ligne des plus bas est bien sur 60 périodes.
Pour les plus hauts, c’est exactement la même chose, sauf qu’il faut chercher une configuration baissière pour le remarquer. Je te mets un exemple avec TSLA pour que tu voies que cela ne correspond pas non plus.

Si ce que tu cherches, ce sont les bougies qui ont donné les valeurs maximales et minimales des 60 dernières bougies, alors tu devrais utiliser le code suivant pour ne pas te tromper.

DefParam DrawOnLastBarOnly = true

Periode = 60
atr = AverageTrueRange[14](close)

// +Haut
HAUTcours = Highest[Periode](High)
HAUTindex = 0
FOR i = 0 TO Periode - 1 DO
   IF High[i] = HAUTcours THEN
      HAUTindex = i
      BREAK
   ENDIF
NEXT

IF HAUTindex > 0 THEN
   DrawText("#HAUTcours#", BarIndex[HAUTindex], HAUTcours + 3*atr) Coloured(255, 0, 0)
   DrawText("#HAUTindex#", BarIndex[HAUTindex], HAUTcours + 2*atr) Coloured(255, 0, 0)
   DrawArrowDown(BarIndex[HAUTindex], HAUTcours + 0.15 * atr) Coloured(255, 0, 0)
ENDIF

// +Bas
BAScours = Lowest[Periode](Low)
BASindex = 0
FOR i = 0 TO Periode - 1 DO
   IF Low[i] = BAScours THEN
      BASindex = i
      BREAK
   ENDIF
NEXT

IF BASindex > 0 THEN
   DrawText("#BAScours#", BarIndex[BASindex], BAScours - 3*atr) Coloured(0, 128, 0)
   DrawText("#BASindex#", BarIndex[BASindex], BAScours - 2*atr) Coloured(0, 128, 0)
   DrawArrowUp(BarIndex[BASindex], BAScours - 0.15*atr) Coloured(0, 128, 0)
ENDIF


RETURN close

DefParam DrawOnLastBarOnly = true

Periode = 60

atr = AverageTrueRange[14](close)

// +Haut

HAUTcours = Highest[Periode](High)

HAUTindex = 0

FOR i = 0 TO Periode - 1 DO

IF High[i] = HAUTcours THEN

HAUTindex = i

BREAK

ENDIF

IF HAUTindex > 0 THEN

DrawText("#HAUTcours#", BarIndex[HAUTindex], HAUTcours + 3*atr) Coloured(255, 0, 0)

DrawText("#HAUTindex#", BarIndex[HAUTindex], HAUTcours + 2*atr) Coloured(255, 0, 0)

DrawArrowDown(BarIndex[HAUTindex], HAUTcours + 0.15 * atr) Coloured(255, 0, 0)

ENDIF

// +Bas

BAScours = Lowest[Periode](Low)

BASindex = 0

FOR i = 0 TO Periode - 1 DO

IF Low[i] = BAScours THEN

BASindex = i

BREAK

ENDIF

IF BASindex > 0 THEN

DrawText("#BAScours#", BarIndex[BASindex], BAScours - 3*atr) Coloured(0, 128, 0)

DrawText("#BASindex#", BarIndex[BASindex], BAScours - 2*atr) Coloured(0, 128, 0)

DrawArrowUp(BarIndex[BASindex], BAScours - 0.15*atr) Coloured(0, 128, 0)

ENDIF

RETURN close

Iván

Moderator

Topics: 0

Replies: 1740

Been thanked: 730 times

08/20/2025 at 8:40 AM #249902

Nicolas

Voici une autre version qui n’utilise ni Barssince, ni de boucles:

DefParam DrawOnLastBarOnly = true

Periode = 60
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
// Le +HAUT sur une période (par exemple 2h)...

HAUTcours = Highest[Periode](High) 
if HAUTcours<>Hautcours[1] or HAUTcours=Hautcours[1] then 
hautindex=barindex  
endif                                                    
If HAUTindex > 0 then                                                                     
DrawText("#HAUTcours#", HAUTindex,HAUTcours+3) Coloured(255,0,0)              // • Ecrire le cours de ce +Haut
DrawText("#HAUTindex#", HAUTindex,HAUTcours+2) Coloured(255,0,0)              // • Ecrire le cours de ce +Haut
DrawArrowDown(HAUTindex, HAUTcours+1) Coloured(255,0,0)                       // • Dessiner une flèche ROUGE au DESSUS
Endif

// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
// Le +BAS sur une période (par exemple 2h)...

BAScours = Lowest[Periode](Low) 
if bascours<>bascours[1] or bascours=bascours[1] then    
basindex=barindex                                                        
endif                                                         
If BASindex > 0 then                                                                
DrawText("#BAScours#", BASindex,BAScours-3) Coloured(0,128,0)                    // • Ecrire le cours de ce +Bas
DrawText("#BASindex#", BASindex,BAScours-2) Coloured(0,128,0)                   // • Ecrire le cours de ce +Bas
DrawArrowUp(BASindex, BAScours-1) Coloured(0,128,0)                             // • Dessiner une flèche VERTE au DESSOUS
Endif
// =================================================================================================================================================================

RETURN

DefParam DrawOnLastBarOnly = true

Periode = 60

// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

// Le +HAUT sur une période (par exemple 2h)...

HAUTcours = Highest[Periode](High)

if HAUTcours<>Hautcours[1] or HAUTcours=Hautcours[1] then

hautindex=barindex

endif

If HAUTindex > 0 then

DrawText("#HAUTcours#", HAUTindex,HAUTcours+3) Coloured(255,0,0) // • Ecrire le cours de ce +Haut

DrawText("#HAUTindex#", HAUTindex,HAUTcours+2) Coloured(255,0,0) // • Ecrire le cours de ce +Haut

DrawArrowDown(HAUTindex, HAUTcours+1) Coloured(255,0,0) // • Dessiner une flèche ROUGE au DESSUS

Endif

// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

// Le +BAS sur une période (par exemple 2h)...

BAScours = Lowest[Periode](Low)

if bascours<>bascours[1] or bascours=bascours[1] then

basindex=barindex

endif

If BASindex > 0 then

DrawText("#BAScours#", BASindex,BAScours-3) Coloured(0,128,0) // • Ecrire le cours de ce +Bas

DrawText("#BASindex#", BASindex,BAScours-2) Coloured(0,128,0) // • Ecrire le cours de ce +Bas

DrawArrowUp(BASindex, BAScours-1) Coloured(0,128,0) // • Dessiner une flèche VERTE au DESSOUS

Endif

// =================================================================================================================================================================

RETURN

Nicolas

Keymaster

Topics: 81

Replies: 20885

Been thanked: 4826 times

08/20/2025 at 9:00 AM #249906

Nicolas

Après une analyse plus approfondie 🙂 voir mon image jointe pour commencer !

BarsSince ne répond pas à la question “où se trouve l’extrême dans ma fenêtre de 60 bougies ?”, mais à “à quand remonte la dernière fois où ce prix précis est apparu”.
Du coup, quand le nouveau Lowest des 60 dernières bougies est égal à un creux plus ancien, BarsSince peut retourner 93 (ou tout autre nombre > 60), alors que l’extrême de la fenêtre courante est… dans la fenêtre !

Ton premier code est donc correct pour dater la dernière occurrence d’un prix, mais pas adapté à ce que tu veux faire ici (pointer l’extrême dans la période).
Pour ça, il faut utiliser HighestBars / LowestBars qui renvoient l’offset (0…Période-1) de l’extrême à l’intérieur de la fenêtre.

Voir: https://www.prorealcode.com/documentation/highestbars/

Selon moi, voici le code adapté :

DefParam DrawOnLastBarOnly = true

Periode = 60

if barindex>periode then 
// +HAUT sur la période
hautBars  = HighestBars[Periode](High)        // offset de l'extrême dans la fenêtre (0..Periode-1)
hautPrix  = High[hautBars]

if hautBars >= 0 then
DrawText("#HAUTprix#", BarIndex[hautBars], hautPrix+3) Coloured(255,0,0)
DrawText("#hautBars#", BarIndex[hautBars], hautPrix+2) Coloured(255,0,0)
DrawArrowDown(BarIndex[hautBars], hautPrix+1) Coloured(255,0,0)
endif

// +BAS sur la période
basBars   = LowestBars[Periode](Low)          // offset de l'extrême dans la fenêtre (0..Periode-1)
basPrix   = Low[basBars]

if basBars >= 0 then
DrawText("#BASprix#", BarIndex[basBars], basPrix-3) Coloured(0,128,0)
DrawText("#basBars#", BarIndex[basBars], basPrix-2) Coloured(0,128,0)
DrawArrowUp(BarIndex[basBars], basPrix-1) Coloured(0,128,0)
endif
endif 

RETURN

DefParam DrawOnLastBarOnly = true

Periode = 60

if barindex>periode then

// +HAUT sur la période

hautBars = HighestBars[Periode](High) // offset de l'extrême dans la fenêtre (0..Periode-1)

hautPrix = High[hautBars]

if hautBars >= 0 then

DrawText("#HAUTprix#", BarIndex[hautBars], hautPrix+3) Coloured(255,0,0)

DrawText("#hautBars#", BarIndex[hautBars], hautPrix+2) Coloured(255,0,0)

DrawArrowDown(BarIndex[hautBars], hautPrix+1) Coloured(255,0,0)

endif

// +BAS sur la période

basBars = LowestBars[Periode](Low) // offset de l'extrême dans la fenêtre (0..Periode-1)

basPrix = Low[basBars]

if basBars >= 0 then

DrawText("#BASprix#", BarIndex[basBars], basPrix-3) Coloured(0,128,0)

DrawText("#basBars#", BarIndex[basBars], basPrix-2) Coloured(0,128,0)

DrawArrowUp(BarIndex[basBars], basPrix-1) Coloured(0,128,0)

endif

RETURN

2 users thanked author for this post.

robertogozzi,

Iván

Nicolas

Keymaster

Topics: 81

Replies: 20885

Been thanked: 4826 times

08/20/2025 at 9:44 AM #249908

Pascal 44

Bonjour Nicolas,
Ce matin, le code fonctionne, avec effectivement une bougie de plus haut au delà des 60 .

Toutes tes informations apportent de l’eau à mon moulin.
Comme je ne suis pas informaticien… Je vais les étudier pas à pas pour une bonne compréhension.
Et je vais donc pouvoir améliorer et poursuivre mon idée de trading.

Je te remercie pour ton aide et ta rapidité de réponse.
Pascal

Pascal 44

Participant

Topics: 2

Replies: 6

Been thanked: 2 times

08/20/2025 at 10:09 AM #249909

Pascal 44

Merci également à Ivan et Roberto

2 users thanked author for this post.

Iván,

robertogozzi

Pascal 44

Participant

Topics: 2

Replies: 6

Been thanked: 2 times

08/21/2025 at 12:36 AM #249931

Pascal 44

Bonjour messieurs,
J’ai bien étudié vos propositions et je vous remercie de m’avoir fait progresser.

Une question à Nicolas :

L’instruction conditionnelle “if barindex>periode then” qui encadre tout le code m’interpelle.
C’est une condition qui me semblait sans intérêt, puisqu’elle est toujours vraie.

Pourtant, si je la supprime, j’ai un message d’erreur.
Cette instruction est magique, elle évite le message d’erreur…
Je n’ai pas compris pourquoi ce miracle ? Si tu as une minute,
pourrais-tu me donner une idée de ce qui se passe avec ce test “if barindex>periode then” ?
Je t’en remercie d’avance
Pascal

Pascal 44

Participant

Topics: 2

Replies: 6

Been thanked: 2 times

Author

Posts

Viewing 10 posts - 1 through 10 (of 10 total)

Find exclusive trading pro-tools on