Re: [amibroker] Re: need help conversion, AmiBroker Email List Archive

On Sun, Jan 10, 2010 at 8:22 PM, droskill <droskill@xxxxxxxxx> wrote:

The MTR investor group published the code for this:

/*----------------------------------------------------------
MTR Investors Group - www.MTRIG.com

System: 4% Model discovered by Ned Davis. This is used to determine the direction of the
stock Market. Once you know the direction the go LONG/SHORT an index ETF or your
Favorite stock. This model was made know by Martin Zweig in his book
Winning on Wall Street.

NOTE: This formula is the classic model. To see daily automated results of an enhanced version
of this formula stop by www.MTRIG.com.

How To Use:
1. This system works ONLY with the Value Line Arithmetic Index. In Yahoo! the
symbol is ^VAY. Try to run it on the NASDAQ, SP500, or the DOW the results are poor.
2. Overlay the system to see BUY/SELL indicators on a ^VAY chart.
3. Run a back-test on the ^VAY symbol to test the results.

---------------------------------
Returns: 1/1/1998 to 6/20/2009
Net Risk Adjusted Return: 408.01%
Winners: 45.57%
---------------------------------

----------------------------------------------------------*/
//VC = The Close of the Value Line Arithmetic Index
VC = Foreign("^VAY", "Close");

//Compute the percent change of the VAY week over week.
PCTChange = ((VC - Ref(VC,-5 ) ) / Ref(VC,-5 ) ) * 100;

//Look for 4% changes this week compared to last week.
PCT_B = 4;
PCT_S = 4;
PCT_S = PCT_S * -1;

// BUYS And SELLS
xBuy = PCTChange >= PCT_B;
xSell = PCTChange <= PCT_S;

PlotBuy = ExRem(xBuy ,xSell);
PlotSell = ExRem(xSell ,xBuy );

Buy = (PlotBuy);
Sell = (PlotSell );

Short=Sell;
Cover=Buy;

PlotShapes(shapeUpArrow * PlotBuy , colorGreen, 0,L);
PlotShapes(shapeDownArrow * PlotSell , colorRed, 0,H);

--- In amibroker@xxxxxxxxxxxxxxx, Gautam C Bajaj <gautam108@xxx> wrote:
>
> hi appreciate if you could help convert the attached code to afl
>
> thanks
> gautam
>