EMA Crossover - Metatrader to Amibroker

aggy

Active Member
#1
Can anyone please convert this metatrader code to amibroker afl.

Thanks in advance

//+------------------------------------------------------------------+
//| EMA-Crossover_Signal.mq4 |
//| Copyright 2005, Jason Robinson (jnrtrading) |
//| http://www.jnrtading.co.uk |
//+------------------------------------------------------------------+

/*
+------------------------------------------------------------------+
| Allows you to enter two ema periods and it will then show you at |
| Which point they crossed over. It is more usful on the shorter |
| periods that get obscured by the bars / candlesticks and when |
| the zoom level is out. Also allows you then to remove the emas |
| from the chart. (emas are initially set at 5 and 6) |
+------------------------------------------------------------------+
*/
#property copyright "Copyright 2005, Jason Robinson (jnrtrading)"
#property link "http://www.jnrtrading.co.uk"

#property indicator_chart_window
#property indicator_buffers 2
#property indicator_color1 Blue
#property indicator_color2 Red
#property indicator_width1 2
#property indicator_width2 2

double CrossUp[];
double CrossDown[];
extern int FasterMA = 5;
extern int FasterMode = 1; // 0 = sma, 1 = ema, 2 = smma, 3 = lwma
extern int MediumMA = 10;
extern int MediumMode = 1; // 0 = sma, 1 = ema, 2 = smma, 3 = lwma
extern int SlowerMA = 34;
extern int SlowerMode = 1; // 0 = sma, 1 = ema, 2 = smma, 3 = lwma

double Range, AvgRange;
double fasterMAnow, fasterMAprevious;
double mediumMAnow, mediumMAprevious;
double slowerMAnow, slowerMAprevious;
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
//---- indicators
SetIndexStyle(0, DRAW_ARROW, EMPTY,2);
SetIndexArrow(0, 233);
SetIndexBuffer(0, CrossUp);
SetIndexEmptyValue(0,0.0);
SetIndexStyle(1, DRAW_ARROW, EMPTY,2);
SetIndexArrow(1, 234);
SetIndexBuffer(1, CrossDown);
SetIndexEmptyValue(1,0.0);
//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
//----

//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start() {
int limit, i, counter;
int counted_bars=IndicatorCounted();
//---- check for possible errors
if(counted_bars<0) return(-1);
//---- last counted bar will be recounted
if(counted_bars>0) counted_bars--;

limit=Bars-counted_bars;

for(i = 0; i <= limit; i++) {

counter=i;
Range=0;
AvgRange=0;
for (counter=i ;counter<=i+9;counter++)
{
AvgRange=AvgRange+MathAbs(High[counter]-Low[counter]);
}
Range=AvgRange/10;

fasterMAnow = iMA(NULL, 0, FasterMA, 0, FasterMode, PRICE_CLOSE, i);
fasterMAprevious = iMA(NULL, 0, FasterMA, 0, FasterMode, PRICE_CLOSE, i+1);

mediumMAnow = iMA(NULL, 0, MediumMA, 0, MediumMode, PRICE_CLOSE, i);
mediumMAprevious = iMA(NULL, 0, MediumMA, 0, MediumMode, PRICE_CLOSE, i+1);

slowerMAnow = iMA(NULL, 0, SlowerMA, 0, SlowerMode, PRICE_CLOSE, i);
slowerMAprevious = iMA(NULL, 0, SlowerMA, 0, SlowerMode, PRICE_CLOSE, i+1);

CrossUp = 0.0;
CrossDown = 0.0;
if ((fasterMAnow > slowerMAnow) && (mediumMAnow > slowerMAnow) && (mediumMAprevious < slowerMAprevious) ) {
CrossUp = Low - Range*0.5;
}
else if ((fasterMAnow < slowerMAnow) && (mediumMAnow < slowerMAnow) && (mediumMAprevious > slowerMAprevious) ) {
CrossDown = High + Range*0.5;
}
}
return(0);
}
 

KelvinHand

Well-Known Member
#2
Can anyone please convert this metatrader code to amibroker afl.

Thanks in advance

//+------------------------------------------------------------------+
//| EMA-Crossover_Signal.mq4 |
//| Copyright 2005, Jason Robinson (jnrtrading) |
//| http://www.jnrtading.co.uk |
//+------------------------------------------------------------------+

/*
+------------------------------------------------------------------+
| Allows you to enter two ema periods and it will then show you at |
| Which point they crossed over. It is more usful on the shorter |
| periods that get obscured by the bars / candlesticks and when |
| the zoom level is out. Also allows you then to remove the emas |
| from the chart. (emas are initially set at 5 and 6) |
+------------------------------------------------------------------+
*/
#property copyright "Copyright 2005, Jason Robinson (jnrtrading)"
#property link "http://www.jnrtrading.co.uk"

#property indicator_chart_window
#property indicator_buffers 2
#property indicator_color1 Blue
#property indicator_color2 Red
#property indicator_width1 2
#property indicator_width2 2

double CrossUp[];
double CrossDown[];
extern int FasterMA = 5;
extern int FasterMode = 1; // 0 = sma, 1 = ema, 2 = smma, 3 = lwma
extern int MediumMA = 10;
extern int MediumMode = 1; // 0 = sma, 1 = ema, 2 = smma, 3 = lwma
extern int SlowerMA = 34;
extern int SlowerMode = 1; // 0 = sma, 1 = ema, 2 = smma, 3 = lwma

double Range, AvgRange;
double fasterMAnow, fasterMAprevious;
double mediumMAnow, mediumMAprevious;
double slowerMAnow, slowerMAprevious;
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
//---- indicators
SetIndexStyle(0, DRAW_ARROW, EMPTY,2);
SetIndexArrow(0, 233);
SetIndexBuffer(0, CrossUp);
SetIndexEmptyValue(0,0.0);
SetIndexStyle(1, DRAW_ARROW, EMPTY,2);
SetIndexArrow(1, 234);
SetIndexBuffer(1, CrossDown);
SetIndexEmptyValue(1,0.0);
//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
//----

//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start() {
int limit, i, counter;
int counted_bars=IndicatorCounted();
//---- check for possible errors
if(counted_bars<0) return(-1);
//---- last counted bar will be recounted
if(counted_bars>0) counted_bars--;

limit=Bars-counted_bars;

for(i = 0; i <= limit; i++) {

counter=i;
Range=0;
AvgRange=0;
for (counter=i ;counter<=i+9;counter++)
{
AvgRange=AvgRange+MathAbs(High[counter]-Low[counter]);
}
Range=AvgRange/10;

fasterMAnow = iMA(NULL, 0, FasterMA, 0, FasterMode, PRICE_CLOSE, i);
fasterMAprevious = iMA(NULL, 0, FasterMA, 0, FasterMode, PRICE_CLOSE, i+1);

mediumMAnow = iMA(NULL, 0, MediumMA, 0, MediumMode, PRICE_CLOSE, i);
mediumMAprevious = iMA(NULL, 0, MediumMA, 0, MediumMode, PRICE_CLOSE, i+1);

slowerMAnow = iMA(NULL, 0, SlowerMA, 0, SlowerMode, PRICE_CLOSE, i);
slowerMAprevious = iMA(NULL, 0, SlowerMA, 0, SlowerMode, PRICE_CLOSE, i+1);

CrossUp = 0.0;
CrossDown = 0.0;
if ((fasterMAnow > slowerMAnow) && (mediumMAnow > slowerMAnow) && (mediumMAprevious < slowerMAprevious) ) {
CrossUp = Low - Range*0.5;
}
else if ((fasterMAnow < slowerMAnow) && (mediumMAnow < slowerMAnow) && (mediumMAprevious > slowerMAprevious) ) {
CrossDown = High + Range*0.5;
}
}
return(0);
}


Code:
FastMA = Param("FastMA",5, 1, 500);
FastMode=ParamList("FastMA Mode","SMA|EMA|WMA",1);


MedMA = Param("MediumMA",10, 1, 500);
MedMode=ParamList("MediumMA Mode","SMA|EMA|WMA",1);


SlowMA = Param("SlowerMA",34, 1, 500);
SlowMode=ParamList("SlowerMA Mode","SMA|EMA|WMA",1);


UpArrow = ParamColor("Up Arrow", colorLime);
DownArrow = ParamColor("Down Arrow", colorRed);



 switch (FastMode) 
 {

  case "EMA":  fMA=EMA(C, FastMA); break;
  case "WMA":  fMA=WMA(C, FastMA); break;
  default:     fMA=MA(C, FastMA); break;
   
 }


 switch (MedMode) 
 {

  case "EMA":  mMA=EMA(C, MedMA); break;
  case "WMA":  mMA=WMA(C, MedMA); break;
  default:     mMA=MA(C, MedMA); break;
   
 }

 switch (SlowMode) 
 {

  case "EMA":  sMA=EMA(C, SlowMA); break;
  case "WMA":  sMA=WMA(C, SlowMA); break;
  default:     sMA=MA(C, SlowMA); break;
   
 }


Buy = fMA>sMA AND Cross(mMA, sMA);
Sell= fMA<sMA AND Cross(sMA, mMA);


shape = Buy * shapeUpArrow + Sell * shapeDownArrow;
PlotShapes( shape, IIf( Buy, UpArrow, DownArrow ), 0, IIf( Buy, Low, High ), -18);
 

aggy

Active Member
#3
Code:
FastMA = Param("FastMA",5, 1, 500);
FastMode=ParamList("FastMA Mode","SMA|EMA|WMA",1);


MedMA = Param("MediumMA",10, 1, 500);
MedMode=ParamList("MediumMA Mode","SMA|EMA|WMA",1);


SlowMA = Param("SlowerMA",34, 1, 500);
SlowMode=ParamList("SlowerMA Mode","SMA|EMA|WMA",1);


UpArrow = ParamColor("Up Arrow", colorLime);
DownArrow = ParamColor("Down Arrow", colorRed);



 switch (FastMode) 
 {

  case "EMA":  fMA=EMA(C, FastMA); break;
  case "WMA":  fMA=WMA(C, FastMA); break;
  default:     fMA=MA(C, FastMA); break;
   
 }


 switch (MedMode) 
 {

  case "EMA":  mMA=EMA(C, MedMA); break;
  case "WMA":  mMA=WMA(C, MedMA); break;
  default:     mMA=MA(C, MedMA); break;
   
 }

 switch (SlowMode) 
 {

  case "EMA":  sMA=EMA(C, SlowMA); break;
  case "WMA":  sMA=WMA(C, SlowMA); break;
  default:     sMA=MA(C, SlowMA); break;
   
 }


Buy = fMA>sMA AND Cross(mMA, sMA);
Sell= fMA<sMA AND Cross(sMA, mMA);


shape = Buy * shapeUpArrow + Sell * shapeDownArrow;
PlotShapes( shape, IIf( Buy, UpArrow, DownArrow ), 0, IIf( Buy, Low, High ), -18);

thanks a ton :)
 

a1b1trader

Well-Known Member
#4
Hi Kelvin
That mean you can convert any metatrader formula to amibroker afl.
Can I post one or more for conversion.
Thanks
 

Similar threads