Re[2]: TSI Indicator

[Jim Johnson <jejohn@xxxxxxxxxxxxxxxx>]

Hello Milton,

When I posted the TSI I think I forgot one of the funcitons
(TXAverage).  Let me know if you have further problems and I'll just
send you the ela.  Here it is:

{FORMAT: TXAverage(Price,r,s,u) }

Inputs: Price(NumericSeries), r(NumericSimple),s(NumericSimple),
            u(NumericSimple);

TXAverage = XAverage(XAverage(XAverage(Price,r),s),u) ;



Saturday, December 29, 2001, 7:13:31 AM, you wrote:

1> Hi Jim

1> Was interested in this indicater as well,however I could not get to verify
1> Would you be able to look at and see where the problem may be
1> Thanks kindly,and hope you dont mind.

1> Milton Cooper
1> PS how can I find some technical info on this indicater



1> ----- Original Message -----
1> From: "Jim Johnson" <jejohn@xxxxxxxxxxxxxxxx>
1> To: "mguess" <mguess@xxxxxxxxxxxxx>
1> Cc: "Omega Users Group" <omega-list@xxxxxxxxxx>
1> Sent: Monday, December 24, 2001 10:24 AM
1> Subject: Re: TSI Indicator


>> Hello mguess,
>>
>>
>> {function}
>>
>>  {FORMAT: TSI(Price,r,s,u)         Where: r = length of first EMA
>> smoothing of 1 day momentum,                          s = length of
>> second EMA smoothing of 1 day smooting, u = length of third EMA
>> smooting of 1 daymomentum.}
>>
>> Inputs:    Price(NumericSeries), r(NumericSimple), s(NumericSimple),
>>                u(NumericSimple);
>>
>> Value1= 100*TXAverage(Price-Price[1],r,s,u) ;  { Numerator }
>>
>> Value2=TXAverage(AbsValue(Price-Price[1]),r,s,u) ;   { Denominator }
>>
>> If Value2 <> 0 then TSI = Value1 / Value2
>>
>> Else TSI = 0
>>
>>
>>
>>
>> {indicator}
>>
>> {FORMAT: Ergotic_TSI(Price, r, s, u,, SmthLen)
>>         where r = length of first EMA smoothing of 1 day momentum,
>>                          s = length of second EMA smoothing of 1 day
1> smooting,
>>                         u = length of third EMA smooting of 1 daymomentum,
>>                         SmthLen = length of ema signal line.}
>>
>>
>> Inputs: Price(medianprice), r(4),  s(8), u(6), Zeroline(0), SmthLen(3);
>>
>> Value1 = TSI(Price, r, s, u);
>>
>> Value2 = XAverage(TSI(Price, r, s, u), SmthLen);
>>
>> Plot1(Value1, "Ergotic");
>> Plot2(0," ZLine");
>> Plot3(Value2, "SigLin");
>>
>>
>>
>>
>>
>> Sunday, December 23, 2001, 4:52:06 PM, you wrote:
>>
>> m> Does anyone have the code for the TSI (Trend Strength Indicator, I
>> m> believe) described in the current issue of Active Trader?
>>
>> m> Thnx,
>>
>> m> Michael
>>
>>
>>
>> --
>> Best regards,
>>  Jim                            mailto:jejohn@xxxxxxxxxxxxxxxx
>>





-- 
Best regards,
 Jim                            mailto:jejohn@xxxxxxxxxxxxxxxx