Bonjour Nicolas,
Est-il possible d’avoir la version avec les trois couleurs (hausse,range,baisse) de l’indicateur VMA que tu nous propose.
merci.
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
// VMA LB
src= close
l = input(6 , title= "VMA Length" )
std = input(false , title= "Show Trend Direction" )
bc= input(false , title= "Color bars based on Trend" )
k = 1.0 / l
pdm = max ((src - src[ 1 ] ), 0 )
mdm = max ((src[ 1 ] - src), 0 )
pdmS = ((1 - k)* nz(pdmS[ 1 ] ) + k* pdm)
mdmS = ((1 - k)* nz(mdmS[ 1 ] ) + k* mdm)
s = pdmS + mdmS
pdi = pdmS/ s
mdi = mdmS/ s
pdiS = ((1 - k)* nz(pdiS[ 1 ] ) + k* pdi)
mdiS = ((1 - k)* nz(mdiS[ 1 ] ) + k* mdi)
d = abs (pdiS - mdiS)
s1 = pdiS + mdiS
iS = ((1 - k)* nz(iS[ 1 ] ) + k* d/ s1)
hhv = highest (iS, l)
llv = lowest (iS, l)
d1 = hhv - llv
vI = (iS - llv)/ d1
vma = (1 - k* vI)* nz(vma[ 1 ] ) + k* vI* src
vmaC= (vma > vma[ 1 ] ) ?
green : (vma< vma[ 1 ] ) ?
red : (vma= = vma[ 1 ] ) ?
blue : black
plot(vma, color= std ?vmaC:black, linewidth= 3 , title= "VMA" )
barcolor(bc?vmaC:na)
.
