DIGITAL STOCHASTIC

Voici le code Prorealtime du digital stochastic de Philip Kahler.

///////////////digital stochastic

c1 = highest[5](high)

c2 = lowest[5](low)

fastk = ((close - c2) / (c1 - c2) ) * 100


slowk = average[3](fastk)

// slowd = average[3](slowk)


if (22* slowk + 8* fastk) / 30 > 50 THEN

sum = 1
else
sum= -1
endif

d1 = exponentialaverage[5](sum)

if d1 > d1[1] then
e=d1
f=1
endif

if d1<d1[1]then
e=d1
f=-1
endif


return e coloured by f as "digitale stochastic"


ci-dessous l'indicateur en histogramme et ligne