StockFetcher Forums · Filter Exchange · Who really wants to find the next NTRI?<< 1 ... 24 25 26 27 28 ... 31 >>Post Follow-up
TheRumpledOne
6,529 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,529 posts
msg #45014
- Ignore TheRumpledOne		 6/15/2006 8:39:22 PM

Is anyone still making money off this filter?




TheRumpledOne
6,529 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,529 posts
msg #45217
- Ignore TheRumpledOne		 6/23/2006 6:53:34 PM

Anyone trade PRZ off this filter?




TheRumpledOne
6,529 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
]
TheRumpledOne
6,529 posts
msg #45415
- Ignore TheRumpledOne
modified		 7/1/2006 11:30:05 AM

CURRENT VERSION - UPDATED WEEKLY

Fetcher[
/* FINDING THE NEXT NTRI FILTER - July 3, 2006 */

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

/* enter your Lower Limit criteria */
set{LowerLim, Low 28 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 Profit
add column HiOp
add column OpLo


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 - July 3, 2006 */

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

/* enter your Lower Limit criteria */
set{LowerLim, Low 28 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 Profit
add column HiOp
add column OpLo

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,529 posts
msg #45561
- Ignore TheRumpledOne
modified		 7/9/2006 8:09:10 PM

CURRENT VERSION - UPDATED WEEKLY

Fetcher[
/* FINDING THE NEXT NTRI FILTER - July 10, 2006 */

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

/* enter your Lower Limit criteria */
set{LowerLim, Low 29 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{BallOnx, PPDiv * 100}
set{BallOn, round(BallOnx,0)}

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 - July 10, 2006 */

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

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


set{Double, UpperLim * .50 }

set{LimDiff, UpperLim minus LowerLim}
set{PPDiff, CLOSE minus LowerLim}
set{PPDiv, PPDiff / LimDiff}
set{BallOnx, PPDiv * 100}
set{BallOn, round(BallOnx,0)}

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,529 posts
msg #45892
- Ignore TheRumpledOne		 7/14/2006 8:54:51 PM

CURRENT VERSION - UPDATED WEEKLY

Fetcher[
/* FINDING THE NEXT NTRI FILTER - July 17, 2006 */

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

/* enter your Lower Limit criteria */
set{LowerLim, Low 30 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{BallOnx, PPDiv * 100}
set{BallOn, round(BallOnx,0)}

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 -July 17, 2006 */

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

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


set{Double, UpperLim * .50 }

set{LimDiff, UpperLim minus LowerLim}
set{PPDiff, CLOSE minus LowerLim}
set{PPDiv, PPDiff / LimDiff}
set{BallOnx, PPDiv * 100}
set{BallOn, round(BallOnx,0)}

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,529 posts
msg #46018
- Ignore TheRumpledOne		 7/21/2006 11:56:39 AM


CURRENT VERSION - UPDATED WEEKLY

Fetcher[
/* FINDING THE NEXT NTRI FILTER - July 24, 2006 */

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

/* enter your Lower Limit criteria */
set{LowerLim, Low 31 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{BallOnx, PPDiv * 100}
set{BallOn, round(BallOnx,0)}

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 - July 24, 2006 */

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

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


set{Double, UpperLim * .50 }

set{LimDiff, UpperLim minus LowerLim}
set{PPDiff, CLOSE minus LowerLim}
set{PPDiv, PPDiff / LimDiff}
set{BallOnx, PPDiv * 100}
set{BallOn, round(BallOnx,0)}

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
]
limestar
79 posts
msg #46026
- Ignore limestar		 7/21/2006 3:51:09 PM

I own PRZ why?
StockFetcher Forums · Filter Exchange · Who really wants to find the next NTRI?<< 1 ... 24 25 26 27 28 ... 31 >>Post Follow-up

StockFetcher Tools
Filter Editor
My Filters
Watch Lists
Chart+
Find Similar Stocks
Shared Lists
Popular Resources
StockFetcher Forums
Indicator List
Filter Phrases
Examples
Site Search
Sector/Industry List
Usage Guide
Support
Contact Us
Support Home

Subscriber
Subscriber Benefits
Settings
Chart
Results
MyFilters
*** 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.