[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Easy language to MS translation HELP



PureBytes Links

Trading Reference Links

I will help you, but you will have to do the MS coding.

Step 1: compute the efficiency ratio.

dif = @AbsValue(price - price[1])

This means 'dif' equals the absolute value of 'price' minus the prior
'price'.  Let's assume 'price' is 'close' so create a MS statement to
compute that.

signal = @AbsValue(price - price[period])

This means 'signal' equals the absolute value of 'price' minus 'price N bars
ago'.  Again, assume 'price' is 'close' and 'N' should be an input into the
equation.  Let's assume N = 10.  Create an MS statement for that.

noise = @summation(dif,period)

Simple enough: add up the value of 'dif' over the last N bars.

efratio = signal / noise

Again, self-explanatory.  This is the Kaufman Efficiency Ratio which is used
as an input into the Kaufman Adaptive Moving Average which we will compute
next.  Show me a plot of the Efficiency Ratio in Metastock and we will
proceed to the next step.

Kent


-----Original Message-----
From: Michel Amelinckx <Michel.Amelinckx@xxxxxxxxxx>
To: metastock@xxxxxxxxxxxxx <metastock@xxxxxxxxxxxxx>
Date: Monday, November 27, 2000 11:25 AM
Subject: RE: Easy language to MS translation HELP


John, apart the excitement about my E-mail format there was no reply.  I
guess there's no one here who is mastering Easy Language AND MS Language.
Maybe I should try a Tradestation user group, although I don't know any.

ONE last cry for help, is there anyone who is willing to help me translate
an Easy language code in MS.

I thank you in advance

> -----Original Message-----
> From: owner-metastock@xxxxxxxxxxxxx
> [mailto:owner-metastock@xxxxxxxxxxxxx]On Behalf Of jhmtn
> Sent: maandag 27 november 2000 9:44
> To: metastock@xxxxxxxxxxxxx
> Subject: Re: Easy language to MS translation HELP
>
>
> GlacierMichel,
>
> Did someone post the solution to your question ????
>
> If so, I missed it and would like to see in
> Metastock functions what this Easy Language
> code looks like.  It seems to be the "Adaptive
> Bollinger Band" idicator.
>
> Thanks, ............. John
>
> ----- Original Message -----
> From: Michel Amelinckx
> To: metastock@xxxxxxxxxxxxx
> Sent: Friday, November 24, 2000 5:37 PM
> Subject: RE: Easy language to MS translation HELP
>
>
> Thanks for the help!!!
> -----Original Message-----
> From: owner-metastock@xxxxxxxxxxxxx
> [mailto:owner-metastock@xxxxxxxxxxxxx]On
> Behalf Of Michel Amelinckx
> Sent: donderdag 23 november 2000 0:50
> To: Metastock User List (E-mail)
> Subject: Easy language to MS translation HELP
>
>
> Hello,
> Is there someone who is willing to help me to translate this
> system coded in
> easy language to MS.  Many THANKS in advance
>
>
> }
> inputs:BBLength(38),BBStdDev(3),
> BBHPrice(ADAPTIVE(H,10)),BBLPrice(ADAPTIVE(L,10));
>
> vars:BBH(0),BBL(0);
>
> BBH=BollingerBand(BBHPrice,BBLength,BBStdDev);
> BBL=BollingerBand(BBLPrice,BBLength,-BBStdDev);
>
> if c >bbh then buy;
> if c<bbl then sell;
>
> {
> P.S. The adaptive function part is Perry Kaufmans:
> }
> inputs:price(numericseries),period(numericsimple);
>
> vars: noise(0),signal(0),dif(0),efratio(0),
>        smooth(1),fastend(.666),slowend(.0645),am(0);
>
> {CALCULATE EFFICIENCY RATIO}
> dif=@xxxxxxxx(price - price[1]);
> if(currentbar <= period) then am =price;
> if(currentbar > period)then begin
>         signal = @AbsValue(price - price[period]);
>         noise = @summation(dif,period);
>         efratio = signal/noise;
>         smooth = @Power(efratio*(fastend - slowend) + slowend,2);
>
> {ADAPTIVE MOVING AVERAGE}
>        am = am[1] + smooth*(price - am[1]);
>      Adaptive=am;
>         end;
> Greeting
>
> Mickey
>
>