MT4 indicators - TheRumpledOne

[Dyna.Mo]

Wow, TRO , you're still about!

I remember getting a bunch of your indicators a couple of years back.

Incidentally, a couple of posts above here, there is a BB multi meter.
Is that one still around and working for new MT4 build?

Mo

 

[TheRumpledOne]

Do you do requests? I have an idea for an indicator/EA for a strategy which has proved profitable being manually traded, automation or even just an alert to a potential trade set-up would allow more pairs to be monitored and save a lot of flicking back and forth between charts and time frames

Interested?

Yes, I sometimes do requests. I don't code EAs.

 

[TheRumpledOne]

Wow, TRO , you're still about!

I remember getting a bunch of your indicators a couple of years back.

Incidentally, a couple of posts above here, there is a BB multi meter.
Is that one still around and working for new MT4 build?

Mo

I think I upgraded it to Build 600.

 

[TheRumpledOne]

Here is the Easy Language code from Ehlers latest book Cycle Analytics for Traders

{
Hilbert Transformer Indicator
© 2013 John F. Ehlers
}
Inputs:
LPPeriod(20);
Vars:
alpha1(0),
HP(0),
a1(0),
b1(0),
c1(0),
c2(0),
c3(0),
Filt(0),
QFilt(0),
Real(0),
Quadrature(0),
IPeak(0),
QPeak(0),
Imag(0);

//Highpass filter cyclic components whose periods are
shorter than 48 bars
alpha1 = (Cosine(.707*360 / 48) + Sine (.707*360 / 48) - 1) /
Cosine(.707*360 / 48);
HP = (1 - alpha1 / 2)*(1 - alpha1 / 2)*(Close - 2*Close[1] +
Close[2]) + 2*(1 - alpha1)*HP[1] - (1 - alpha1)*
(1 - alpha1)*HP[2];
//Smooth with a Super Smoother Filter from equation 3-3
a1 = expvalue(-1.414*3.14159 / LPPeriod);
b1 = 2*a1*Cosine(1.414*180 / LPPeriod);
c2 = b1;
c3 = -a1*a1;
c1 = 1 - c2 - c3;
Filt = c1*(HP + HP[1]) / 2 + c2*Filt[1] + c3*Filt[2];
IPeak = .991*IPeak[1];
If Absvalue(Filt) > IPeak Then IPeak = AbsValue(Filt);
Real = Filt / IPeak;
Quadrature = (Real - Real[1]);
QPeak = .991*QPeak[1];
If Absvalue(Quadrature) > QPeak Then QPeak =
AbsValue(Quadrature);
Quadrature = Quadrature /QPeak;
a1 = expvalue(-1.414*3.14159 / 10);
b1 = 2*a1*Cosine(1.414*180 / 10);
c2 = b1;
c3 = -a1*a1;
c1 = 1 - c2 - c3;
Imag = c1*(Quadrature + Quadrature[1]) / 2 + c2*Imag[1] +
c3*Imag[2];
Plot1(Real);
Plot2(0);
Plot6(Imag);

I will see what I can do...