Jump to content

TradeStation AddOn Collection


amazbn

Recommended Posts

  • Replies 256
  • Created
  • Last Reply

Top Posters In This Topic

  • 4 weeks later...
  • 1 month later...
Elwave addon for TS , please upload .Thx kindly.

 

Hi puiu288;

 

Elwave .ELD files was included in installation folder in Program files. Go to Program files > Common files > PrognosisUDS folder, and look for "elwave.eld" file, and install this .eld file in Tradestation. Also read the instructions in "Elwave For TradeStation", .doc file included in the same folder.

Edited by FX_SuperTrader
Link to comment
Share on other sites

Hi puiu288;

 

Here the code for Elliot Wave Oscillator indicator, only copy and paste, next compile:

 

/////////////////////////////////////////////////////////////////////////////////////

Inputs:

 

Length_MRAMidPt_1 (5), //Original Setting (5)

Length_MRAMidPt_2 (34); //Original Setting (34)

 

 

Vars:

MRA_ElliotOsc(0),

MRA_MidPt(0);

 

MRA_MidPt = (High+Low) * 0.5;

MRA_ElliotOsc=Average(MRA_MidPt ,Length_MRAMidPt_1)-Average(MRA_MidPt ,Length_MRAMidPt_2);

Plot1(MRA_ElliotOsc,"ElliotOsc");

Plot2(0,"ZeroLine",white);

 

/////////////////////////////////////////////////////////////////////////////////////////////////////////

Edited by FX_SuperTrader
Link to comment
Share on other sites

Thanks a lot . How can it be made to plot like this :http://rghost.net/53971348 ? Now it shows a single line .

 

The single line is the EW Osc, but in the image have a Moving Average, and also plot a difference between EW Osc and this Mov Avge. Is similar to MACD, only that the MACD use close to close, but EW Osc use (High+Low)*0.5

 

The code is:

 

/////////////////////////////////////////////////////////////////////////////////////

Inputs:

 

Length_MRAMidPt_1 (5), //Original Setting (5)

Length_MRAMidPt_2 (34), //Original Setting (34)

MovingAvge_Length (9); // Any

 

Vars:

MRA_ElliotOsc(0),

MRA_MidPt(0),

MovAvge(0),

Difference(0);

 

 

MRA_MidPt = (High+Low) * 0.5;

MRA_ElliotOsc=Average(MRA_MidPt ,Length_MRAMidPt_1)-Average(MRA_MidPt ,Length_MRAMidPt_2);

MovAvge = Average (MRA_ElliotOsc, MovingAvge_Length);

Difference = MRA_ElliotOsc - MovAvge;

 

Plot1(MRA_ElliotOsc,"ElliotOsc",red); //Line

Plot2(0,"ZeroLine",white);

Plot3(MovAvge,"MovAvge",blue); //Line

Plot4(Difference,"Diff",yellow); //Histogram

 

/////////////////////////////////////////////////////////////////////////////////////////////////////////

Link to comment
Share on other sites

Here is the source code for the famous Sine wave indicator by J.Ehlers for TradeStation.

 

{Sine Wave indicator - //// From 'Cybernetic Analysis for Stocks and Futures' by John Ehlers //// code compiled by dn

} // plot on a subgraph separate from the price region.

 

Inputs: Price((H+L)/2), alpha(.07);

 

Vars: Smooth(0),Cycle(0),I1(0),Q1(0),I2(0),Q2(0),DeltaPhase(0),MedianDelta(0),MaxAmp(0),AmpFix(0),Re(0),Im(0),DC(0),

alpha1(0),InstPeriod(0),DCPeriod(0),count(0),SmoothCycle(0),RealPart(0),ImagPart(0),DCPhase(0);

 

Smooth = (Price+2*Price[1]+2*Price[2]+Price[3])/6;

Cycle = (1-.5*alpha)*(1-.5*alpha)*(Smooth-2*Smooth[1]+Smooth[2])+2*(1-alpha)*Cycle[1]-(1-alpha)*(1-alpha)*Cycle[2];

If CurrentBar <7 then Cycle=(Price-2*Price[1]+Price[2])/4;

Q1=(.0962*Cycle+.5769*Cycle[2]-.5769*Cycle[4]-.0962*Cycle[6])*(.5+.08*InstPeriod[1]);

I1 = Cycle[3];

If Q1<>0 and Q1[1]<>0 then DeltaPhase=(I1/Q1-I1[1]/Q1[1])/(1+I1*I1[1]/(Q1*Q1[1]));

If DeltaPhase <0.1 then DeltaPhase=0.1;

If DeltaPhase > 1.1 then DeltaPhase = 1.1;

MedianDelta = Median(DeltaPhase,5);

If MedianDelta =0 then DC=15 else DC=6.28318/MedianDelta+.5;

InstPeriod=.33*DC+.67*InstPeriod[1];

Value1 = .15*InstPeriod+.85*Value1[1];

DCPeriod = IntPortion(Value1);

RealPart = 0;

ImagPart = 0;

For count = 0 To DCPeriod - 1 begin

RealPart = RealPart + Sine(360 * count / DCPeriod) * (Cycle[count]);

ImagPart = ImagPart + Cosine(360 * count / DCPeriod) * (Cycle[count]);

End;

If AbsValue(ImagPart) > 0.001 then DCPhase = Arctangent(RealPart / ImagPart);

If AbsValue(ImagPart) <= 0.001 then DCPhase = 90 * Sign(RealPart);

 

DCPhase = DCPhase + 90;

If ImagPart < 0 then DCPhase = DCPhase + 180;

If DCPhase > 315 then DCPhase = DCPhase - 360;

 

Plot1(Sine(DCPhase), "Sine",blue);

Plot2(Sine(DCPhase + 45), "LeadSine",green);

Link to comment
Share on other sites

  • 3 weeks later...
  • 3 weeks later...
  • 2 months later...
  • 5 months later...
  • 4 months later...
  • 1 month later...
  • 2 weeks later...

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