[LegacyColorValue = false];
{ 2-Line TRIX indicator for Jongseon Kim's TAOSC article
"When and When Not To Trade", TAOSC - Jan. 2004 }
inputs:
SigLineXMALen1( 3) ,
TRIXLength( 3.75) ,
SigLineXMALen2( 4.5) ;
variables:
EMA1( 0 ),
EMA2( 0 ),
EMA3( 0 ),
TRIXLine( 0 ),
SignalLine1( 0 ),
SignalLine2( 0 ) ;
EMA1 = XAverage( Close, TRIXLength ) ;
EMA2 = XAverage( EMA1, TRIXLength ) ;
EMA3 = XAverage( EMA2, TRIXLength ) ;
if EMA3[1] <> 0 then
{ Ensure not about to divide by zero }
TRIXLine = 10 * ( EMA3 - EMA3[1] ) / EMA3[1] ;
SignalLine1 = XAverage( TRIXLine, SigLineXMALen1 ) ;
SignalLine2 = XAverage( TRIXLine, SigLineXMALen2 ) ;
Plot1( TRIXLine, "TRIXLine1" ) ;
Plot2( SignalLine1, "SignalLine1" ) ;
Plot3( SignalLine2, "SignalLine2" ) ;
Plot1( TRIXLine, "TRIXLine1" ) ;
if TRIXLine >= TRIXLine[1] then
SetPlotColor(1,rgb (0,127,255)){slateblue}
else
SetPlotcolor(1,rgb(255,36,0));
Plot2( SignalLine1, "SignalLine1" ) ;
if SignalLine1 >= SignalLine1[1] then
SetPlotColor(2,green)
else
SetPlotcolor(2,Magenta);
Plot3( SignalLine2, "SignalLine2" ) ;
if SignalLine2 >= 0 then
SetPlotcolor (3,DarkGreen)
else
SetPlotcolor (3,darkred);
Comment