StockFetcher Forums · Filter Exchange · Who really wants to find the next NTRI?<< 1 ... 24 25 26 27 28 ... 31 >>Post Follow-up
heyen
124 posts
msg #43941
Ignore heyen
5/20/2006 9:43:29 AM

The strongest stocks (= highest gain in shortest time) fell like rocks all together, cause big boys were pulling their money out.
(Profit taking due to trend reversal)

I'd say that proofs that the filter is pretty right.
Hadn't the overall trend changed, they might had kept going up...... and up....


kanuk
32 posts
msg #44009
Ignore kanuk
5/21/2006 8:27:05 PM

TRO - Your 'next NTRI' filters have a gazillion 'set' statements. What extra SF features to you have that allow the successful debugging of these filters?


TheRumpledOne
6,411 posts
msg #44087
Ignore TheRumpledOne
5/23/2006 10:28:41 AM

Debugging? LOL!

The way to build "bells and whistles" filters like I do is to code/debug each part separately and then copy/paste to build the final filter...SIMPLE!!

I am an Advanced SF user.

HTH.


TheRumpledOne
6,411 posts
msg #44283
Ignore TheRumpledOne
5/27/2006 5:57:22 PM

Fetcher[
/* FINDING THE NEXT NTRI FILTER - for week of May 29, 2006 */

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

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

set{Double, UpperLim * .50 }

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

set{PCT, LimDiff / LowerLim}

set{InPlayVol, volume / 10000 }
set{InPlayPct, InPlayVol / shares outstanding}

/* inside bars filter display */

set{xTop, count(high < high 1 day ago , 1) }
set{xBot, count(low > low 1 day ago , 1) }
set{ibar, xTop + xBot}


/* ENHANCED TREND DISPLAY */

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{a1, T200 * 1}
Set{a2, T60 * 10}
Set{a3, T10 * 100}

Set{aa, a1 + a2}
Set{TREND, aa + a3}
set{T10a,days(10 day slope of the close below 0, 100)}
set{T60a,days(60 day slope of the close below 0, 100)}
set{T200a,days(200 day slope of the close below 0, 100)}

ADD COLUMN TREND
ADD COLUMN T10a
ADD COLUMN T60a
ADD COLUMN T200a

and add column InPlayPct
and add column shares outstanding

and add column ibar

draw T10a
draw T60a on plot t10a
draw T200a on plot t10a

set{HiOp,high - open}
set{OpLo, open - low}

set{CCb,days(close is above close 1 day ago,100)}
set{CCa,days(close is below close 1 day ago,100)}
set{ClxCl, CCa - CCb}
/*
set{HHb,days(High is above High 1 day ago,100)}
set{HHa,days(High is below High 1 day ago,100)}
set{HixHi, HHa - HHb}

set{LLb,days(Low is above Low 1 day ago,100)}
set{LLa,days(Low is below Low 1 day ago,100)}
set{LoxLo, LLa - LLb}
*/
set{VolUp, days(volume is below volume 1 day ago,100)}
set{VolDn, days(volume is above volume 1 day ago,100)}
set{VlXvl, VolUp - VolDn}

set{vck1, volume 1 day ago }
set{vck, volume / vck1 }
set{vdbl, days(vck < 2, 100)}

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}

set{RChg, count( UpperLim equal UpperLim 1 day ago, 1 ) }
set{SChg, count( LowerLim equal LowerLim 1 day ago, 1 ) }

/* Volatility Direction Filter Display */

set{BBDiff, Upper Bollinger Band(20) - Lower Bollinger Band(20) }

set{BBDb,days(BBDiff is above BBDiff 1 day ago,100)}
set{BBDa,days(BBDiff is below BBDiff 1 day ago,100)}
set{BBTrend, BBDa - BBDb}

set{ATRb,days(ATR(14) is above ATR(14) 1 day ago,100)}
set{ATRa,days(ATR(14) is below ATR(14) 1 day ago,100)}
set{ATRTrend, ATRa - ATRb}

/* profit had you bought the open 5 days ago and sold at the high */

set{High5, High 5 day High}
set{Profit, High5 - open 5 days ago}

/* Narrow Channel Breakout Display */

set{ High20, high 20 day high}
set{ Low20, low 20 day low}

set{ New20High, count( high above High20 1 day ago , 1 ) }
set{ New20Low, count( low below Low20 1 day ago , 1 ) }

/* column display */

add column HiOp
add column OpLo
add column Profit

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

add column RChg
add column SChg

add column New20High
add column New20Low

AND ADD COLUMN BBTrend
AND ADD COLUMN ATRTrend

/* PLOTS */

draw UpperLim on plot price
draw LowerLim on plot price

/* NORMALIZE accumulation distribution */

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

/* NORMALIZE momentum(12) */

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

/* NORMALIZE rsi(2) */

set{rsval, RSI(2) }

/* NORMALIZE williams %r(10) */

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

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

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

and add column clxcl
and add column VlXvl
and add column Vdbl
/*
add column HixHi
add column LoxLo
*/
add column Bullpower
add column Bearpower
add column BLxBL
add column BRxBR

/* Selection Criteria */


UpperLim above 1
LowerLim below 1

close below 15

avg vol(5) above 500000
avg vol(30) above 500000

add column industry

Sort column 5 descending
]




Fetcher[
/* FINDING THE NEXT NTRI FILTER Double Version - for week of May 29, 2006 */


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

/* enter your Lower Limit criteria */
set{LowerLim, Low 23 week Low}
set{Double, UpperLim * .50 }

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

set{PCT, LimDiff / LowerLim}

set{InPlayVol, volume / 10000 }
set{InPlayPct, InPlayVol / shares outstanding}

/* inside bars filter display */

set{xTop, count(high < high 1 day ago , 1) }
set{xBot, count(low > low 1 day ago , 1) }
set{ibar, xTop + xBot}


/* ENHANCED TREND DISPLAY */

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{a1, T200 * 1}
Set{a2, T60 * 10}
Set{a3, T10 * 100}

Set{aa, a1 + a2}
Set{TREND, aa + a3}
set{T10a,days(10 day slope of the close below 0, 100)}
set{T60a,days(60 day slope of the close below 0, 100)}
set{T200a,days(200 day slope of the close below 0, 100)}

ADD COLUMN TREND
ADD COLUMN T10a
ADD COLUMN T60a
ADD COLUMN T200a

and add column InPlayPct
and add column shares outstanding

and add column ibar

draw T10a
draw T60a on plot t10a
draw T200a on plot t10a

set{HiOp,high - open}
set{OpLo, open - low}

set{CCb,days(close is above close 1 day ago,100)}
set{CCa,days(close is below close 1 day ago,100)}
set{ClxCl, CCa - CCb}
/*
set{HHb,days(High is above High 1 day ago,100)}
set{HHa,days(High is below High 1 day ago,100)}
set{HixHi, HHa - HHb}

set{LLb,days(Low is above Low 1 day ago,100)}
set{LLa,days(Low is below Low 1 day ago,100)}
set{LoxLo, LLa - LLb}
*/
set{VolUp, days(volume is below volume 1 day ago,100)}
set{VolDn, days(volume is above volume 1 day ago,100)}
set{VlXvl, VolUp - VolDn}

set{vck1, volume 1 day ago }
set{vck, volume / vck1 }
set{vdbl, days(vck < 2, 100)}

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}

set{RChg, count( UpperLim equal UpperLim 1 day ago, 1 ) }
set{SChg, count( LowerLim equal LowerLim 1 day ago, 1 ) }

/* Volatility Direction Filter Display */

set{BBDiff, Upper Bollinger Band(20) - Lower Bollinger Band(20) }

set{BBDb,days(BBDiff is above BBDiff 1 day ago,100)}
set{BBDa,days(BBDiff is below BBDiff 1 day ago,100)}
set{BBTrend, BBDa - BBDb}

set{ATRb,days(ATR(14) is above ATR(14) 1 day ago,100)}
set{ATRa,days(ATR(14) is below ATR(14) 1 day ago,100)}
set{ATRTrend, ATRa - ATRb}

/* profit had you bought the open 5 days ago and sold at the high */

set{High5, High 5 day High}
set{Profit, High5 - open 5 days ago}

/* Narrow Channel Breakout Display */

set{ High20, high 20 day high}
set{ Low20, low 20 day low}

set{ New20High, count( high above High20 1 day ago , 1 ) }
set{ New20Low, count( low below Low20 1 day ago , 1 ) }

/* column display */

add column HiOp
add column OpLo
add column Profit

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

add column RChg
add column SChg

add column New20High
add column New20Low

AND ADD COLUMN BBTrend
AND ADD COLUMN ATRTrend

/* PLOTS */

draw UpperLim on plot price
draw LowerLim on plot price

/* NORMALIZE accumulation distribution */

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

/* NORMALIZE momentum(12) */

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

/* NORMALIZE rsi(2) */

set{rsval, RSI(2) }

/* NORMALIZE williams %r(10) */

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

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

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

and add column clxcl
and add column VlXvl
and add column Vdbl
/*
add column HixHi
add column LoxLo
*/
add column Bullpower
add column Bearpower
add column BLxBL
add column BRxBR

/* Selection Criteria */


LowerLim below Double

close above .50

avg vol(5) above 500000
avg vol(30) above 500000

add column industry

Sort column 5 descending
]







TheRumpledOne
6,411 posts
msg #44572
Ignore TheRumpledOne
6/3/2006 6:16:40 PM


Fetcher[
/* FINDING THE NEXT NTRI FILTER - for week of June 5, 2006 */


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

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

set{Double, UpperLim * .50 }

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

set{PCT, LimDiff / LowerLim}

set{InPlayVol, volume / 10000 }
set{InPlayPct, InPlayVol / shares outstanding}

/* inside bars filter display */

set{xTop, count(high < high 1 day ago , 1) }
set{xBot, count(low > low 1 day ago , 1) }
set{ibar, xTop + xBot}


/* ENHANCED TREND DISPLAY */

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{a1, T200 * 1}
Set{a2, T60 * 10}
Set{a3, T10 * 100}

Set{aa, a1 + a2}
Set{TREND, aa + a3}
set{T10a,days(10 day slope of the close below 0, 100)}
set{T60a,days(60 day slope of the close below 0, 100)}
set{T200a,days(200 day slope of the close below 0, 100)}

ADD COLUMN TREND
ADD COLUMN T10a
ADD COLUMN T60a
ADD COLUMN T200a

and add column InPlayPct
and add column shares outstanding

and add column ibar

draw T10a
draw T60a on plot t10a
draw T200a on plot t10a

set{HiOp,high - open}
set{OpLo, open - low}

set{CCb,days(close is above close 1 day ago,100)}
set{CCa,days(close is below close 1 day ago,100)}
set{ClxCl, CCa - CCb}
/*
set{HHb,days(High is above High 1 day ago,100)}
set{HHa,days(High is below High 1 day ago,100)}
set{HixHi, HHa - HHb}

set{LLb,days(Low is above Low 1 day ago,100)}
set{LLa,days(Low is below Low 1 day ago,100)}
set{LoxLo, LLa - LLb}
*/
set{VolUp, days(volume is below volume 1 day ago,100)}
set{VolDn, days(volume is above volume 1 day ago,100)}
set{VlXvl, VolUp - VolDn}

set{vck1, volume 1 day ago }
set{vck, volume / vck1 }
set{vdbl, days(vck < 2, 100)}

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}

set{RChg, count( UpperLim equal UpperLim 1 day ago, 1 ) }
set{SChg, count( LowerLim equal LowerLim 1 day ago, 1 ) }

/* Volatility Direction Filter Display */

set{BBDiff, Upper Bollinger Band(20) - Lower Bollinger Band(20) }

set{BBDb,days(BBDiff is above BBDiff 1 day ago,100)}
set{BBDa,days(BBDiff is below BBDiff 1 day ago,100)}
set{BBTrend, BBDa - BBDb}

set{ATRb,days(ATR(14) is above ATR(14) 1 day ago,100)}
set{ATRa,days(ATR(14) is below ATR(14) 1 day ago,100)}
set{ATRTrend, ATRa - ATRb}

/* profit had you bought the open 5 days ago and sold at the high */

set{High5, High 5 day High}
set{Profit, High5 - open 5 days ago}

/* Narrow Channel Breakout Display */

set{ High20, high 20 day high}
set{ Low20, low 20 day low}

set{ New20High, count( high above High20 1 day ago , 1 ) }
set{ New20Low, count( low below Low20 1 day ago , 1 ) }

/* column display */

add column HiOp
add column OpLo
add column Profit

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

add column RChg
add column SChg

add column New20High
add column New20Low

AND ADD COLUMN BBTrend
AND ADD COLUMN ATRTrend

/* PLOTS */

draw UpperLim on plot price
draw LowerLim on plot price

/* NORMALIZE accumulation distribution */

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

/* NORMALIZE momentum(12) */

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

/* NORMALIZE rsi(2) */

set{rsval, RSI(2) }

/* NORMALIZE williams %r(10) */

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

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

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

and add column clxcl
and add column VlXvl
and add column Vdbl
/*
add column HixHi
add column LoxLo
*/
add column Bullpower
add column Bearpower
add column BLxBL
add column BRxBR

/* Selection Criteria */


UpperLim above 1
LowerLim below 1

close below 15

avg vol(5) above 500000
avg vol(30) above 500000

add column industry

Sort column 5 descending
]




Fetcher[
/* FINDING THE NEXT NTRI FILTER Double Version - June 5, 2006 */

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

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

set{Double, UpperLim * .50 }

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

set{PCT, LimDiff / LowerLim}

set{InPlayVol, volume / 10000 }
set{InPlayPct, InPlayVol / shares outstanding}

/* inside bars filter display */

set{xTop, count(high < high 1 day ago , 1) }
set{xBot, count(low > low 1 day ago , 1) }
set{ibar, xTop + xBot}


/* ENHANCED TREND DISPLAY */

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{a1, T200 * 1}
Set{a2, T60 * 10}
Set{a3, T10 * 100}

Set{aa, a1 + a2}
Set{TREND, aa + a3}
set{T10a,days(10 day slope of the close below 0, 100)}
set{T60a,days(60 day slope of the close below 0, 100)}
set{T200a,days(200 day slope of the close below 0, 100)}

ADD COLUMN TREND
ADD COLUMN T10a
ADD COLUMN T60a
ADD COLUMN T200a

and add column InPlayPct
and add column shares outstanding

and add column ibar

draw T10a
draw T60a on plot t10a
draw T200a on plot t10a

set{HiOp,high - open}
set{OpLo, open - low}

set{CCb,days(close is above close 1 day ago,100)}
set{CCa,days(close is below close 1 day ago,100)}
set{ClxCl, CCa - CCb}
/*
set{HHb,days(High is above High 1 day ago,100)}
set{HHa,days(High is below High 1 day ago,100)}
set{HixHi, HHa - HHb}

set{LLb,days(Low is above Low 1 day ago,100)}
set{LLa,days(Low is below Low 1 day ago,100)}
set{LoxLo, LLa - LLb}
*/
set{VolUp, days(volume is below volume 1 day ago,100)}
set{VolDn, days(volume is above volume 1 day ago,100)}
set{VlXvl, VolUp - VolDn}

set{vck1, volume 1 day ago }
set{vck, volume / vck1 }
set{vdbl, days(vck < 2, 100)}

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}

set{RChg, count( UpperLim equal UpperLim 1 day ago, 1 ) }
set{SChg, count( LowerLim equal LowerLim 1 day ago, 1 ) }

/* Volatility Direction Filter Display */

set{BBDiff, Upper Bollinger Band(20) - Lower Bollinger Band(20) }

set{BBDb,days(BBDiff is above BBDiff 1 day ago,100)}
set{BBDa,days(BBDiff is below BBDiff 1 day ago,100)}
set{BBTrend, BBDa - BBDb}

set{ATRb,days(ATR(14) is above ATR(14) 1 day ago,100)}
set{ATRa,days(ATR(14) is below ATR(14) 1 day ago,100)}
set{ATRTrend, ATRa - ATRb}

/* profit had you bought the open 5 days ago and sold at the high */

set{High5, High 5 day High}
set{Profit, High5 - open 5 days ago}

/* Narrow Channel Breakout Display */

set{ High20, high 20 day high}
set{ Low20, low 20 day low}

set{ New20High, count( high above High20 1 day ago , 1 ) }
set{ New20Low, count( low below Low20 1 day ago , 1 ) }

/* column display */

add column HiOp
add column OpLo
add column Profit

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

add column RChg
add column SChg

add column New20High
add column New20Low

AND ADD COLUMN BBTrend
AND ADD COLUMN ATRTrend

/* PLOTS */

draw UpperLim on plot price
draw LowerLim on plot price

/* NORMALIZE accumulation distribution */

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

/* NORMALIZE momentum(12) */

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

/* NORMALIZE rsi(2) */

set{rsval, RSI(2) }

/* NORMALIZE williams %r(10) */

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

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

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

and add column clxcl
and add column VlXvl
and add column Vdbl
/*
add column HixHi
add column LoxLo
*/
add column Bullpower
add column Bearpower
add column BLxBL
add column BRxBR

/* Selection Criteria */


LowerLim below Double

close above .50

avg vol(5) above 500000
avg vol(30) above 500000

add column industry

Sort column 5 descending
]







TheRumpledOne
6,411 posts
msg #44875
Ignore TheRumpledOne
modified
6/11/2006 2:26:44 PM

Fetcher[
/* FINDING THE NEXT NTRI FILTER - for week of June 12, 2006 */

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

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

set{ULCL, UpperLim - close 25 weeks ago}

set{Double, UpperLim * .50 }

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

set{PCT, LimDiff / LowerLim}

set{InPlayVol, volume / 10000 }
set{InPlayPct, InPlayVol / shares outstanding}

/* inside bars filter display */

set{xTop, count(high < high 1 day ago , 1) }
set{xBot, count(low > low 1 day ago , 1) }
set{ibar, xTop + xBot}


/* ENHANCED TREND DISPLAY */

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{a1, T200 * 1}
Set{a2, T60 * 10}
Set{a3, T10 * 100}

Set{aa, a1 + a2}
Set{TREND, aa + a3}
set{T10a,days(10 day slope of the close below 0, 100)}
set{T60a,days(60 day slope of the close below 0, 100)}
set{T200a,days(200 day slope of the close below 0, 100)}

ADD COLUMN TREND
ADD COLUMN T10a
ADD COLUMN T60a
ADD COLUMN T200a

add column ULCL

and add column InPlayPct
and add column shares outstanding

and add column ibar

draw T10a
draw T60a on plot t10a
draw T200a on plot t10a

set{HiOp,high - open}
set{OpLo, open - low}

set{CCb,days(close is above close 1 day ago,100)}
set{CCa,days(close is below close 1 day ago,100)}
set{ClxCl, CCa - CCb}
/*
set{HHb,days(High is above High 1 day ago,100)}
set{HHa,days(High is below High 1 day ago,100)}
set{HixHi, HHa - HHb}

set{LLb,days(Low is above Low 1 day ago,100)}
set{LLa,days(Low is below Low 1 day ago,100)}
set{LoxLo, LLa - LLb}
*/
set{VolUp, days(volume is below volume 1 day ago,100)}
set{VolDn, days(volume is above volume 1 day ago,100)}
set{VlXvl, VolUp - VolDn}

set{vck1, volume 1 day ago }
set{vck, volume / vck1 }
set{vdbl, days(vck < 2, 100)}

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}

set{RChg, count( UpperLim equal UpperLim 1 day ago, 1 ) }
set{SChg, count( LowerLim equal LowerLim 1 day ago, 1 ) }

/* Volatility Direction Filter Display */

set{BBDiff, Upper Bollinger Band(20) - Lower Bollinger Band(20) }

set{BBDb,days(BBDiff is above BBDiff 1 day ago,100)}
set{BBDa,days(BBDiff is below BBDiff 1 day ago,100)}
set{BBTrend, BBDa - BBDb}

set{ATRb,days(ATR(14) is above ATR(14) 1 day ago,100)}
set{ATRa,days(ATR(14) is below ATR(14) 1 day ago,100)}
set{ATRTrend, ATRa - ATRb}

/* profit had you bought the open 5 days ago and sold at the high */

set{High5, High 5 day High}
set{Profit, High5 - open 5 days ago}

/* Narrow Channel Breakout Display */

set{ High20, high 20 day high}
set{ Low20, low 20 day low}

set{ New20High, count( high above High20 1 day ago , 1 ) }
set{ New20Low, count( low below Low20 1 day ago , 1 ) }

/* column display */

add column HiOp
add column OpLo
add column Profit

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

add column RChg
add column SChg

add column New20High
add column New20Low

AND ADD COLUMN BBTrend
AND ADD COLUMN ATRTrend

/* PLOTS */

draw UpperLim on plot price
draw LowerLim on plot price

/* NORMALIZE accumulation distribution */

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

/* NORMALIZE momentum(12) */

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

/* NORMALIZE rsi(2) */

set{rsval, RSI(2) }

/* NORMALIZE williams %r(10) */

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

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

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

and add column clxcl
and add column VlXvl
and add column Vdbl
/*
add column HixHi
add column LoxLo
*/
add column Bullpower
add column Bearpower
add column BLxBL
add column BRxBR

/* Selection Criteria */


UpperLim above 1
LowerLim below 1

close below 15

avg vol(5) above 500000
avg vol(30) above 500000

add column industry

Sort column 5 descending
]




Fetcher[
/* FINDING THE NEXT NTRI FILTER Double Version - June 12, 2006 */

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

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

set{Double, UpperLim * .50 }

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

set{PCT, LimDiff / LowerLim}

set{InPlayVol, volume / 10000 }
set{InPlayPct, InPlayVol / shares outstanding}

/* inside bars filter display */

set{xTop, count(high < high 1 day ago , 1) }
set{xBot, count(low > low 1 day ago , 1) }
set{ibar, xTop + xBot}


/* ENHANCED TREND DISPLAY */

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{a1, T200 * 1}
Set{a2, T60 * 10}
Set{a3, T10 * 100}

Set{aa, a1 + a2}
Set{TREND, aa + a3}
set{T10a,days(10 day slope of the close below 0, 100)}
set{T60a,days(60 day slope of the close below 0, 100)}
set{T200a,days(200 day slope of the close below 0, 100)}

ADD COLUMN TREND
ADD COLUMN T10a
ADD COLUMN T60a
ADD COLUMN T200a

and add column InPlayPct
and add column shares outstanding

and add column ibar

draw T10a
draw T60a on plot t10a
draw T200a on plot t10a

set{HiOp,high - open}
set{OpLo, open - low}

set{CCb,days(close is above close 1 day ago,100)}
set{CCa,days(close is below close 1 day ago,100)}
set{ClxCl, CCa - CCb}
/*
set{HHb,days(High is above High 1 day ago,100)}
set{HHa,days(High is below High 1 day ago,100)}
set{HixHi, HHa - HHb}

set{LLb,days(Low is above Low 1 day ago,100)}
set{LLa,days(Low is below Low 1 day ago,100)}
set{LoxLo, LLa - LLb}
*/
set{VolUp, days(volume is below volume 1 day ago,100)}
set{VolDn, days(volume is above volume 1 day ago,100)}
set{VlXvl, VolUp - VolDn}

set{vck1, volume 1 day ago }
set{vck, volume / vck1 }
set{vdbl, days(vck < 2, 100)}

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}

set{RChg, count( UpperLim equal UpperLim 1 day ago, 1 ) }
set{SChg, count( LowerLim equal LowerLim 1 day ago, 1 ) }

/* Volatility Direction Filter Display */

set{BBDiff, Upper Bollinger Band(20) - Lower Bollinger Band(20) }

set{BBDb,days(BBDiff is above BBDiff 1 day ago,100)}
set{BBDa,days(BBDiff is below BBDiff 1 day ago,100)}
set{BBTrend, BBDa - BBDb}

set{ATRb,days(ATR(14) is above ATR(14) 1 day ago,100)}
set{ATRa,days(ATR(14) is below ATR(14) 1 day ago,100)}
set{ATRTrend, ATRa - ATRb}

/* profit had you bought the open 5 days ago and sold at the high */

set{High5, High 5 day High}
set{Profit, High5 - open 5 days ago}

/* Narrow Channel Breakout Display */

set{ High20, high 20 day high}
set{ Low20, low 20 day low}

set{ New20High, count( high above High20 1 day ago , 1 ) }
set{ New20Low, count( low below Low20 1 day ago , 1 ) }

/* column display */

add column HiOp
add column OpLo
add column Profit

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

add column RChg
add column SChg

add column New20High
add column New20Low

AND ADD COLUMN BBTrend
AND ADD COLUMN ATRTrend

/* PLOTS */

draw UpperLim on plot price
draw LowerLim on plot price

/* NORMALIZE accumulation distribution */

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

/* NORMALIZE momentum(12) */

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

/* NORMALIZE rsi(2) */

set{rsval, RSI(2) }

/* NORMALIZE williams %r(10) */

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

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

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

and add column clxcl
and add column VlXvl
and add column Vdbl
/*
add column HixHi
add column LoxLo
*/
add column Bullpower
add column Bearpower
add column BLxBL
add column BRxBR

/* Selection Criteria */


LowerLim below Double

close above .50

avg vol(5) above 500000
avg vol(30) above 500000

add column industry

Sort column 5 descending
]



I added the ULCL column which is the stock's UPPER LIMIT (HIGH) since the starting point minus the close. In other words, how much profit per share you could have made had you entered and sold at the high. I had to double check because the numbers are so high!!

Note: if a stock was not issued before the start date, then ULCL will be incorrect because the close will be 0 - that's a SF limitation.

MAY ALL YOUR FILLS BE COMPLETE.



TheRumpledOne
6,411 posts
msg #45014
Ignore TheRumpledOne
6/15/2006 8:39:22 PM

Is anyone still making money off this filter?




TheRumpledOne
6,411 posts
msg #45056
Ignore TheRumpledOne
6/17/2006 11:49:20 AM

Fetcher[
/* FINDING THE NEXT NTRI FILTER - for week of June 19, 2006 */


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

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

set{ULCL, UpperLim - close}

set{Double, UpperLim * .50 }

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

set{PCT, LimDiff / LowerLim}

set{InPlayVol, volume / 10000 }
set{InPlayPct, InPlayVol / shares outstanding}

/* inside bars filter display */

set{xTop, count(high < high 1 day ago , 1) }
set{xBot, count(low > low 1 day ago , 1) }
set{ibar, xTop + xBot}


/* ENHANCED TREND DISPLAY */

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{a1, T200 * 1}
Set{a2, T60 * 10}
Set{a3, T10 * 100}

Set{aa, a1 + a2}
Set{TREND, aa + a3}
set{T10a,days(10 day slope of the close below 0, 100)}
set{T60a,days(60 day slope of the close below 0, 100)}
set{T200a,days(200 day slope of the close below 0, 100)}

ADD COLUMN TREND
ADD COLUMN T10a
ADD COLUMN T60a
ADD COLUMN T200a

add column ULCL

and add column InPlayPct
and add column shares outstanding

and add column ibar

draw T10a
draw T60a on plot t10a
draw T200a on plot t10a

set{HiOp,high - open}
set{OpLo, open - low}

set{CCb,days(close is above close 1 day ago,100)}
set{CCa,days(close is below close 1 day ago,100)}
set{ClxCl, CCa - CCb}
/*
set{HHb,days(High is above High 1 day ago,100)}
set{HHa,days(High is below High 1 day ago,100)}
set{HixHi, HHa - HHb}

set{LLb,days(Low is above Low 1 day ago,100)}
set{LLa,days(Low is below Low 1 day ago,100)}
set{LoxLo, LLa - LLb}
*/
set{VolUp, days(volume is below volume 1 day ago,100)}
set{VolDn, days(volume is above volume 1 day ago,100)}
set{VlXvl, VolUp - VolDn}

set{vck1, volume 1 day ago }
set{vck, volume / vck1 }
set{vdbl, days(vck < 2, 100)}

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}

set{RChg, count( UpperLim equal UpperLim 1 day ago, 1 ) }
set{SChg, count( LowerLim equal LowerLim 1 day ago, 1 ) }

/* Volatility Direction Filter Display */

set{BBDiff, Upper Bollinger Band(20) - Lower Bollinger Band(20) }

set{BBDb,days(BBDiff is above BBDiff 1 day ago,100)}
set{BBDa,days(BBDiff is below BBDiff 1 day ago,100)}
set{BBTrend, BBDa - BBDb}

set{ATRb,days(ATR(14) is above ATR(14) 1 day ago,100)}
set{ATRa,days(ATR(14) is below ATR(14) 1 day ago,100)}
set{ATRTrend, ATRa - ATRb}

/* profit had you bought the open 5 days ago and sold at the high */

set{High5, High 5 day High}
set{Profit, High5 - open 5 days ago}

/* Narrow Channel Breakout Display */

set{ High20, high 20 day high}
set{ Low20, low 20 day low}

set{ New20High, count( high above High20 1 day ago , 1 ) }
set{ New20Low, count( low below Low20 1 day ago , 1 ) }

/* column display */

add column HiOp
add column OpLo
add column Profit

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

add column RChg
add column SChg

add column New20High
add column New20Low

AND ADD COLUMN BBTrend
AND ADD COLUMN ATRTrend

/* PLOTS */

draw UpperLim on plot price
draw LowerLim on plot price

/* NORMALIZE accumulation distribution */

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

/* NORMALIZE momentum(12) */

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

/* NORMALIZE rsi(2) */

set{rsval, RSI(2) }

/* NORMALIZE williams %r(10) */

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

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

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

and add column clxcl
and add column VlXvl
and add column Vdbl
/*
add column HixHi
add column LoxLo
*/
add column Bullpower
add column Bearpower
add column BLxBL
add column BRxBR

/* Selection Criteria */


UpperLim above 1
LowerLim below 1

close below 15

avg vol(5) above 500000
avg vol(30) above 500000

add column industry

Sort column 5 descending
]




Fetcher[
/* FINDING THE NEXT NTRI FILTER Double Version - June 19, 2006 */

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

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

set{Double, UpperLim * .50 }

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

set{PCT, LimDiff / LowerLim}

set{InPlayVol, volume / 10000 }
set{InPlayPct, InPlayVol / shares outstanding}

/* inside bars filter display */

set{xTop, count(high < high 1 day ago , 1) }
set{xBot, count(low > low 1 day ago , 1) }
set{ibar, xTop + xBot}


/* ENHANCED TREND DISPLAY */

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{a1, T200 * 1}
Set{a2, T60 * 10}
Set{a3, T10 * 100}

Set{aa, a1 + a2}
Set{TREND, aa + a3}
set{T10a,days(10 day slope of the close below 0, 100)}
set{T60a,days(60 day slope of the close below 0, 100)}
set{T200a,days(200 day slope of the close below 0, 100)}

ADD COLUMN TREND
ADD COLUMN T10a
ADD COLUMN T60a
ADD COLUMN T200a

and add column InPlayPct
and add column shares outstanding

and add column ibar

draw T10a
draw T60a on plot t10a
draw T200a on plot t10a

set{HiOp,high - open}
set{OpLo, open - low}

set{CCb,days(close is above close 1 day ago,100)}
set{CCa,days(close is below close 1 day ago,100)}
set{ClxCl, CCa - CCb}
/*
set{HHb,days(High is above High 1 day ago,100)}
set{HHa,days(High is below High 1 day ago,100)}
set{HixHi, HHa - HHb}

set{LLb,days(Low is above Low 1 day ago,100)}
set{LLa,days(Low is below Low 1 day ago,100)}
set{LoxLo, LLa - LLb}
*/
set{VolUp, days(volume is below volume 1 day ago,100)}
set{VolDn, days(volume is above volume 1 day ago,100)}
set{VlXvl, VolUp - VolDn}

set{vck1, volume 1 day ago }
set{vck, volume / vck1 }
set{vdbl, days(vck < 2, 100)}

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}

set{RChg, count( UpperLim equal UpperLim 1 day ago, 1 ) }
set{SChg, count( LowerLim equal LowerLim 1 day ago, 1 ) }

/* Volatility Direction Filter Display */

set{BBDiff, Upper Bollinger Band(20) - Lower Bollinger Band(20) }

set{BBDb,days(BBDiff is above BBDiff 1 day ago,100)}
set{BBDa,days(BBDiff is below BBDiff 1 day ago,100)}
set{BBTrend, BBDa - BBDb}

set{ATRb,days(ATR(14) is above ATR(14) 1 day ago,100)}
set{ATRa,days(ATR(14) is below ATR(14) 1 day ago,100)}
set{ATRTrend, ATRa - ATRb}

/* profit had you bought the open 5 days ago and sold at the high */

set{High5, High 5 day High}
set{Profit, High5 - open 5 days ago}

/* Narrow Channel Breakout Display */

set{ High20, high 20 day high}
set{ Low20, low 20 day low}

set{ New20High, count( high above High20 1 day ago , 1 ) }
set{ New20Low, count( low below Low20 1 day ago , 1 ) }

/* column display */

add column HiOp
add column OpLo
add column Profit

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

add column RChg
add column SChg

add column New20High
add column New20Low

AND ADD COLUMN BBTrend
AND ADD COLUMN ATRTrend

/* PLOTS */

draw UpperLim on plot price
draw LowerLim on plot price

/* NORMALIZE accumulation distribution */

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

/* NORMALIZE momentum(12) */

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

/* NORMALIZE rsi(2) */

set{rsval, RSI(2) }

/* NORMALIZE williams %r(10) */

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

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

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

and add column clxcl
and add column VlXvl
and add column Vdbl
/*
add column HixHi
add column LoxLo
*/
add column Bullpower
add column Bearpower
add column BLxBL
add column BRxBR

/* Selection Criteria */


LowerLim below Double

close above .50

avg vol(5) above 500000
avg vol(30) above 500000

add column industry

Sort column 5 descending
]



Still working!


TheRumpledOne
6,411 posts
msg #45217
Ignore TheRumpledOne
6/23/2006 6:53:34 PM

Anyone trade PRZ off this filter?




TheRumpledOne
6,411 posts
msg #45215
Ignore TheRumpledOne
modified
7/1/2006 11:28:29 AM

Fetcher[
/* FINDING THE NEXT NTRI FILTER - June 26, 2006 */

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

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

set{ULCL, UpperLim - close}

set{Double, UpperLim * .50 }

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

set{PCT, LimDiff / LowerLim}

set{InPlayVol, volume / 10000 }
set{InPlayPct, InPlayVol / shares outstanding}

/* inside bars filter display */

set{xTop, count(high < high 1 day ago , 1) }
set{xBot, count(low > low 1 day ago , 1) }
set{ibar, xTop + xBot}


/* ENHANCED TREND DISPLAY */

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{a1, T200 * 1}
Set{a2, T60 * 10}
Set{a3, T10 * 100}

Set{aa, a1 + a2}
Set{TREND, aa + a3}
set{T10a,days(10 day slope of the close below 0, 100)}
set{T60a,days(60 day slope of the close below 0, 100)}
set{T200a,days(200 day slope of the close below 0, 100)}

ADD COLUMN TREND
ADD COLUMN T10a
ADD COLUMN T60a
ADD COLUMN T200a

add column ULCL

and add column InPlayPct
and add column shares outstanding

and add column ibar

draw T10a
draw T60a on plot t10a
draw T200a on plot t10a

set{HiOp,high - open}
set{OpLo, open - low}

set{CCb,days(close is above close 1 day ago,100)}
set{CCa,days(close is below close 1 day ago,100)}
set{ClxCl, CCa - CCb}
/*
set{HHb,days(High is above High 1 day ago,100)}
set{HHa,days(High is below High 1 day ago,100)}
set{HixHi, HHa - HHb}

set{LLb,days(Low is above Low 1 day ago,100)}
set{LLa,days(Low is below Low 1 day ago,100)}
set{LoxLo, LLa - LLb}
*/
set{VolUp, days(volume is below volume 1 day ago,100)}
set{VolDn, days(volume is above volume 1 day ago,100)}
set{VlXvl, VolUp - VolDn}

set{vck1, volume 1 day ago }
set{vck, volume / vck1 }
set{vdbl, days(vck < 2, 100)}

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}

set{RChg, count( UpperLim equal UpperLim 1 day ago, 1 ) }
set{SChg, count( LowerLim equal LowerLim 1 day ago, 1 ) }

/* Volatility Direction Filter Display */

set{BBDiff, Upper Bollinger Band(20) - Lower Bollinger Band(20) }

set{BBDb,days(BBDiff is above BBDiff 1 day ago,100)}
set{BBDa,days(BBDiff is below BBDiff 1 day ago,100)}
set{BBTrend, BBDa - BBDb}

set{ATRb,days(ATR(14) is above ATR(14) 1 day ago,100)}
set{ATRa,days(ATR(14) is below ATR(14) 1 day ago,100)}
set{ATRTrend, ATRa - ATRb}

/* profit had you bought the open 5 days ago and sold at the high */

set{High5, High 5 day High}
set{Profit, High5 - open 5 days ago}

/* Narrow Channel Breakout Display */

set{ High20, high 20 day high}
set{ Low20, low 20 day low}

set{ New20High, count( high above High20 1 day ago , 1 ) }
set{ New20Low, count( low below Low20 1 day ago , 1 ) }

/* column display */

add column HiOp
add column OpLo
add column Profit

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

add column RChg
add column SChg

add column New20High
add column New20Low

AND ADD COLUMN BBTrend
AND ADD COLUMN ATRTrend

/* PLOTS */

draw UpperLim on plot price
draw LowerLim on plot price

/* NORMALIZE accumulation distribution */

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

/* NORMALIZE momentum(12) */

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

/* NORMALIZE rsi(2) */

set{rsval, RSI(2) }

/* NORMALIZE williams %r(10) */

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

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

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

and add column clxcl
and add column VlXvl
and add column Vdbl
/*
add column HixHi
add column LoxLo
*/
add column Bullpower
add column Bearpower
add column BLxBL
add column BRxBR

/* Selection Criteria */


UpperLim above 1
LowerLim below 1

close below 15

avg vol(5) above 500000
avg vol(30) above 500000

add column industry

Sort column 5 descending
]




Fetcher[
/* FINDING THE NEXT NTRI FILTER Double Version - June 26, 2006 */

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

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

set{Double, UpperLim * .50 }

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

set{PCT, LimDiff / LowerLim}

set{InPlayVol, volume / 10000 }
set{InPlayPct, InPlayVol / shares outstanding}

/* inside bars filter display */

set{xTop, count(high < high 1 day ago , 1) }
set{xBot, count(low > low 1 day ago , 1) }
set{ibar, xTop + xBot}


/* ENHANCED TREND DISPLAY */

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{a1, T200 * 1}
Set{a2, T60 * 10}
Set{a3, T10 * 100}

Set{aa, a1 + a2}
Set{TREND, aa + a3}
set{T10a,days(10 day slope of the close below 0, 100)}
set{T60a,days(60 day slope of the close below 0, 100)}
set{T200a,days(200 day slope of the close below 0, 100)}

ADD COLUMN TREND
ADD COLUMN T10a
ADD COLUMN T60a
ADD COLUMN T200a

and add column InPlayPct
and add column shares outstanding

and add column ibar

draw T10a
draw T60a on plot t10a
draw T200a on plot t10a

set{HiOp,high - open}
set{OpLo, open - low}

set{CCb,days(close is above close 1 day ago,100)}
set{CCa,days(close is below close 1 day ago,100)}
set{ClxCl, CCa - CCb}
/*
set{HHb,days(High is above High 1 day ago,100)}
set{HHa,days(High is below High 1 day ago,100)}
set{HixHi, HHa - HHb}

set{LLb,days(Low is above Low 1 day ago,100)}
set{LLa,days(Low is below Low 1 day ago,100)}
set{LoxLo, LLa - LLb}
*/
set{VolUp, days(volume is below volume 1 day ago,100)}
set{VolDn, days(volume is above volume 1 day ago,100)}
set{VlXvl, VolUp - VolDn}

set{vck1, volume 1 day ago }
set{vck, volume / vck1 }
set{vdbl, days(vck < 2, 100)}

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}

set{RChg, count( UpperLim equal UpperLim 1 day ago, 1 ) }
set{SChg, count( LowerLim equal LowerLim 1 day ago, 1 ) }

/* Volatility Direction Filter Display */

set{BBDiff, Upper Bollinger Band(20) - Lower Bollinger Band(20) }

set{BBDb,days(BBDiff is above BBDiff 1 day ago,100)}
set{BBDa,days(BBDiff is below BBDiff 1 day ago,100)}
set{BBTrend, BBDa - BBDb}

set{ATRb,days(ATR(14) is above ATR(14) 1 day ago,100)}
set{ATRa,days(ATR(14) is below ATR(14) 1 day ago,100)}
set{ATRTrend, ATRa - ATRb}

/* profit had you bought the open 5 days ago and sold at the high */

set{High5, High 5 day High}
set{Profit, High5 - open 5 days ago}

/* Narrow Channel Breakout Display */

set{ High20, high 20 day high}
set{ Low20, low 20 day low}

set{ New20High, count( high above High20 1 day ago , 1 ) }
set{ New20Low, count( low below Low20 1 day ago , 1 ) }

/* column display */

add column HiOp
add column OpLo
add column Profit

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

add column RChg
add column SChg

add column New20High
add column New20Low

AND ADD COLUMN BBTrend
AND ADD COLUMN ATRTrend

/* PLOTS */

draw UpperLim on plot price
draw LowerLim on plot price

/* NORMALIZE accumulation distribution */

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

/* NORMALIZE momentum(12) */

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

/* NORMALIZE rsi(2) */

set{rsval, RSI(2) }

/* NORMALIZE williams %r(10) */

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

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

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

and add column clxcl
and add column VlXvl
and add column Vdbl
/*
add column HixHi
add column LoxLo
*/
add column Bullpower
add column Bearpower
add column BLxBL
add column BRxBR

/* Selection Criteria */


LowerLim below Double

close above .50

avg vol(5) above 500000
avg vol(30) above 500000

add column industry

Sort column 5 descending
]













StockFetcher Forums · Filter Exchange · Who really wants to find the next NTRI?<< 1 ... 24 25 26 27 28 ... 31 >>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.