| Welcome Guest, please sign in to participate in a discussion. | Search | Active Topics | |
Registered User
Joined: 1/11/2010
Posts: 3
|
could you help me . there is an indicator "average true range buy sell signals". I believe this is modified from the original.Charles Kirk uses it in stock finder. I am looking for the codes that are suitable to apply
it to stockfinder 5
Mr Kirk suggested asking in discussion forums
thanks leigh kennedy
|
|
Worden Trainer
Joined: 10/7/2004
Posts: 65,138
|
The only thing I can think of that comes close to this description is our interpretation of the June 2009 Trader's Tips from S&C magazine. The Trailing Stop Indicators have Short and Long Labels which might be the signals of interest.
- Select Share | Browse other users shared items.
- Select the Charts tab (it should be selected by default).
- Type June Traders Tips in the search bar.
- Select Search.
- Select Craig_S' June Traders Tips from 4/10/2009 12:28:13 PM.
- Select Open
You can type something less than the complete phrase June Traders Tips in the search, but if you do so, please make sure you select the June Traders Tips created by Craig_S.
You can right-click on the ATR or TS Indicators in the Chart and select Edit RealCode to view the RealCode. The RealCode used for Modified ATR itself is:
'# Period = UserInput.Integer = 5
'# Cumulative
Static SMArange As Single
Static ATR As Single
Static sumWeight As Single
Static termRatio As Single
If isFirstBar Then
SMArange = 0
sumWeight = 1
termRatio = (Period - 1) / Period
End If
SMArange += (Price.High - Price.Low) / Period
If CurrentIndex >= Period Then
SMArange -= (Price.High(Period) - Price.Low(Period)) / Period
End If
If CurrentIndex >= Period - 1 Then
Dim HiLo As Single = System.Math.Min(Price.High - Price.Low, 1.5 * SMArange)
Dim Href As Single
If Price.Low <= Price.High(1) Then
Href = Price.High - Price.Last(1)
Else
Href = Price.High - Price.Last(1) - (Price.Low - Price.High(1)) / 2
End If
Dim Lref As Single
If Price.High >= Price.Low(1) Then
Lref = Price.Last(1) - Price.Low
Else
Lref = Price.Last(1) - Price.Low(1) - (Price.Low(1) - Price.High) / 2
End If
Dim diff1 As Single = System.Math.Max(HiLo, Href)
Dim diff2 As Single = System.Math.Max(diff1, Lref)
Dim Weight As Single = 1 / sumWeight
ATR = ATR * (1 - Weight) + Weight * diff2
sumWeight = sumWeight * termRatio + 1
Plot = ATR
Else
Plot = Single.NaN
End If
-Bruce
Personal Criteria Formulas
TC2000 Support Articles
|
|
Registered User
Joined: 10/7/2004
Posts: 18
|
Hello,
Try this for a simple idea. I shared the layout in StockFinder 5.
Modified ATR "BLOCK DIAGRAM" to show an ATR based stop loss. Dragged indicator to watchlist for quick reference. Indicator can now be pinned out of the way.
Good trading, GENE
|
|
Registered User
Joined: 1/11/2010
Posts: 3
|
Hi
thanks for info re ATR Iam set up
cheers.
leigh
|
|
Registered User
Joined: 7/21/2007
Posts: 188
|
Hi Tech Guys!How would one paint the price chart to "red" if the price was below the Modified ATR TS and green if it was above?Jim.
|
|
Worden Trainer
Joined: 10/7/2004
Posts: 65,138
|
You can Drag and Drop Price onto the Modified ATR TS to create Conditions for Price being above or below the TS.
Creating Conditions
And Drag and Drop those Conditions onto Price History to use them as part of the Paint Scheme for Price History (using whatever color has been set for the Condition).
Paint Schemes
-Bruce
Personal Criteria Formulas
TC2000 Support Articles
|
|
Registered User
Joined: 7/21/2007
Posts: 188
|
Got ya. Thanks, Bruce.Jim.
|
|
Worden Trainer
Joined: 10/7/2004
Posts: 65,138
|
You're welcome.
-Bruce
Personal Criteria Formulas
TC2000 Support Articles
|
|
|
Guest-1 |