Voici une programmation d’un autre lissage de prix ! J’utilise des tableaux, mais ceux-ci, en proreal code sont difficile à comprendre. Je pense que c’est ma programmation le fond du probleme!

Je n’obtiens pas la même représentation par RETURN $TprixHaut QUE PAR drawsegement DRAWSEGMENT(x1, y1, x2, y2)

J’aurais aimé mettre une image, mais je ne sais comment ajouter une image dans ce forum….

Je ne comprends pas pourquoi $TPRIXhAUT n’affiche que les prix en courbe sur la moitié de la période…

Quelle erreeur de programmation est faite ???

MERCI SI VOUS POUVEZ ME DIRE

DEFPARAM DRAWONLASTBARONLY=true
mmHAUTE=average[1](High )

Periode = 48// variable de période
$Ttemps[barindex] = BarIndex
$Tprix[barindex] = high
$Tprixhaut [barindex] = high
Nb=ROUND((LastSet($Tprix )/ Periode))

For i=Nb downto 0 do
if i>=1 then
for j=0 TO Periode-1 DO
u=i*periode-j
prixInt = ($Tprix[i*periode]-$Tprix[i*periode-periode])/periode
$Tprixhaut[i*periode-j] = $Tprix[i*periode]-j*prixInt
DRAWPOINT($Ttemps[i*periode-j], $Tprixhaut [i*periode-j],1)
x1=$Ttemps[i*periode-j+1]
y1=$Tprixhaut [i*periode-j+1]
x2=$Ttemps[i*periode-j]
y2=$Tprixhaut [i*periode-j]
DRAWSEGMENT(x1, y1, x2, y2)
next
ENDIF
next
For i=LastSet($Tprix ) downto 0 do
//DRAWPOINT($Ttemps[i], $Tprix[i],2) coloured(255,0,255)
//DRAWTEXT("i=#i#", $Ttemps[i], $Tprix[i]+5)coloured(255,0,255)
//v=$Ttemps[i]
//DRAWTEXT("barindex=#v#", $Ttemps[i], $Tprix[i]-25)coloured(255,0,255)
next
RETURN mmHAUTE , $Tprix[barindex], $Tprixhaut[barindex] coloured (250,0,0)

DEFPARAM DRAWONLASTBARONLY=true
mmHAUTE=average[1](High )

Periode = 48// variable de période
$Ttemps[barindex] = BarIndex
$Tprix[barindex] = high
$Tprixhaut [barindex] = high
Nb=ROUND((LastSet($Tprix )/ Periode))

For i=Nb downto 0 do
if i>=1 then
for j=0 TO Periode-1 DO
u=i*periode-j
prixInt = ($Tprix[i*periode]-$Tprix[i*periode-periode])/periode
$Tprixhaut[i*periode-j] = $Tprix[i*periode]-j*prixInt
DRAWPOINT($Ttemps[i*periode-j], $Tprixhaut [i*periode-j],1)
x1=$Ttemps[i*periode-j+1]
y1=$Tprixhaut [i*periode-j+1]
x2=$Ttemps[i*periode-j]
y2=$Tprixhaut [i*periode-j]
DRAWSEGMENT(x1, y1, x2, y2)
next
ENDIF
next
For i=LastSet($Tprix ) downto 0 do
//DRAWPOINT($Ttemps[i], $Tprix[i],2) coloured(255,0,255)
//DRAWTEXT("i=#i#", $Ttemps[i], $Tprix[i]+5)coloured(255,0,255)
//v=$Ttemps[i]
//DRAWTEXT("barindex=#v#", $Ttemps[i], $Tprix[i]-25)coloured(255,0,255)
next
RETURN mmHAUTE , $Tprix[barindex], $Tprixhaut[barindex] coloured (250,0,0)

Bonjour Nicolas et merci de votre intérêt.
Comme l’indique le titre de ce sujet, je cherche un moyen de lisser le signale du prix, pour une utilisation de celui-ci comme indicateur.
Je reconnais que c’est compliquer d’utiliser les tableaux, surtout dans le futur. Mais ils se remplissent d’une information qui donne une variation du prix en fonction du temps. Quand le prix ne varie pas de plus de 0.25 point minute, il ne faut rien faire, et si au contraire cela varie de 10 points par minute, il faut prendre position. Les hauts et les bas deviennent visibles, mais pas forcément en retard.
Le principe est simple, entre une période, il y a le prix A qui est retranché au prix B d’arrivé, et cette différence de prix divisé par le nombre de la période, permet de segmenter la courbe du prix. C’est une forme de moyennage du prix sur une période.

Le problème, c’est que j’affiche bien mes segment (sauf le futur et l’attente de fin de période).
Par contre, en rouge, j’affiche sur une moitié de période le prix, et l’autre moitié de période, j’ai une ligne droite…. Que contient vraiment le tableau $TprixHaut ???
Mon code peut-il s’améliorer ?
Quelle astuce utiliser pour détecter les plus hauts des plus bas, pour avoir une période flottante ? Encore que mon résultat puisse se passer d’exactitude, car parfois j’aurais un signal qui serait un peux en avance….

Capture-1.png