door Paul M » za 08 maart 2003, 19:35
Hoi Aad,
Functie:
value function zZLTEMA (value xSeries[],value xNumberOfDays) begin
value xTEMA1, xTEMA2, xDif;
xTEMA1 = (3 * XAverage(Close,xNumberOfDays)) -
(3 * XAverage(XAverage(Close,xNumberOfDays),xNumberOfDays)) +
(XAverage(XAverage(XAverage(Close,xNumberOfDays),xNumberOfDays),xNumberOfDays));
xTEMA2 = (3 * XAverage(xTEMA1,xNumberOfDays)) -
(3 * XAverage(XAverage(xTEMA1,xNumberOfDays),xNumberOfDays)) +
(XAverage(XAverage(XAverage(Xtema1,xNumberOfDays),xNumberOfDays),xNumberOfDays));
xDif = xTEMA1-xTEMA2;
zZLTEMA = xTEMA1+xDif;
end;
Indicator:
Value function vZeroLagTema (value xSeries[]=close,value xNumberOfBars=150)begin
Value xZeroLagTema[];
xZeroLagTema :=zZLTEMA(xSeries,xNumberOfBars);
Plot1(xZeroLagTema,'ZeroLagTema');
end;
groetjes Paul