PureBytes Links
Trading Reference Links
|
The word Keltnerchannel is a Function in ts2k. You will need to import it
also and any other functions that the Keltnerchannel function calls that are
not in ts4.
Jerry W.
> -----Original Message-----
> From: Don Roos [mailto:roos@xxxxxxxxxxxxxxx]
> Sent: Thursday, October 26, 2000 8:19 AM
> To: omega-list@xxxxxxxxxx
> Subject: KeltnerChannel
>
>
> Below is the code from ts2000i for Keltner Channel. Since it has the
> displaced input, I decided to import it to ts4. After I
> overwrote the file
> in ts4, I found that it does not verify. The word
> KeltnerChannel is not
> recognized.
>
> If anyone knows how to make the ts5 version functional in
> ts4, it would be
> much appreciated.
>
> Thanks much.
>
> Don
>
> ================================================
>
> {*******************************************************************
> Description : This Indicator plots Keltner Channel
> Provided By : Omega Research, Inc. (c) Copyright 1999
> ********************************************************************}
>
> Inputs: Price(Close), Length(10), Const(2.612), Displace(0);
> Variables: Avg(0), UpperK(0), LowerK(0), AbsDisp(0);
>
> Avg = Average(Price, Length);
> UpperK = KeltnerChannel(Price, Length, Const);
> LowerK = KeltnerChannel(Price, Length, -Const);
>
> If Displace >= 0 OR CurrentBar > AbsValue(Displace) Then Begin
> Plot1[Displace](Avg, "CentLine");
> Plot2[Displace](UpperK, "K_Upper");
> Plot3[Displace](LowerK, "K_Lower");
>
> {Alert Criteria}
> Condition1 = Plot2 <> Plot3;
> If Price > Plot2 AND Condition1 Then
> Alert("Price is above the upper band")
> Else
> If Price < Plot3 AND Condition1 Then
> Alert("Price is below the lower band");
>
> {Keltner Channel Expert Commentary}
> #BeginCmtry
> Commentary(ExpertKeltnerChannel(Plot2, Plot3));
> #End;
> End;
>
|