Jump to content

Recommended Posts

Posted (edited)

My brother is using this Tradestation indicator and he swears by it, he trades the forex and generates more than 30% per month using 30 minute bars ( I saw the results ).

 

Since I no longer use TS I was wondering if anybody ever heard about this indicator or has it for ninja.

 

I am attaching a screenshot of the indicator and also the open code ELA so maybe someone can convert it to ninja script and share.

 

 

http://www.send$pace.c0m/filegroup/LdNbdwuf%2BEY9bQ81SeL5dA

 

Jane

Edited by Traderbeauty
Posted

Traderbeauty.....have you checked to see if BM@T has done anything with this code....Nate

 

My brother is using this Tradestation indicator and he swears by it, he trades the forex and generates more than 30% per month using 30 minute bars ( I saw the results ).

 

Since I no longer use TS I was wondering if anybody ever heard about this indicator or has it for ninja.

 

I am attaching a screenshot of the indicator and also the open code ELA so maybe someone can convert it to ninja script and share.

 

 

http://www.send$pace.c0m/filegroup/LdNbdwuf%2BEY9bQ81SeL5dA

 

Jane

  • 3 weeks later...
  • 5 months later...
Posted

i found the ela text:- as far as i know it was not converted to ninja------

 

[LegacyColorValue = true];

 

inputs:

PriceActionFilter(1),

TransColor1or2or3(1),

UseZeroLag(False),

CCIAvgLen( 20 ),

CCISmooth1( 3 ),

CCISmooth2( 5 ),

StochLength1(5),

StochLength2(3),

StochLength3(3),

UpColor(Green),

DwnColor(Red),

PlotWidth(2);

 

{****************************************}

 

variables:

Price(0),

First(0),

Second(0),

Curve1( 0 ),

Curve2( 0 ),

Zscore( 0 ),

OverBought(80),

OverSold(20),

Switch(0),

KFast(0),

KFull(0),

DFull(0),

LL(O),

HH(0),

Dira(0),

Dira1(0),

Dirb(0),

Dirb1(0),

ZL1(0);

 

{****************************************}

 

Price = SmoothedAverage(Close,PriceActionFilter);

 

First = (Price-Average(Price,CCIAvgLen));

Second = (StdDev(Price,CCIAvgLen));

 

If Second = 0 then Second = .001;

 

ZScore = (First/Second);

 

Curve1 = Average( ZScore, CCISmooth1 ) ;

Curve2 = Average( Curve1, CCISmooth2 ) ;

 

{****************************************}

 

LL = Lowest((High+Low)/2, StochLength1);

HH = Highest((High+Low)/2, StochLength1);

 

KFast = 100 * IFF(HH-LL=0,0,(((High+Low)/2) - LL)/(HH- LL));

KFull = Average(KFast, StochLength2);

 

DFull = Average(KFull, StochLength3);

 

ZL1 = Zero_Lag(Average(Kfast, StochLength2), StochLength1);

 

{****************************************}

 

SetPlotWidth(1,PlotWidth);

SetPlotWidth(3,PlotWidth);

 

{****************************************}

 

Plot1( 1,"CCISmoothBar");

Plot2(-2,"Spacer");

Plot3(-1,"StocasticBar");

Plot4( 2,"Spacer");

 

{****************************************}

 

If Curve1>Curve1[1] Then Dira=1;

If Curve1<Curve1[1] Then Dira=-1;

 

If TransColor1or2or3 = 2 and Dira>0 Then SetPlotcolor(1,UpColor);

If TransColor1or2or3 = 2 and Dira<0 Then Setplotcolor(1,DwnColor);

 

If TransColor1or2or3 = 1 and Dira>0 Then SetPlotcolor[1](1,UpColor);

If TransColor1or2or3 = 1 and Dira<0 Then Setplotcolor[1](1,DwnColor);

 

If TransColor1or2or3 = 3 and Dira>0 Then SetPlotcolor(1,UpColor);

If TransColor1or2or3 = 3 and Dira<0 Then Setplotcolor(1,DwnColor);

 

If TransColor1or2or3 = 3 and Dira>0 Then SetPlotcolor[1](1,UpColor);

If TransColor1or2or3 = 3 and Dira<0 Then Setplotcolor[1](1,DwnColor);

 

{****************************************}

 

If UseZeroLag = False then Begin

If KFull>KFull[1] Then Dirb=1;

If KFull<KFull[1] Then Dirb=-1;

End;

 

If UseZeroLag = True then Begin

If ZL1>ZL1[1] Then Dirb=1;

If ZL1<ZL1[1] Then Dirb=-1;

End;

 

If TransColor1or2or3 = 2 and Dirb>0 Then SetPlotcolor(3,UpColor);

If TransColor1or2or3 = 2 and Dirb<0 Then Setplotcolor(3,DwnColor);

 

If TransColor1or2or3 = 1 and Dirb>0 Then SetPlotcolor[1](3,UpColor);

If TransColor1or2or3 = 1 and Dirb<0 Then Setplotcolor[1](3,DwnColor);

 

If TransColor1or2or3 = 3 and Dirb>0 Then SetPlotcolor(3,UpColor);

If TransColor1or2or3 = 3 and Dirb<0 Then Setplotcolor(3,DwnColor);

 

If TransColor1or2or3 = 3 and Dirb>0 Then SetPlotcolor[1](3,UpColor);

If TransColor1or2or3 = 3 and Dirb<0 Then Setplotcolor[1](3,DwnColor);

 

{****************************************}

Posted

Traderbeauty,

 

in line "64" of the Market forecaster code the function "Zero_Lag" is not verified in TS2000i: See

 

ZL1 = Zero_Lag(Average(Kfast, StochLength2), StochLength1);

 

Can you provide this function too?

 

Sixer

Posted
Traderbeauty,

 

in line "64" of the Market forecaster code the function "Zero_Lag" is not verified in TS2000i: See

 

ZL1 = Zero_Lag(Average(Kfast, StochLength2), StochLength1);

 

Can you provide this function too?

 

Sixer

 

It looks like the logic follows this pattern:

MA1.Set(SMA(KFast,StochLength2)[0]);

ZMA.Set(ZLEMA(MA1,StochLength1)[0]);

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

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