StockFetcher Forums · View by Author: (6,364 messages)  [ Display By: Date / Subject ]<< 1 2 3 4 5 ... 637 >> 
Filter Exchange ·  % movent up from the 30 day low to the 30 day high
TheRumpledOne
msg #46551
modified		 8/23/2006 3:28:14 PM

Fetcher[
/* % movement up from the 30 day low to the 30 day high */

/* enter your Upper Limit criteria */
set{UpperLim, High 30 Day High}

/* enter your Lower Limit criteria */
set{LowerLim, Low 30 Day Low}

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

set{PCT, LimDiff / LowerLim}

add column BallOn
add column UpperLim
add column LowerLim
add column PCT

close is between .01 and 1.00
average volume(90) 50000

sort column 5 descending
]



Ballon tells you where in the range the close lies.

HTH.





General Discussion ·  ** **Trading The Marquee** **
TheRumpledOne
msg #40021		 1/6/2006 6:42:46 PM

Thank you for sharing.

MAY ALL YOUR FILLS BE COMPLETE.
Filter Exchange ·  And The Hits Just Keep On Coming!!!
TheRumpledOne
msg #41937
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.











Filter Exchange ·  And The Hits Just Keep On Coming!!!
TheRumpledOne
msg #41938
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.







Filter Exchange ·  And The Hits Just Keep On Coming!!!
TheRumpledOne
msg #41939		 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.



Filter Exchange ·  And The Hits Just Keep On Coming!!!
TheRumpledOne
msg #41940
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!



Filter Exchange ·  And The Hits Just Keep On Coming!!!
TheRumpledOne
msg #41948
modified		 3/12/2006 6:18:13 PM

********************************************************************************
The problem with your coding is.... way too many columns and half of them most traders don't know what the hell they are. And more than half of the "results" in YOUR divergence filter, don't even show divergence!

And that "90% of the code"...Dude, nobody even noticed "YOUR ZOOM LENS" till "I" brought it to the forfront and turned it into an ACTUAL filter.
********************************************************************************

Way too many columns? Just use the ones you want! The columns are displays.

Obviously, Riggs, you don't know divergence when it's staring you in the face! LOL!

Lower Price making higher RSI value.. that's positive divergence.

LOOK AGAIN, RIGGS, there's divergence!

Riggs, you must really be hungover with a statement like "nobody noticed my ZOOM LENS." GO SOBER UP!








Filter Exchange ·  And The Hits Just Keep On Coming!!!
TheRumpledOne
msg #41951
modified		 3/12/2006 7:36:05 PM

Rigg's you are not a threat to me.

POSITIVE DIVERGENCE IS LOWER PRICES MAKING HIGHER READINGS ON AN INDICATOR.

Now, if what you want is Pos Div off a recent bottom, that's a subset of Pos Div!

And Riggs, just because no one has anything to say on a thread doesn't imply it's not read!

My TREND Indicator on TradeStation gets about 1,000 views per day! It's the most widely viewed thread by almost a 2 to 1 margin! And guess what, days can go by before someone posts on that thread.

Yes, Riggs, go have a good puke..LOL!!



Filter Exchange ·  And The Hits Just Keep On Coming!!!
TheRumpledOne
msg #41954		 3/12/2006 7:52:19 PM

Using an offset just means the train left the station without you!

You want to jump on while the divergence is occurring.




Filter Exchange ·  And The Hits Just Keep On Coming!!!
TheRumpledOne
msg #41956		 3/12/2006 7:55:16 PM

Here's the filter WITHOUT the offset:

Fetcher[
/* L.E.A.L.E FILTER */

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

average volume(90)is above 100000
volume is above 100000
sort column 2 descending



/* MP RSIWLR ANALYZER DISPLAY */

/* 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{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{n2, nd4 * 10}
Set{n3, nd3 * 100}
Set{n4, nd2 * 1000}

set{na, n2 + n3}
Set{PD2345, na + n4}



/* 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

add column PD2345

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
]



I also added the PD2345 column so you know where the divergence occurred.

MAY ALL YOUR FILLS BE COMPLETE.




StockFetcher Forums ·  · << 1 2 3 4 5 ... 637 >>

*** 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 2018 - 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.