| Welcome Guest, please sign in to participate in a discussion. | Search | Active Topics | |
Registered User
Joined: 9/3/2008
Posts: 12
|
Hello,I am a new platinum subscriber and am looking for help with creating the following conditions in IchimokuRealcode to identify the following (Bullish Signal)
1) Tenkan above Kijun
2) Price above Kijun
3) Chiku above price curve 26 periods ago
4) Forward kumo bullish (SenkouA above SenkouB)
5) Chiku above the kumo at its location
6) Price above kumo at its location
If you can provide code for these individual events as well as all of the above collectively that will be great. The Bearish signal will be the opposite of the above. In addition can I also pl request your help in identifying the following conditions Chiku - Kumo BreakoutCode to identify whenever chiku enters the kumo in its location and exists.Price - Kumo BreakoutCode to identify whenever price enters the kumo in its location and exists.ThanksSubbu
|
|
Worden Trainer
Joined: 10/7/2004
Posts: 65,138
|
QUOTE (SUBBUMEENA) 1) Tenkan above Kijun
If (Price.MaxHigh(9) + Price.MinLow(9)) / 2 > (Price.MaxHigh(26) + Price.MinLow(26)) / 2 Then Pass
QUOTE (SUBBUMEENA) 2) Price above Kijun
If Price.Last > (Price.MaxHigh(26) + Price.MinLow(26)) / 2 Then Pass
QUOTE (SUBBUMEENA) 3) Chiku above price curve 26 periods ago
If Price.Last > Price.Last(26) Then Pass
QUOTE (SUBBUMEENA) 4) Forward kumo bullish (SenkouA above SenkouB)
If (Price.MaxHigh(9) + Price.MinLow(9) + Price.MaxHigh(26) + Price.MinLow(26)) / 4 > _
(Price.MaxHigh(52) + Price.MinLow(52)) / 2 Then Pass
QUOTE (SUBBUMEENA) 5) Chiku above the kumo at its location
If Price.Last > System.Math.Max((Price.MaxHigh(9, 52) + _
Price.MinLow(9, 52) + Price.MaxHigh(26, 52) + Price.MinLow(26, 52)) / 4, _
(Price.MaxHigh(52, 52) + Price.MinLow(52, 52)) / 2) Then Pass
QUOTE (SUBBUMEENA) 6) Price above kumo at its location
If Price.Last > System.Math.Max((Price.MaxHigh(9, 26) + _
Price.MinLow(9, 26) + Price.MaxHigh(26, 26) + Price.MinLow(26, 26)) / 4, _
(Price.MaxHigh(52, 26) + Price.MinLow(52, 26)) / 2) Then Pass
Combining them results in the following RealCode Condition:
'|*****************************************************************|
'|*** StockFinder RealCode Condition - Version 4.9 www.worden.com
'|*** Copy and paste this header and code into StockFinder *********
'|*** Condition:Bullish Signal
'|******************************************************************
If (Price.MaxHigh(9) + Price.MinLow(9)) / 2 > _
(Price.MaxHigh(26) + Price.MinLow(26)) / 2 AndAlso _
Price.Last > (Price.MaxHigh(26) + Price.MinLow(26)) / 2 AndAlso _
Price.Last > Price.Last(26) AndAlso _
(Price.MaxHigh(9) + Price.MinLow(9) + Price.MaxHigh(26) + Price.MinLow(26)) / 4 > _
(Price.MaxHigh(52) + Price.MinLow(52)) / 2 AndAlso _
Price.Last > System.Math.Max((Price.MaxHigh(9, 52) + _
Price.MinLow(9, 52) + Price.MaxHigh(26, 52) + Price.MinLow(26, 52)) / 4, _
(Price.MaxHigh(52, 52) + Price.MinLow(52, 52)) / 2) AndAlso _
Price.Last > System.Math.Max((Price.MaxHigh(9, 26) + _
Price.MinLow(9, 26) + Price.MaxHigh(26, 26) + Price.MinLow(26, 26)) / 4, _
(Price.MaxHigh(52, 26) + Price.MinLow(52, 26)) / 2) Then Pass
Reversing this results in:
'|*****************************************************************|
'|*** StockFinder RealCode Condition - Version 4.9 www.worden.com
'|*** Copy and paste this header and code into StockFinder *********
'|*** Condition:Bearish Signal
'|******************************************************************
If (Price.MaxHigh(9) + Price.MinLow(9)) / 2 < _
(Price.MaxHigh(26) + Price.MinLow(26)) / 2 AndAlso _
Price.Last < (Price.MaxHigh(26) + Price.MinLow(26)) / 2 AndAlso _
Price.Last < Price.Last(26) AndAlso _
(Price.MaxHigh(9) + Price.MinLow(9) + Price.MaxHigh(26) + Price.MinLow(26)) / 4 < _
(Price.MaxHigh(52) + Price.MinLow(52)) / 2 AndAlso _
Price.Last < System.Math.Min((Price.MaxHigh(9, 52) + _
Price.MinLow(9, 52) + Price.MaxHigh(26, 52) + Price.MinLow(26, 52)) / 4, _
(Price.MaxHigh(52, 52) + Price.MinLow(52, 52)) / 2) AndAlso _
Price.Last < System.Math.Min((Price.MaxHigh(9, 26) + _
Price.MinLow(9, 26) + Price.MaxHigh(26, 26) + Price.MinLow(26, 26)) / 4, _
(Price.MaxHigh(52, 26) + Price.MinLow(52, 26)) / 2) Then Pass
You may wish to review the following:
Ichimoku, Who?
-Bruce
Personal Criteria Formulas
TC2000 Support Articles
|
|
Registered User
Joined: 9/3/2008
Posts: 12
|
Awesome Bruce, exactly what I was looking for. Thanks and appreicate your quick response.
-Subbu
|
|
Worden Trainer
Joined: 10/7/2004
Posts: 65,138
|
You're welcome.
-Bruce
Personal Criteria Formulas
TC2000 Support Articles
|
|
Registered User
Joined: 9/3/2008
Posts: 12
|
Hi Bruce,
Can you pl convert the above SF conditions to Telechart PCF's.
Thanks
Subbu
|
|
Worden Trainer
Joined: 10/7/2004
Posts: 65,138
|
QUOTE (SUBBUMEENA) 1) Tenkan above Kijun
(MAXH9 + MINL9) / 2 > (MAXH26 + MINL26) / 2
QUOTE (SUBBUMEENA) 2) Price above Kijun
C > (MAXH26 + MINL26) / 2
QUOTE (SUBBUMEENA) 3) Chiku above price curve 26 periods ago
C > C26
QUOTE (SUBBUMEENA) 4) Forward kumo bullish (SenkouA above SenkouB)
(MAXH9 + MINL9 + MAXH26 + MINL26) / 4 > (MAXH52 + MINL52) / 2
QUOTE (SUBBUMEENA) 5) Chiku above the kumo at its location
C > ((MAXH9.52 + MINL9.52 + MAXH26.52 + MINL26.52) / 4 + (MAXH52.52 + MINL52.52) / 2 + ABS((MAXH9.52 + MINL9.52 + MAXH26.52 + MINL26.52) / 4 - (MAXH52.52 + MINL52.52) / 2)) / 2
QUOTE (SUBBUMEENA) 6) Price above kumo at its location
C > ((MAXH9.26 + MINL9.26 + MAXH26.26 + MINL26.26) / 4 + (MAXH52.26 + MINL52.26) / 2 + ABS((MAXH9.26 + MINL9.26 + MAXH26.26 + MINL26.26) / 4 - (MAXH52.26 + MINL52.26) / 2)) / 2
Combining them results in the following RealCode Condition:
(MAXH9 + MINL9) / 2 > (MAXH26 + MINL26) / 2 AND C > (MAXH26 + MINL26) / 2 AND C > C26 AND (MAXH9 + MINL9 + MAXH26 + MINL26) / 4 > (MAXH52 + MINL52) / 2 AND C > ((MAXH9.52 + MINL9.52 + MAXH26.52 + MINL26.52) / 4 + (MAXH52.52 + MINL52.52) / 2 + ABS((MAXH9.52 + MINL9.52 + MAXH26.52 + MINL26.52) / 4 - (MAXH52.52 + MINL52.52) / 2)) / 2 AND C > ((MAXH9.26 + MINL9.26 + MAXH26.26 + MINL26.26) / 4 + (MAXH52.26 + MINL52.26) / 2 + ABS((MAXH9.26 + MINL9.26 + MAXH26.26 + MINL26.26) / 4 - (MAXH52.26 + MINL52.26) / 2)) / 2
Reversing this results in:
(MAXH9 + MINL9) / 2 < (MAXH26 + MINL26) / 2 AND C < (MAXH26 + MINL26) / 2 AND C < C26 AND (MAXH9 + MINL9 + MAXH26 + MINL26) / 4 < (MAXH52 + MINL52) / 2 AND C < ((MAXH9.52 + MINL9.52 + MAXH26.52 + MINL26.52) / 4 + (MAXH52.52 + MINL52.52) / 2 - ABS((MAXH9.52 + MINL9.52 + MAXH26.52 + MINL26.52) / 4 - (MAXH52.52 + MINL52.52) / 2)) / 2 AND C < ((MAXH9.26 + MINL9.26 + MAXH26.26 + MINL26.26) / 4 + (MAXH52.26 + MINL52.26) / 2 - ABS((MAXH9.26 + MINL9.26 + MAXH26.26 + MINL26.26) / 4 - (MAXH52.26 + MINL52.26) / 2)) / 2
-Bruce
Personal Criteria Formulas
TC2000 Support Articles
|
|
Registered User
Joined: 10/7/2004
Posts: 364
|
Bruce, take another look at the reacode for the bearish Ichimoku -
You wrote:
Reversing this results in:
'|*****************************************************************|
'|*** StockFinder RealCode Condition - Version 4.9 www.worden.com
'|*** Copy and paste this header and code into StockFinder *********
'|*** Condition:Bearish Signal
'|******************************************************************
If (Price.MaxHigh(9) + Price.MinLow(9)) / 2 < _
(Price.MaxHigh(26) + Price.MinLow(26)) / 2 AndAlso _
Price.Last > (Price.MaxHigh(26) + Price.MinLow(26)) / 2 AndAlso _
Price.Last < Price.Last(26) AndAlso _
(Price.MaxHigh(9) + Price.MinLow(9) + Price.MaxHigh(26) + Price.MinLow(26)) / 4 < _
(Price.MaxHigh(52) + Price.MinLow(52)) / 2 AndAlso _
Price.Last < System.Math.Min((Price.MaxHigh(9, 52) + _
Price.MinLow(9, 52) + Price.MaxHigh(26, 52) + Price.MinLow(26, 52)) / 4, _
(Price.MaxHigh(52, 52) + Price.MinLow(52, 52)) / 2) AndAlso _
Price.Last < System.Math.Min((Price.MaxHigh(9, 26) + _
Price.MinLow(9, 26) + Price.MaxHigh(26, 26) + Price.MinLow(26, 26)) / 4, _
(Price.MaxHigh(52, 26) + Price.MinLow(52, 26)) / 2) Then Pass
Shouldn't that be:
Price.Last < (Price.MaxHigh(26) + Price.MinLow(26)) / 2 AndAlso
I noticed this when I was looking at the negative side and it did not look correct.
|
|
Registered User
Joined: 10/7/2004
Posts: 364
|
Bruce, I did not see a response to my post over the week-end. Can you comment, Please?
Kermit
|
|
Administration
Joined: 9/30/2004
Posts: 9,187
|
Bruce is on vacation and will return Monday, October 25th. I'll send this post to him directly.
|
|
Worden Trainer
Joined: 10/7/2004
Posts: 65,138
|
Kermitp,
I'm not back from vacation, but you have a good eye. You do in fact want to change reverse the > to a < in that line as well. It has been corrected in the original post.
-Bruce
Personal Criteria Formulas
TC2000 Support Articles
|
|
|
Guest-1 |