Differenze tra le pagine "TS IDNR4 AvgTrueRange concept" e "TS TRIX System S&C"

Da traderpedia.
(Differenze fra le pagine)
Jump to navigation Jump to search
imported>Stefano Fanton
 
imported>Stefano Fanton
 
Riga 1: Riga 1:
'''''Trading System "IDNR4 AvgTrueRange concept"'''''  
+
'''''Trading System "TRIX System S&C"'''''  
 +
 
 +
Sistema ricavato dall'articolo "Playing TRIX" discusso nel numero di giugno 1997 nella rivista STOCKS & COMMODITIES.
  
 
Formula per Tradestation™:  
 
Formula per Tradestation™:  
Riga 5: Riga 7:
 
INIZIO FORMULA  
 
INIZIO FORMULA  
  
Type : Signal, Name : Test IDNR4 <br>{System: Test IDNR4 (Inside day Narrow range Pattern # 1 (L.C.)<br>additional AvgTrueRange concept (W.D.) added 1998 }
+
Type: Function, Name: NewTRIX <br>Inputs: Price(NumericSeries), Length(NumericSimple); <br>Vars: LogP(0), alpha(0), sm1(0), sm2(0), sm3(0);
  
Input:<br>CLen(4),<br>ELen(1),<br>Avr(2),<br>Rat(.38),<br>ExL(0),<br>ExS(0);
+
LogP = Log(Price);  
  
IF Range = Lowest(Range,CLen)<br>and H &lt; H[ELen] and L &gt; L[ELen] then Begin
+
IF CurrentBar = 1 Then Begin <br>sm1 = LogP; <br>sm2 = LogP; <br>sm3 = LogP; <br>alpha = 2 / (Length + 1); <br>End Else Begin <br>sm1 = (LogP - sm1) * alpha + sm1; <br>sm2 = (sm1 - sm2) * alpha + sm2; <br>sm3 = (sm2 - sm3) * alpha + sm3; <br>NewTrix = (sm3 - sm3[1]) * 100; <br>End;  
  
Buy High + (AvgTrueRange(Avr)[1]*Rat) stop;<br>Sell Low - (AvgTrueRange(Avr)[1]*Rat) stop;
+
<br>
  
End;
+
Type: System, Name: TRIX System S&amp;C
  
If MarketPosition = 1 then Begin
+
Inputs: Price(Close), TrixLen(3), TSLen(8), ZeroCrss("Y"), AvgCrss("Y"); <br>Vars: TRXval(0), AvgTRX(0), Zero(0);
  
If BarsSinceEntry = ExL then Exitlong at Market;
+
TRXval = NewTRIX(Price, TRIXLen); <br>AvgTRX = LinearRegValue(TRXval, TSLen, 0);  
  
End;
+
IF UpperStr(ZeroCrss) = "Y" Then Begin <br>IF TRXval Crosses Above Zero Then <br>Buy ("B_ZCrss") This Bar on Close; <br>IF TRXval Crosses Below Zero Then <br>Sell ("S_ZCrss") This Bar on Close; <br>End;  
  
If MarketPosition = -1 then Begin
+
IF UpperStr(AvgCrss) = "Y" Then Begin <br>IF TRXval Crosses Above AvgTRX Then <br>Buy ("B_AvgCrss") This Bar on Close; <br>IF TRXval Crosses Below AvgTRX Then <br>Sell ("S_AvgCrssS") This Bar on Close; <br>End;
  
If BarsSinceEntry = ExS then ExitShort at market;
+
<br>
  
End;<br><br>FINE FORMULA  
+
<br><br>FINE FORMULA  
  
 
== Vedi anche:  ==
 
== Vedi anche:  ==

Versione attuale delle 09:56, 22 mar 2012

Trading System "TRIX System S&C"

Sistema ricavato dall'articolo "Playing TRIX" discusso nel numero di giugno 1997 nella rivista STOCKS & COMMODITIES.

Formula per Tradestation™:

INIZIO FORMULA

Type: Function, Name: NewTRIX
Inputs: Price(NumericSeries), Length(NumericSimple);
Vars: LogP(0), alpha(0), sm1(0), sm2(0), sm3(0);

LogP = Log(Price);

IF CurrentBar = 1 Then Begin
sm1 = LogP;
sm2 = LogP;
sm3 = LogP;
alpha = 2 / (Length + 1);
End Else Begin
sm1 = (LogP - sm1) * alpha + sm1;
sm2 = (sm1 - sm2) * alpha + sm2;
sm3 = (sm2 - sm3) * alpha + sm3;
NewTrix = (sm3 - sm3[1]) * 100;
End;


Type: System, Name: TRIX System S&C

Inputs: Price(Close), TrixLen(3), TSLen(8), ZeroCrss("Y"), AvgCrss("Y");
Vars: TRXval(0), AvgTRX(0), Zero(0);

TRXval = NewTRIX(Price, TRIXLen);
AvgTRX = LinearRegValue(TRXval, TSLen, 0);

IF UpperStr(ZeroCrss) = "Y" Then Begin
IF TRXval Crosses Above Zero Then
Buy ("B_ZCrss") This Bar on Close;
IF TRXval Crosses Below Zero Then
Sell ("S_ZCrss") This Bar on Close;
End;

IF UpperStr(AvgCrss) = "Y" Then Begin
IF TRXval Crosses Above AvgTRX Then
Buy ("B_AvgCrss") This Bar on Close;
IF TRXval Crosses Below AvgTRX Then
Sell ("S_AvgCrssS") This Bar on Close;
End;




FINE FORMULA

Vedi anche: