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;