HILBERT TRANSFORM

Typ : Indicator, Name : Hilbert Transform

Inputs: Price((H+L)/2);

Vars: InPhase(0),
Quadrature(0);

If CurrentBar > 5 then begin

Value1 = Price — Price[6];
Value2 =Value1[3];
Value3 =.75*(Value1 — Value1[6]) + .25*(Value1[2] — Value1[4]);
InPhase = .33*Value2 + .67*InPhase[1];
Quadrature = .2*Value3 + .8*Quadrature[1];

Plot1(Inphase, «I»);
Plot2(Quadrature, «Q»);

end;