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);

 

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

Guest gavetso
Posted
IS SOME BODY CAN SEND US THE easy language source we can code it in Ninja
Guest gavetso
Posted
please post screen indi running to get som reference please
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]);

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...