Jump to content

Welcome to the new Traders Laboratory! Please bear with us as we finish the migration over the next few days. If you find any issues, want to leave feedback, get in touch with us, or offer suggestions please post to the Support forum here.

  • Welcome Guests

    Welcome. You are currently viewing the forum as a guest which does not give you access to all the great features at Traders Laboratory such as interacting with members, access to all forums, downloading attachments, and eligibility to win free giveaways. Registration is fast, simple and absolutely free. Create a FREE Traders Laboratory account here.

goody01

Convert MT4 Indicator into Tradestation Eld?

Recommended Posts

I have an ATR code that i'd like converted to Tradestations EasyLanguage if someone has a chance?

 

2011-10-14_0902 - xpete911's library

 

 

#property indicator_chart_window
#property indicator_buffers 2
#property indicator_color1 White
#property indicator_color2 Red

extern int Length = 15;
extern int ATRperiod = 2;
extern double Kv = 4.0;
extern int Shift = 1;
double g_ibuf_96[];
double g_ibuf_100[];
double g_ibuf_104[];
double g_ibuf_108[];
double g_ibuf_112[];

int init() {
  SetIndexStyle(0, DRAW_LINE, STYLE_SOLID, 2);
  SetIndexStyle(1, DRAW_LINE, STYLE_SOLID, 2);
  IndicatorBuffers(5);
  SetIndexBuffer(0, g_ibuf_96);
  SetIndexBuffer(1, g_ibuf_100);
  SetIndexBuffer(2, g_ibuf_104);
  SetIndexBuffer(3, g_ibuf_108);
  SetIndexBuffer(4, g_ibuf_112);
  string ls_0 = "ATRStops(" + Length + ")";
  IndicatorShortName(ls_0);
  SetIndexLabel(0, "Up");
  SetIndexLabel(1, "Dn");
  SetIndexDrawBegin(0, Length);
  SetIndexDrawBegin(1, Length);
  return (0);
}

int start() {
  int li_4;
  int l_ind_counted_8 = IndicatorCounted();
  if (l_ind_counted_8 > 0) li_4 = Bars - l_ind_counted_8;
  if (l_ind_counted_8 < 0) return (0);
  if (l_ind_counted_8 == 0) li_4 = Bars - Length - 1;
  for (int li_0 = li_4; li_0 >= 0; li_0--) {
     g_ibuf_104[li_0] = High[iHighest(NULL, 0, MODE_HIGH, Length, li_0 + Shift)] - Kv * iATR(NULL, 0, ATRperiod, li_0 + Shift);
     g_ibuf_108[li_0] = Low[iLowest(NULL, 0, MODE_LOW, Length, li_0 + Shift)] + Kv * iATR(NULL, 0, ATRperiod, li_0 + Shift);
     g_ibuf_112[li_0] = g_ibuf_112[li_0 + 1];
     if (Close[li_0] > g_ibuf_108[li_0 + 1]) g_ibuf_112[li_0] = 1;
     if (Close[li_0] < g_ibuf_104[li_0 + 1]) g_ibuf_112[li_0] = -1;
     if (g_ibuf_112[li_0] > 0.0) {
        if (g_ibuf_104[li_0] < g_ibuf_104[li_0 + 1]) g_ibuf_104[li_0] = g_ibuf_104[li_0 + 1];
        g_ibuf_96[li_0] = g_ibuf_104[li_0];
        g_ibuf_100[li_0] = EMPTY_VALUE;
     }
     if (g_ibuf_112[li_0] < 0.0) {
        if (g_ibuf_108[li_0] > g_ibuf_108[li_0 + 1]) g_ibuf_108[li_0] = g_ibuf_108[li_0 + 1];
        g_ibuf_96[li_0] = EMPTY_VALUE;
        g_ibuf_100[li_0] = g_ibuf_108[li_0];
     }
  }
  return (0);
}

Share this post


Link to post
Share on other sites

I want to convert following Elliotwave MT4 to TradeStation ELD

 

//+------------------------------------------------------------------+

//| elliot oscillator - waves.mq4 |

//+------------------------------------------------------------------+

#property copyright "mladen"

#property link "mladenfx@gmail.com"

 

#property indicator_separate_window

#property indicator_buffers 6

#property indicator_color1 DeepSkyBlue

#property indicator_color2 PaleVioletRed

#property indicator_color3 Gold

#property indicator_color4 Gold

#property indicator_color5 DimGray

#property indicator_color6 DimGray

#property indicator_width1 2

#property indicator_width2 2

#property indicator_width3 2

#property indicator_width4 2

#property indicator_width5 2

#property indicator_width6 2

 

//

//

//

//

//

 

extern int shortPeriod = 5;

extern int longPeriod = 35;

extern string linesIdentifier = "elliotWaveLines";

extern color linesColor = Black;

extern int linesStyle = STYLE_DOT;

extern int levelsShiftRight = 10;

extern int levelsLength = 20;

extern color levelsColor = Silver;

extern int levelsStyle = STYLE_SOLID;

 

extern bool alertsOn = false;

extern bool alertsOnCurrent = true;

extern bool alertsMessage = true;

extern bool alertsSound = false;

extern bool alertsEmail = false;

 

//

//

//

//

//

 

double ellBuffer[];

double ellUBuffer[];

double ellDBuffer[];

double mauBuffer[];

double madBuffer[];

double peakUp[];

double peakDn[];

double trend[];

 

//+------------------------------------------------------------------+

//| |

//+------------------------------------------------------------------+

//

//

//

//

//

 

int init()

{

IndicatorBuffers(8);

SetIndexBuffer(0,ellUBuffer); SetIndexStyle(0,DRAW_HISTOGRAM);

SetIndexBuffer(1,ellDBuffer); SetIndexStyle(1,DRAW_HISTOGRAM);

SetIndexBuffer(2,peakUp); SetIndexStyle(2,DRAW_HISTOGRAM);

SetIndexBuffer(3,peakDn); SetIndexStyle(3,DRAW_HISTOGRAM);

SetIndexBuffer(4,mauBuffer);

SetIndexBuffer(5,madBuffer);

SetIndexBuffer(6,trend);

SetIndexBuffer(7,ellBuffer);

IndicatorShortName("Elliot oscillator ( "+shortPeriod+","+longPeriod+")");

return(0);

}

int deinit() { deleteLines(); return(0); }

 

//

//

//

//

//

 

int start()

{

double alpha = 2.0/(1.0+longPeriod+MathCeil(shortPeriod/2.0));

int counted_bars = IndicatorCounted();

int limit,i,k;

 

if(counted_bars < 0) return(-1);

if(counted_bars > 0) counted_bars--;

limit = MathMin(Bars-counted_bars,Bars-longPeriod);

 

//

//

//

//

//

 

int count = 0;

int direction = 0;

int startFrom = 0;

double lastPeakPrice = 0;

datetime lastPeakTime = 0;

for (;limit<(Bars-longPeriod); limit++)

{

if (peakDn[limit]!=EMPTY_VALUE) { if (count==0) { count ++; continue; } direction=-1; startFrom = limit; break; }

if (peakUp[limit]!=EMPTY_VALUE) { if (count==0) { count ++; continue; } direction= 1; startFrom = limit; break; }

}

 

//

//

//

//

//

 

for(i = limit; i >= 0; i--)

{

ellBuffer = iMA(NULL,0,shortPeriod,0,MODE_SMA,PRICE_MEDIAN,i)-iMA(NULL,0,longPeriod,0,MODE_SMA,PRICE_MEDIAN,i);

ellUBuffer = EMPTY_VALUE;

ellDBuffer = EMPTY_VALUE;

 

if (mauBuffer[i+1]==EMPTY_VALUE) if (ellBuffer>0) mauBuffer[i+1] = ellBuffer; else mauBuffer[i+1] = 0;

if (madBuffer[i+1]==EMPTY_VALUE) if (ellBuffer<0) madBuffer[i+1] = ellBuffer; else madBuffer[i+1] = 0;

 

madBuffer = madBuffer[i+1];

mauBuffer = mauBuffer[i+1];

trend = trend[i+1];

peakUp = EMPTY_VALUE;

peakDn = EMPTY_VALUE;

 

//

//

//

//

//

 

if (ellBuffer < 0) { madBuffer = madBuffer[i+1]+alpha*(ellBuffer-madBuffer[i+1]); ellDBuffer = ellBuffer; }

if (ellBuffer > 0) { mauBuffer = mauBuffer[i+1]+alpha*(ellBuffer-mauBuffer[i+1]); ellUBuffer = ellBuffer; }

deleteLine(i);

 

//

//

//

//

//

 

if (ellBuffer > 0 && ellBuffer>mauBuffer)

{

if (direction < 0) { markLow(i,startFrom,lastPeakPrice,lastPeakTime); startFrom = i; k++; }

direction = 1; trend = 1;

}

if (ellBuffer < 0 && ellBuffer<madBuffer)

{

if (direction > 0) { markHigh(i,startFrom,lastPeakPrice,lastPeakTime); startFrom = i; k++; }

direction = -1; trend = -1;

}

}

if (direction > 0) markHigh(0,startFrom,lastPeakPrice,lastPeakTime);

if (direction < 0) markLow (0,startFrom,lastPeakPrice,lastPeakTime);

if (alertsOn)

{

if (alertsOnCurrent)

int whichBar = 0;

else whichBar = 1;

if (trend[whichBar] != trend[whichBar+1])

{

if (trend[whichBar] == 1) doAlert(whichBar,DoubleToStr(mauBuffer[whichBar],5)+" crossed up");

if (trend[whichBar] ==-1) doAlert(whichBar,DoubleToStr(madBuffer[whichBar],5)+" crossed down");

}

}

 

//

//

//

//

//

 

return(0);

}

 

//+------------------------------------------------------------------+

//| |

//+------------------------------------------------------------------+

//

//

//

//

//

 

void markLow(int start, int end, double& lastPeakPrice, datetime& lastPeakTime)

{

while (ellBuffer[start+1]>0 && start<Bars) start++;

while (ellBuffer[end+1] <0 && end <Bars) end++;

int peakAt = ArrayMinimum(Low,end-start+1,start); peakDn[peakAt] = ellBuffer[peakAt];

 

//

//

//

//

//

 

if (lastPeakPrice!=0) drawLine(lastPeakPrice,lastPeakTime,Low[peakAt],Time[peakAt]);

lastPeakPrice = Low[peakAt];

lastPeakTime = Time[peakAt];

}

void markHigh(int start, int end, double& lastPeakPrice, datetime& lastPeakTime)

{

while (ellBuffer[start+1]<0 && start<Bars) start++;

while (ellBuffer[end+1] >0 && end <Bars) end++;

int peakAt = ArrayMaximum(High,end-start+1,start); peakUp[peakAt] = ellBuffer[peakAt];

 

//

//

//

//

//

 

if (lastPeakPrice!=0) drawLine(lastPeakPrice,lastPeakTime,High[peakAt],Time[peakAt]);

lastPeakPrice = High[peakAt];

lastPeakTime = Time[peakAt];

}

 

//

//

//

//

//

 

void drawLine(double startPrice, datetime startTime, double endPrice, datetime endTime)

{

string name = linesIdentifier+":"+startTime;

ObjectCreate(name,OBJ_TREND,0,startTime,startPrice,endTime,endPrice);

ObjectSet(name,OBJPROP_STYLE,linesStyle);

ObjectSet(name,OBJPROP_COLOR,linesColor);

ObjectSet(name,OBJPROP_RAY,false);

}

void deleteLine(int i)

{

ObjectDelete(linesIdentifier+":"+Time);

}

void deleteLines()

{

string lookFor = linesIdentifier+":";

for (int i=ObjectsTotal(); i>=0; i--)

{

string name = ObjectName(i);

if (StringFind(name,lookFor)==0) ObjectDelete(name);

}

}

 

//+-------------------------------------------------------------------

//|

//+-------------------------------------------------------------------

//

//

//

//

//

 

void doAlert(int forBar, string doWhat)

{

static string previousAlert="nothing";

static datetime previousTime;

string message;

 

if (previousAlert != doWhat || previousTime != Time[forBar]) {

previousAlert = doWhat;

previousTime = Time[forBar];

 

//

//

//

//

//

 

message = StringConcatenate(Symbol()," at ",TimeToStr(TimeLocal(),TIME_SECONDS)," Elliot oscillator level ",doWhat);

if (alertsMessage) Alert(message);

if (alertsEmail) SendMail(StringConcatenate(Symbol(),"Elliot oscillator "),message);

if (alertsSound) PlaySound("alert2.wav");

}

}

Share this post


Link to post
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.


×
×
  • Create New...

Important Information

By using this site, you agree to our Terms of Use.