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.
FxHulk
Members-
Content Count
3 -
Joined
-
Last visited
Content Type
Profiles
Forums
Calendar
Articles
Everything posted by FxHulk
-
Hey EasyTrader_I, thank you for your reply. Does that mean, that the oldest bar on the chart is bar number 1 ? So that I can't catch, for example, the high before the current bar with High[1] ? Or do I have to get that value with the phrase High of 1 bar ago
-
Ok, I finally made the code run, but it still doesn't draw the line I want to be drawn... Maybe somebody knows the answer? The line should be plotted in the chart window, like to see in the picture .... but I don't know how to do it. How to draw a line in the chart and not in a separated window ?? Here is the new code: Inputs: BackPeriod(1000), ATRPeriod(3), factor(3), typPrice(false); Variables: countedBars(0), initDir(0), Dir(1), PrevUp(0), PrevDn(0), CurrUp(0), CurrDn(0), PriceLvl(0), LvlUp(0), LvlDn(1000); //---------------------------------------------------------------------------------------------------------------------------------- if countedBars >= 0 then begin //-------------------------- if countedBars > 0 then CountedBars=CountedBars-1; //-------------------------- Variables: Counter(BackPeriod); for Counter = 1 to Counter<=0 begin //if Counter>= 0 then begin //-------------------------- if typPrice=true then PriceLvl = (High[Counter] +Low[Counter] + Close[Counter] )/ 3 else PriceLvl = Close[Counter] ; //-------------------------- if initDir=0 then begin CurrUp = Close[Counter] - AvgTrueRange(ATRPeriod)*factor; PrevUp = Close[Counter-1] - AvgTrueRange(ATRPeriod)*factor; CurrDn = Close[Counter] + AvgTrueRange(ATRPeriod)*factor; PrevDn = Close[Counter-1] + AvgTrueRange(ATRPeriod)*factor; if CurrUp > PrevUp then Dir=1; LvlUp=CurrUp; if CurrDn < PrevDn then Dir=-1; LvlDn=CurrDn; initDir=1; end; //-------------------------- CurrUp = PriceLvl - AvgTrueRange(ATRPeriod)*factor; CurrDn = PriceLvl + AvgTrueRange(ATRPeriod)*factor; //-------------------------- Array: ind_buffer1 [](0), ind_buffer2 [](0); if Dir=1 then begin if CurrUp > LvlUp then begin ind_buffer1[Counter]=CurrUp; LvlUp=CurrUp; end else begin ind_buffer1[Counter]=LvlUp; end; if low[Counter] < ind_buffer1[Counter] then begin Dir = -1; LvlDn=1000; end; end; //-------------------------- if Dir=-1 then begin if CurrDn < LvlDn then begin ind_buffer2[Counter]=CurrDn; LvlDn=CurrDn; end else begin ind_buffer2[Counter]=LvlDn; end; if High[Counter] > ind_buffer2[Counter] then begin Dir = 1; LvlUp = 0; end; end; //-------------------------- //-------------------------- Plot1(ind_buffer1[Counter]); Plot2(ind_buffer2[Counter]); Counter=Counter-1; end; //-------------------------- end;
-
Hey Community! I hope I've chosen the right forum for my problem and you are likely to help me... I'd like to use an indicator from MT4 in TradeStation and MultiCharts and tried to translate it from Mql4 to EasyLanguage. But unfortunately it doesn't work that well. This is the indicator in Mql4: //+------------------------------------------------------------------+ //| ATR Trailing Stop.mq4 | //| | //| | //+------------------------------------------------------------------+ #property link "" //---- indicator settings #property indicator_chart_window #property indicator_buffers 2 #property indicator_color1 Blue #property indicator_color2 Red //---- indicator parameters extern int BackPeriod = 1000; extern int ATRPeriod = 3; extern double Factor = 3; extern bool TypicalPrice = false; //---- indicator buffers double ind_buffer1[]; double ind_buffer2[]; //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ int init() { //---- drawing settings SetIndexStyle(0,DRAW_LINE,EMPTY,2); SetIndexDrawBegin(0,ATRPeriod); SetIndexBuffer(0,ind_buffer1); SetIndexStyle(1,DRAW_LINE,EMPTY,2); SetIndexDrawBegin(1,ATRPeriod); SetIndexBuffer(1,ind_buffer2); IndicatorDigits(MarketInfo(Symbol(),MODE_DIGITS)+2); //---- name for DataWindow and indicator subwindow label IndicatorShortName("ATR Trailing Stop("+ATRPeriod+" * "+Factor+")"); SetIndexLabel(0,"Support"); SetIndexLabel(1,"Resistance"); //---- initialization done return(0); } //+------------------------------------------------------------------+ //| Moving Averages Convergence/Divergence | //+------------------------------------------------------------------+ int start() { int limit; int counted_bars=IndicatorCounted(); double PrevUp, PrevDn; double CurrUp, CurrDn; double PriceLvl; double LvlUp = 0; double LvlDn = 1000; int Dir = 1; int InitDir; //---- 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; //---- fill in buffervalues InitDir = 0; for(int i=BackPeriod; i>=0; i--) { if (TypicalPrice) PriceLvl = (High[i] + Low[i] + Close[i])/3; else PriceLvl = Close[i]; if(InitDir == 0) { CurrUp=Close[i] - (iATR(NULL,0,ATRPeriod,i) * Factor); PrevUp=Close[i-1] - (iATR(NULL,0,ATRPeriod,i-1) * Factor); CurrDn=Close[i] + (iATR(NULL,0,ATRPeriod,i) * Factor); PrevDn=Close[i-1] + (iATR(NULL,0,ATRPeriod,i-1) * Factor); if (CurrUp > PrevUp) Dir = 1; LvlUp = CurrUp; if (CurrDn < PrevDn) Dir = -1; LvlDn = CurrDn; InitDir = 1; } CurrUp=PriceLvl - (iATR(NULL,0,ATRPeriod,i) * Factor); CurrDn=PriceLvl + (iATR(NULL,0,ATRPeriod,i) * Factor); if (Dir == 1) { if (CurrUp > LvlUp) { ind_buffer1[i] = CurrUp; LvlUp = CurrUp; } else { ind_buffer1[i] = LvlUp; } ind_buffer2[i] = EMPTY_VALUE; if (Low[i] < ind_buffer1[i]) { Dir = -1; LvlDn = 1000; } } if (Dir == -1) { if (CurrDn < LvlDn) { ind_buffer2[i] = CurrDn; LvlDn = CurrDn; } else { ind_buffer2[i] = LvlDn; } ind_buffer1[i] = EMPTY_VALUE; if (High[i] > ind_buffer2[i]) { Dir = 1; LvlUp = 0; } } } //---- done return(0); } And this is how I thought I could code in in EasyLanguage: Inputs: BackPeriod(1000), ATRPeriod(3), factor(3), typPrice(false); Variables: countedBars(0), initDir(0), Dir(1), PrevUp(0), PrevDn(0), CurrUp(0), CurrDn(0), PriceLvl(0), LvlUp(0), LvlDn(1000); //---------------------------------------------------------------------------------------------------------------------------------- if countedBars >= 0 then begin //-------------------------- if countedBars > 0 then CountedBars=CountedBars-1; //-------------------------- Variables: Counter(1); for Counter = 1 to Counter<=0 begin //-------------------------- if typPrice=true then PriceLvl = (High(Counter)+ Low(Counter) + Close(Counter)) / 3 else PriceLvl = Close(Counter); //-------------------------- if initDir=0 then begin CurrUp = Close(Counter) - AvgTrueRange(ATRPeriod)*factor; PrevUp = Close(Counter-1) - AvgTrueRange(ATRPeriod)*factor; CurrDn = Close(Counter) + AvgTrueRange(ATRPeriod)*factor; PrevDn = Close(Counter-1) + AvgTrueRange(ATRPeriod)*factor; if CurrUp > PrevUp then Dir=1; LvlUp=CurrUp; if CurrDn < PrevDn then Dir=-1; LvlDn=CurrDn; initDir=1; end; //-------------------------- CurrUp = PriceLvl - AvgTrueRange(ATRPeriod)*factor; CurrDn = PriceLvl + AvgTrueRange(ATRPeriod)*factor; //-------------------------- Array: ind_buffer1 [](0), ind_buffer2 [](0); if Dir=1 then begin if CurrUp > LvlUp then begin ind_buffer1[Counter]=CurrUp; LvlUp=CurrUp; end else begin ind_buffer1[Counter]=LvlUp; end; if low(Counter) < ind_buffer1[Counter] then begin Dir = -1; LvlDn=1000; end; end; //-------------------------- if Dir=-1 then begin if CurrDn < LvlDn then begin ind_buffer2[Counter]=CurrDn; LvlDn=CurrDn; end else begin ind_buffer2[Counter]=LvlDn; end; if High(Counter) > ind_buffer2[Counter] then begin Dir = 1; LvlUp = 0; end; end; //-------------------------- //-------------------------- Plot1(ind_buffer1[Counter]); Plot2(ind_buffer2[Counter]); Counter=Counter+1; //-------------------------- end; end; I can't try the EasyLanguage code and take a look, if it is, what I want it to be, because compiling finishs with an error description : ------ Build started: ------ Study: "test01" (Indicator) Please wait .... ------ Compiled with error(s): ------ Compile error errLine 0, errColumn 0, errLineEnd 0, errColumnEnd 0 causal study: (Function) I would greatly appreciate any support from you... thanks a lot... I attached a picture, to show, how the indicator looks in MT4. Dok1.docx