I would like to do this in TC2000 version 12 and beyond when available.

I am interested in being able to locate stocks/etfs that are just beginning to drop below their 50 day moving average on daily charts - like the 1st or 2nd day of the Crossover. 

I would also like to be alerted in my email when this occurs.  And, I would like to see this with symbols that average a minimum volume of 250,000.

Please steer me to the most easily accessible manner - and tell me why this is the best compared to other methods - to present this information. 

Thanks, Bruce!

Have a great weekend. Stay out of the storm!!!!!!!!!!!!!!!!!!!

Recently, I came upon a Condition you created which required a bit of time to create. This is something I have been working on for a period of time but nowhere near as close to the formula you created. This particular Condition concentrated on the downside.

I am more interested in the upside. I am attaching the formula for the downside condition and am asking you to assist me to the upside. I know there are a number of changes necessary but, as I know next to nothing of Real Code, I fear that I would screw it up on my own.

Here is the Condition:

'# BBTop = chart.BollingerBands.0
'# BBBottom = chart.BollingerBands.1
'# Percent = UserInput.Single = 1
'# DiffTop = UserInput.Single = 0.3
'# DiffBot = UserInput.Single = 0.3
'# Cumulative
Static MaDownCount As Integer
Static WithinCount As Integer
Static SixMonthBars As Integer
If isFirstBar Then
    If isYearly Then
        SixMonthBars = 1
    Else If isQuarterly Then
        SixMonthBars = 2
    Else If isMonthly Then
        SixMonthBars = 6
    Else If isWeekly Then
        SixMonthBars = 26
    Else If BarInterval.TotalDays >= 1 Then
        SixMonthBars = 126 / BarInterval.TotalDays
    Else
        SixMonthBars = 126 * System.Math.Ceiling(390 / BarInterval.TotalMinutes)
    End If
End If
If Price.Last(3) <= BBTop.Value(3) AndAlso _
    Price.Last(3) >= BBBottom.Value(3) AndAlso _
    Price.Open(3) <= BBTop.Value(3) AndAlso _
    Price.Open(3) >= BBBottom.Value(3) Then
    WithinCount += 1
Else
    WithinCount = 0
End If
If CurrentIndex >= 20 Then
    If Price.Last < Price.Last(10) AndAlso _
        Price.Last < Price.Last(20) Then
        MaDownCount += 1
    Else
        MaDownCount = 0
    End If
    If CurrentIndex >= 22 Then
        If 100 * (1 - BBBottom.Value(1) / BBBottom.AVG(5, 3)) > Percent AndAlso _
            MaDownCount >= 3 AndAlso _
            WithinCount >= 5 AndAlso _
            Price.Last > Price.Open AndAlso _
            Price.Last(1) < Price.Open(1) AndAlso _
            Price.Last(1) < BBBottom.Value(1) AndAlso _
            Price.Last(2) < Price.Open(2) Then
            Dim Avg As Single = (BBTop.AVG(5, 3) + BBBottom.AVG(5, 3)) / 2
            Dim LowPerc(1) As Single
            LowPerc(0) = Single.MaxValue
            LowPerc(1) = Single.MaxValue
            Dim AvgPerc(1) As Single
            AvgPerc(0) = 0
            AvgPerc(1) = 0
            For j As Integer = 0 To 4
                Dim Perc As Single = 100 * (1 - Avg / BBTop.Value(3 + j))
                LowPerc(0) = System.Math.Min(LowPerc(0), Perc)
                AvgPerc(0) += Perc
                Perc = 100 * (1 - BBBottom.Value(3 + j) / AVG)
                LowPerc(1) = System.Math.Min(LowPerc(1), Perc)
                AvgPerc(1) += Perc
            Next
            AvgPerc(0) = AvgPerc(0) / 5
            AvgPerc(1) = AvgPerc(1) / 5
            Dim HighPeriod As Integer = System.Math.Min(CurrentIndex, SixMonthBars)
            If AvgPerc(0) - LowPerc(0) < DiffTop AndAlso _
                AvgPerc(1) - LowPerc(1) < DiffBot AndAlso _
                Price.MaxClose(5, 3) >= .94 * Price.MaxHigh(HighPeriod) Then
                Pass
            End If
        End If
    Else
        SetIndexInvalid
    End If
Else
    MaDownCount = 0
    SetIndexInvalid
End If

If you need any further information, I will supply it ASAP. 

Thank you!
ucsense1

One more question...

How would I use this formula on Stockfinder 5?

Thanks!

ucsense1

THANK YOU, Bruce! Quick question: How long did it take for you to answer this? - actual time working on the formula? (I just want to see how long I must work with this to be 1/2 as fast as you are.....