|
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
>
>
|