StockFetcher Forums · Filter Exchange ·  And The Hits Just Keep On Coming!!!<< 1 2 3 4 >>Post Follow-up
alf44
2,025 posts
msg #41928
Ignore alf44
3/12/2006 12:44:08 PM

...I'M THINKING THE THREAD TITLE SHOULD HAVE BEEN IN REALLY REALLY BIG CAPITAL LETTERS !!!




alf44
2,025 posts
msg #41932
Ignore alf44
3/12/2006 1:03:50 PM

...nice change...

Of course, there IS the matter of that obnoxious screenname...

...in REALLY REALLY BIG CAPITAL LETTERS !


WALLSTREETGENIUS
983 posts
msg #41931
Ignore WALLSTREETGENIUS
modified
3/12/2006 1:06:00 PM

You know "Alfred", I was thinking that very same thing! But I didn't want all of you to think that I was just seeking attention or trying to be over the top. LOL....


RIGGS.



Koronbock
201 posts
msg #41933
Ignore Koronbock
modified
3/12/2006 1:21:28 PM

<<You know "Alfred", I was thinking that very same thing! But I didn't want all of you to think that I was just seeking attention <<

Well,
you are doing this ALL the time with your inflated ego. A GOOD DOSE OF MODESTY is what the doctor should prescribe for you. But that word probably does not exist in your mindset. Apparently you have failed to realize that REALLY great people ARE modest. Your handle WALLSTREETGENIUS says it all.



WALLSTREETGENIUS
983 posts
msg #41934
Ignore WALLSTREETGENIUS
modified
3/12/2006 2:01:45 PM

Kornblock -

Just file the filter in your "my filters", and don't worry about "really nice people." Those kinds of people AREN'T going to make you $Money$. It's the evil guys that spell in "CAPITALS" that are gonna make you rich! LOL....

THE MIGHTY RIGGS!




WALLSTREETGENIUS
983 posts
msg #41921
Ignore WALLSTREETGENIUS
modified
3/12/2006 2:49:14 PM

Just when I thought I couldn't improve on my last filter, it dawned on me that the only thing that was missing was DIVERGENCE! And after fixing Avery's "WARM ZOOM LENS" and renaming it "ACCUMULATION WARM POP-80," I knew I was getting close to developing the perfect filter.

I just needed to bring ADVAL above 80 and CCVAL, MOVAL, AND WRVAL below 5. When this happens, it's THEN, that the stock has nowhere to go but up! So with the three below 5, it will always be riding the BOTTOM of Linear Regression(60)But remember, it's 60-day slope of the close will always be above zero, and with ADVAL above 80, that means there is still major interest(smart money)in every stock.

So what's next? DIVERGENCE! Something will ALWAYS happen when divergence appears in Force Index(2), RSI(2), or Bearpower below zero. But to find it, you have to keep working that "offset date" for 2 or 3 days. I guarantee divergence will appear in EVERY stock from this filter within 3 days or you'll get a long white candle breakout. Hell, it has to! Remember, these are stocks that have heavy interest(A/D above 80)and can't do anything but go up.

Let's try it shall we? Let's offset it 2 days to March 8th. As you can clearly see, all 8 matches in the performance column are in the "green." Let's start with [DIOD). Arter the three amigos(CCVAL,MOVAL,WRVAL)hit below 5, the very next day it popped from the very open. Also, notice the only other time they went close to being below 5 in that last 3 months, it started a new uptrend in the first week of this new year.

Let's try another one (JLL). What happened? It also popped without divergence. And again the last time the "three" were close to below 5, what happened? THE VERY NEXT DAY it started a new major trend on 12/30/05. Now look at the rest of them(ACN,UAPH,ESE,POT,LYG,AIRM). What's the one common denominator they all have? That's right...they all popped and started a new trend THE NEXT DAY after at least one of "the three" hit below 5, while ADVAL stayed above 80.

Now let's move the "offset" to 3 days 3/7/06. Now were gonna be dealing with divergence. We've got 13 matches and 10 of them are in "the green." Look at(MGLN). This baby should surely pop on this coming Monday 3/13/06. Divergence is EVERYWHERE! We see it in Force Index(2), Bearpower and even in RSI(2). Now look at(FRX). Here again, divergence in all three by Thursday 3/9/06. Now Take a look at(AGII)It's in the "red", but on Friday 3/10/06 you see a long white Bullish engulfing candle just primed for a new uptrend. Look at(TEN,ARW,WLT)all showing divergence and white candles by Friday's close.

So B-4 SOMEONE say's "it's not what you trade," I'm here to say "IT'S WHEN YOU TRADE IT!" Anyway, I hope someone is looking for a new filter, and could use some blind faith.


**** THE MIGHTY RIGGS ACCUMULATION WARM POP-80 *****

Fetcher[close is above 20
60-day slope of close is above 0
Do not draw 60-day slope of close
Draw EMA(13)
Set{Bullpower, high minus ema(13)}
Set{Bearpower, low minus ema(13)}
set{BLb,days(BullPower is above BullPower 1 day ago,100)}
set{BLa,days(BullPower is below BullPower 1 day ago,100)}
set{BLxBL, BLa - BLb}
set{BRb,days(BearPower is above BearPower 1 day ago,100)}
set{BRa,days(BearPower is below BearPower 1 day ago,100)}
set{BRxBR, BRa - BRb}
Draw Bullpower
Draw Bearpower
add column BLxBL
add column BRxBR
Draw Bullpower
Draw Bearpower
Draw RSI(2)
average volume(90)is above 100000
volume is above 100000
sort column 3 descending
offset 0 days


**** ACCUMULATION WARM POP-80 ****

/* NORMALIZE accumulation distribution */

set{adval, INDPOSITION(accumulation distribution, 60) * 100 }

/* NORMALIZE momentum(12) */

set{moval, INDPOSITION(momentum(12), 60) * 100}

/* NORMALIZE CCI(14) */

set{ccval, INDPOSITION(CCI(14), 60) * 100 }

/* NORMALIZE williams %r(10) */

set{wrval, INDPOSITION(williams %r(10), 60) * 100 }


/* DRAW THE MP CCIWLR CHART */

and draw wrval
and draw adval on plot wrval
and draw moval on plot wrval
and draw ccval on plot wrval

add column adval
add column ccval
add column moval
add column wrval

adval is above 80
ccval is below 5
moval is below 5
wrval is below 5
]





**** RSI(2) DIVERGENCE & ACCUMULATION WARM POP-80 ****

Fetcher[close is above 20
close is below open
RSI(2)is above RSI(2)2 days ago
and RSI(2)is decreasing 1 day
60-day slope of close is above 0
Do not draw 60-day slope of close
Draw EMA(13)
Set{Bullpower, high minus ema(13)}
Set{Bearpower, low minus ema(13)}
set{BLb,days(BullPower is above BullPower 1 day ago,100)}
set{BLa,days(BullPower is below BullPower 1 day ago,100)}
set{BLxBL, BLa - BLb}
set{BRb,days(BearPower is above BearPower 1 day ago,100)}
set{BRa,days(BearPower is below BearPower 1 day ago,100)}
set{BRxBR, BRa - BRb}
Draw Bullpower
Draw Bearpower
add column BLxBL
add column BRxBR
Draw Bullpower
Draw Bearpower
average volume(90)is above 100000
volume is above 100000
sort column 2 descending
offset 1 days


**** ACCUMULATION WARM POP-80 ****

/* NORMALIZE accumulation distribution */

set{adval, INDPOSITION(accumulation distribution, 60) * 100 }

/* NORMALIZE momentum(12) */

set{moval, INDPOSITION(momentum(12), 60) * 100}

/* NORMALIZE CCI(14) */

set{ccval, INDPOSITION(CCI(14), 60) * 100 }

/* NORMALIZE williams %r(10) */

set{wrval, INDPOSITION(williams %r(10), 60) * 100 }


/* DRAW THE MP CCIWLR CHART */

and draw wrval
and draw adval on plot wrval
and draw moval on plot wrval
and draw ccval on plot wrval

add column adval
add column ccval
add column moval
add column wrval

adval is above 80
ccval is below 30
moval is below 30
wrval is below 30
]












RIGGS













TheRumpledOne
6,411 posts
msg #41937
Ignore TheRumpledOne
modified
3/12/2006 3:57:35 PM

If you wanted divergence, then why didn't you program the filter to find divergence in the first place?

I know I have posted this code before (long before Riggs was a SF user LOL!):

Fetcher[
/* Positive Divergence 2 - 5 days*/

set{nd2,count(close below close 2 days ago,1) * count(rsi(2) above rsi(2) 2 days ago,1)}}

set{nd3,count(close below close 3 days ago,1) * count(rsi(2) above rsi(2) 3 days ago,1)}

set{nd4,count(close below close 4 days ago,1) * count(rsi(2) above rsi(2) 4 days ago,1)}

set{nd5,count(close below close 5 days ago,1) * count(rsi(2) above rsi(2) 5 days ago,1) }

Set{n1, nd5 * 1}
Set{n2, nd4 * 10}
Set{n3, nd3 * 100}
Set{n4, nd2 * 1000}

Set{na, n1 + n2}
Set{nb, n3 + n4}
Set{PD2345, na + nb}

Set{Bullpower, high minus ema(13)}
Set{Bearpower, low minus ema(13)}
set{BLb,days(BullPower is above BullPower 1 day ago,100)}
set{BLa,days(BullPower is below BullPower 1 day ago,100)}
set{BLxBL, BLa - BLb}
set{BRb,days(BearPower is above BearPower 1 day ago,100)}
set{BRa,days(BearPower is below BearPower 1 day ago,100)}
set{BRxBR, BRa - BRb}



/* NORMALIZE accumulation distribution */

set{adval, INDPOSITION(accumulation distribution, 60) * 100 }

/* NORMALIZE momentum(12) */

set{moval, INDPOSITION(momentum(12), 60) * 100}

/* NORMALIZE CCI(14) */

set{ccval, INDPOSITION(CCI(14), 60) * 100 }

/* NORMALIZE williams %r(10) */

set{wrval, INDPOSITION(williams %r(10), 60) * 100 }

/* NORMALIZE rsi(2) */

set{rsval, RSI(2) }
set{T10, count(10 day slope of the close above 0,1)}
set{T60, count(60 day slope of the close above 0,1)}
set{T200, count(200 day slope of the close above 0,1)}

Set{u1, T200 * 1}
Set{u2, T60 * 10}
Set{u3, T10 * 100}

Set{uu, u1 + u2}
Set{TREND, uu + u3}

/* DRAW THE MP CCIWLR CHART */

and draw wrval
and draw adval on plot wrval
and draw moval on plot wrval
and draw rsval on plot wrval
and draw ccval on plot wrval

Do not draw 60-day slope of close
Draw EMA(13)
Draw Bullpower
Draw Bearpower

add column PD2345
add column TREND

add column BLxBL
add column BRxBR

add column wrval
add column adval
add column rsval
add column moval
add column ccval

adval is above 80
ccval is below 30
moval is below 30
wrval is below 30

PD2345 above 0


average volume(90)is above 100000

volume is above 100000

sort column 5 descending

]



Riggs, you didn't fix my filter, you tweaked it as in altered it.. big difference. FIX implies it was broken as in CODING ERRORS.

I guess I just "FIXED" your divergence filter...lol I got rid of redundant code. It's funny, you call it YOUR FILTER when about 90% of the code came from my filter!

I added the TREND column so you can see the 10, 60 and 200 day trend of the stock based on the 10/60/200 day slope of the close.

1xx = 10 day up trend
x1x = 60 day up trend
xx1 = 200 day up trend

The PD2345 column has a 1 if there is 2, 3, 4, or 5 day positive divegence.

1xxx = 2 day pos div
x1xx = 3 day pos div
xx1x = 4 day pos div
xxx1 = 5 day pos div

Just one other thing, Riggs, taking out rsval only makes the chart harder to read because it no longer matches the colors on www.prophet.net that many traders are use to seeing. So I added rsval back it to keep the color scheme the same.

MAY ALL YOUR FILLS BE COMPLETE.











TheRumpledOne
6,411 posts
msg #41939
Ignore TheRumpledOne
3/12/2006 4:16:15 PM

This looks like a "LOVE 'EM AND LEAVE 'EM" FILTER. I think that's what I'll call it "L.E.A.L.E. FILTER"...LOL

The stocks go up for 1 - 3 days.

You have to just love RSI(2) and positive divergence!!

Most of the picks show green.

MAY ALL YOUR FILLS BE COMPLETE.



TheRumpledOne
6,411 posts
msg #41938
Ignore TheRumpledOne
modified
3/12/2006 4:21:41 PM

Now let's add support/resistance to the filter:

Fetcher[
/* Positive Divergence 2 - 5 days*/

set{nd2,count(close below close 2 days ago,1) * count(rsi(2) above rsi(2) 2 days ago,1)}}

set{nd3,count(close below close 3 days ago,1) * count(rsi(2) above rsi(2) 3 days ago,1)}

set{nd4,count(close below close 4 days ago,1) * count(rsi(2) above rsi(2) 4 days ago,1)}

set{nd5,count(close below close 5 days ago,1) * count(rsi(2) above rsi(2) 5 days ago,1) }

Set{n1, nd5 * 1}
Set{n2, nd4 * 10}
Set{n3, nd3 * 100}
Set{n4, nd2 * 1000}

Set{na, n1 + n2}
Set{nb, n3 + n4}
Set{PD2345, na + nb}

Set{Bullpower, high minus ema(13)}
Set{Bearpower, low minus ema(13)}
set{BLb,days(BullPower is above BullPower 1 day ago,100)}
set{BLa,days(BullPower is below BullPower 1 day ago,100)}
set{BLxBL, BLa - BLb}
set{BRb,days(BearPower is above BearPower 1 day ago,100)}
set{BRa,days(BearPower is below BearPower 1 day ago,100)}
set{BRxBR, BRa - BRb}



/* NORMALIZE accumulation distribution */

set{adval, INDPOSITION(accumulation distribution, 60) * 100 }

/* NORMALIZE momentum(12) */

set{moval, INDPOSITION(momentum(12), 60) * 100}

/* NORMALIZE CCI(14) */

set{ccval, INDPOSITION(CCI(14), 60) * 100 }

/* NORMALIZE williams %r(10) */

set{wrval, INDPOSITION(williams %r(10), 60) * 100 }

/* NORMALIZE rsi(2) */

set{rsval, RSI(2) }
set{T10, count(10 day slope of the close above 0,1)}
set{T60, count(60 day slope of the close above 0,1)}
set{T200, count(200 day slope of the close above 0,1)}

Set{u1, T200 * 1}
Set{u2, T60 * 10}
Set{u3, T10 * 100}

Set{uu, u1 + u2}
Set{TREND, uu + u3}

/* enter your Upper Limit criteria */
set{UpperLim, High 12 week High}

/* enter your Lower Limit criteria */
set{LowerLim, Low 12 week Low}

set{LimDiff, UpperLim minus LowerLim}
set{PPDiff, CLOSE minus LowerLim}
set{PPDiv, PPDiff / LimDiff}
set{BallOn, PPDiv * 100}

set{PCT, LimDiff / LowerLim}

/* DRAW THE MP RSIWLR CHART */

and draw wrval
and draw adval on plot wrval
and draw moval on plot wrval
and draw rsval on plot wrval
and draw ccval on plot wrval

Do not draw 60-day slope of close
Draw EMA(13)
Draw Bullpower
Draw Bearpower
Draw FI(2)


add column PD2345
add column TREND

add column BallOn
add column UpperLim {Resist}
add column LowerLim {Support}

add column BLxBL
add column BRxBR

add column wrval
add column adval
add column rsval
add column moval
add column ccval

/* selection criteria */

adval is above 80
ccval is below 30
moval is below 30
wrval is below 30

PD2345 above 0

TREND above 0

average volume(90)is above 100000

volume is above 100000

sort column 7 ascending


]



Now we know the position of the stock (BallOn) in relation to Support/Resistance. BallOn can be used to know when the price is approaching/crossing a fib retracement level: 0, 23, 38, 50, 61, 76, 100.

The filter sorts the BallOn column so the stocks nearest to support are at the top of the list.

I added the criteria TREND above 0 so we only look at uptrending stocks.

I also added FI(2) since Riggs mentioned it but it wasn't in the filter as posted. Guess I fixed your filter again, Riggs...LOL!

Now this filter is loaded with information goodies.

You going to fix this one, Riggs? LOL!!

MAY ALL YOUR FILLS BE COMPLETE.







TheRumpledOne
6,411 posts
msg #41940
Ignore TheRumpledOne
modified
3/12/2006 4:27:06 PM

Fetcher[
/* FORCE INDEX Positive Divergence 2 - 5 days*/

set{nd2,count(close below close 2 days ago,1) * count(FI(2) above FI(2) 2 days ago,1)}}

set{nd3,count(close below close 3 days ago,1) * count(FI(2) above FI(2) 3 days ago,1)}

set{nd4,count(close below close 4 days ago,1) * count(FI(2) above FI(2) 4 days ago,1)}

set{nd5,count(close below close 5 days ago,1) * count(FI(2) above FI(2) 5 days ago,1) }

Set{n1, nd5 * 1}
Set{n2, nd4 * 10}
Set{n3, nd3 * 100}
Set{n4, nd2 * 1000}

Set{na, n1 + n2}
Set{nb, n3 + n4}
Set{PD2345, na + nb}

Set{Bullpower, high minus ema(13)}
Set{Bearpower, low minus ema(13)}
set{BLb,days(BullPower is above BullPower 1 day ago,100)}
set{BLa,days(BullPower is below BullPower 1 day ago,100)}
set{BLxBL, BLa - BLb}
set{BRb,days(BearPower is above BearPower 1 day ago,100)}
set{BRa,days(BearPower is below BearPower 1 day ago,100)}
set{BRxBR, BRa - BRb}



/* NORMALIZE accumulation distribution */

set{adval, INDPOSITION(accumulation distribution, 60) * 100 }

/* NORMALIZE momentum(12) */

set{moval, INDPOSITION(momentum(12), 60) * 100}

/* NORMALIZE CCI(14) */

set{ccval, INDPOSITION(CCI(14), 60) * 100 }

/* NORMALIZE williams %r(10) */

set{wrval, INDPOSITION(williams %r(10), 60) * 100 }

/* NORMALIZE rsi(2) */

set{rsval, RSI(2) }
set{T10, count(10 day slope of the close above 0,1)}
set{T60, count(60 day slope of the close above 0,1)}
set{T200, count(200 day slope of the close above 0,1)}

Set{u1, T200 * 1}
Set{u2, T60 * 10}
Set{u3, T10 * 100}

Set{uu, u1 + u2}
Set{TREND, uu + u3}

/* enter your Upper Limit criteria */
set{UpperLim, High 12 week High}

/* enter your Lower Limit criteria */
set{LowerLim, Low 12 week Low}

set{LimDiff, UpperLim minus LowerLim}
set{PPDiff, CLOSE minus LowerLim}
set{PPDiv, PPDiff / LimDiff}
set{BallOn, PPDiv * 100}

set{PCT, LimDiff / LowerLim}

/* DRAW THE MP RSIWLR CHART */

and draw wrval
and draw adval on plot wrval
and draw moval on plot wrval
and draw rsval on plot wrval
and draw ccval on plot wrval

Do not draw 60-day slope of close
Draw EMA(13)
Draw Bullpower
Draw Bearpower
Draw FI(2)


add column FIPD2345
add column TREND

add column BallOn
add column UpperLim {Resist}
add column LowerLim {Support}

add column BLxBL
add column BRxBR

add column wrval
add column adval
add column rsval
add column moval
add column ccval

/* WARM selection criteria */

adval is above 80
ccval is below 30
moval is below 30
wrval is below 30

/* DIVERGENCE AND TREND selection criteria */

PD2345 above 0

TREND above 0

/* price volume selection criteria */

close above 20

average volume(90)is above 100000
volume is above 100000

sort column 7 ascending

]



This version test for Positive Divergence between price and the FORCE INDEX(2).

I put the close > $20 back in just for you, Riggs.

You owe me bigtime for this, Riggs!



StockFetcher Forums · Filter Exchange ·  And The Hits Just Keep On Coming!!!<< 1 2 3 4 >>Post Follow-up

*** Disclaimer *** StockFetcher.com does not endorse or suggest any of the securities which are returned in any of the searches or filters. They are provided purely for informational and research purposes. StockFetcher.com does not recommend particular securities. StockFetcher.com, Vestyl Software, L.L.C. and involved content providers shall not be liable for any errors or delays in the content, or for any actions taken based on the content.


Copyright 2022 - Vestyl Software L.L.C.Terms of Service | License | Questions or comments? Contact Us
EOD Data sources: DDFPlus & CSI Data Quotes delayed during active market hours. Delay times are at least 15 mins for NASDAQ, 20 mins for NYSE and Amex. Delayed intraday data provided by DDFPlus


This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.