Ajoutez ces lignes juste AVANT return:

IF moyMinecartsUp < deltamoyUp THEN
   DrawText("●",BarIndex,high + range) coloured("Green")
ENDIF
   IF moyMinecartsDn > deltamoyDn THEN
DrawText("●",BarIndex,low - range) coloured("Red")
ENDIF

Placez l’indicateur à la fois SOUS le graphique (comme le RSI, par exemple) et SUR le graphique des prix (comme les moyennes mobiles).

Veuillez utiliser au moins 2K+ unités (barres).Veuillez utiliser au moins 2K+ unités (barres).

Vous constaterez que les signaux que vous recherchez sont rares et concentrés sur une courte période.

x-1.jpg

Voilà le screener :

///////Parameters
Len = 100
P  = 150
z1 = linearregression[Len](high)
z2 = linearregression[Len](low)
z2s = -std[Len](low) + z2
z1s = std[Len](high) + z1
M  = (z2s + z1s) / 2
Delta = abs(z2s - z1s)
Deltam = abs(z2s - z1s)
RLUp = M > M[1]
RLDn = M < M[1]
if RLUp then
Delta = Delta
endif
if RLDn then
Delta = -Delta
endif
deltamoyup = average[150](Deltam)
deltamoydn = average[150](-Deltam)
// Écart entre les deux moyennes
ecart = deltamoyup - deltamoydn
// 1er minimum : fonction native lowest
min1 = lowest[P](ecart)
// 2e minimum : plus petit écart strictement > min1
min2 = 999999999
j = 0
WHILE j < P DO
val = ecart[j]
if val > min1 AND val < min2 then
min2 = val
endif
j = j + 1
WEND
// 3e minimum : plus petit écart strictement > min2
min3 = 999999999
k = 0
WHILE k < P DO
val = ecart[k]
if val > min2 AND val < min3 then
min3 = val
endif
k = k + 1
WEND
// Moyenne des 3 → ligne horizontale
moyMinEcartsUP = (min1 + min2 + min3) / 3
moyMinEcartsDN = -(min1 + min2 + min3) / 3

monSignal = 0
IF moyMinecartsUp < deltamoyUp THEN
monSignal = 1
//DrawText("●",BarIndex,high + range) coloured("Green")
ENDIF
IF moyMinecartsDn > deltamoyDn THEN
monSignal = 2
//DrawText("●",BarIndex,low - range) coloured("Red")
ENDIF
SCREENER[monSignal](monSignal AS "1=UP, 2=DOWN")

Je joins une photo de mon graphique et du fichier ITF.

MonScreener.itf x-3.jpg