StockFetcher Forums · Filter Exchange · Who really wants to find the next NTRI?<< 1 ... 27 28 29 30 31 >>Post Follow-up
TheRumpledOne
6,362 posts
msg #48140
Ignore TheRumpledOne
11/24/2006 2:30:27 PM


CURRENT VERSION - UPDATED WEEKLY

Fetcher[
/* FINDING THE NEXT NTRI FILTER - Nov 27, 2006 */

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

/* enter your Lower Limit criteria */
set{LowerLim, Low 49 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 - Nov 27, 2006 */

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

/* enter your Lower Limit criteria */
set{LowerLim, Low 49 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,362 posts
msg #48141
Ignore TheRumpledOne
modified
11/24/2006 2:42:07 PM

whoops!


TheRumpledOne
6,362 posts
msg #48300
Ignore TheRumpledOne
12/1/2006 8:15:40 PM


CURRENT VERSION - UPDATED WEEKLY

Fetcher[
/* FINDING THE NEXT NTRI FILTER - Dec 4, 2006 */

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

/* enter your Lower Limit criteria */
set{LowerLim, Low 50 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 - Dec 4, 2006 */

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

/* enter your Lower Limit criteria */
set{LowerLim, Low 50 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
]







jacobnbr1
37 posts
msg #48303
Ignore jacobnbr1
12/1/2006 11:02:44 PM

Hey rumple:
where is it you check for inst. buying on qote.com? I didn't see anything there.


TheRumpledOne
6,362 posts
msg #48591
Ignore TheRumpledOne
12/13/2006 4:24:01 PM


CURRENT VERSION - UPDATED WEEKLY

Fetcher[
/* FINDING THE NEXT NTRI FILTER - Dec 11, 2006 */

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

/* enter your Lower Limit criteria */
set{LowerLim, Low 51 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 - Dec 11, 2006 */

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

/* enter your Lower Limit criteria */
set{LowerLim, Low 51 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,362 posts
msg #48592
Ignore TheRumpledOne
12/13/2006 4:25:20 PM

jacobnbr1
12/1/2006 11:02:44 PM

Hey rumple:
where is it you check for inst. buying on qote.com? I didn't see anything there.
=========================================================================

Enter a ticker symbol and get the quote.

Then click on the I-Watch tab.




TheRumpledOne
6,362 posts
msg #41242
Ignore TheRumpledOne
modified
12/15/2006 5:13:43 PM

Scroll down for current version.

ORIGINAL VERSION:

Fetcher[
/* Dollar stocks Dynamic Support/Resistance with TRADE PLANNER DISPLAY */

/* PRICE POSITION PERCENT DISPLAY */

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

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

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

set{PCT, LimDiff / LowerLim}

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)}

/* column display */

add column HiOp
add column OpLo

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

/* PLOTS */

draw UpperLim on plot price
draw LowerLim on plot price

/* Trade Planner Filter Display - Simple */

set{ iAccountSize , 25000 }
set{ iPercentRisk, .02}
set{ iMarginMult , 1}
set{ iMaxDrawDownPct, .05}
set{ iEntryPrice , close}

set{ iShares, 0 }
set{ iProtectiveStop , 0}

set{ iTargetPrice , 0}
set{ iRewardRatio , 2}

set{ xMaxDollars, iAccountSize * iMarginMult }


set{ xTradeRisk, xMaxDollars * iPercentRisk }

set{ xShares , xMaxDollars / iEntryPrice }

set{ xShareRisk , xTradeRisk / xShares }


set{ xStop , iEntryPrice - xShareRisk }

set{ xtp, xShareRisk * iRewardRatio }
set{ xTarget , xtp + iEntryPrice }


add column xShares
add column xStop
add column xTarget
add column xTradeRisk

and add column clxcl
and add column VlXvl
and add column Vdbl
add column HixHi
add column LoxLo

/* Selection Criteria */


UpperLim above 1
LowerLim below 1

close below 5

avg vol(5) above 1000000
avg vol(30) above 1000000

add column industry

Sort column 7 ascending
]



Who really wants to find the next NTRI?

This filter is step 1. It looks for stocks that have had lows under a dollar and highs over a dollar. It displays support/resistance and where the price is (Ball On) in relation. It also "plans the trades": position size, target and stop price. You customize the planner section to reflect your portfolio size, risk tolerance, etc... Also every week the upperlim and lowerlim needs to be incremented to reflect the number of weeks since the beginning of the year. You don't have to do that but to be consistant you should.


Step 2 is checking the I-Watch tab on www.quote.com. We are looking for institutional buying. Someone needs to check each stock each day or at least once a week!

Step 3 is checking www.form4oracle.com for insider buying.

This should be a group effort. Who wants to be a part of this?

Remember XSNX? That stock is looking ready for takeoff again.

MAY ALL YOUR FILLS BE COMPLETE.
================================================================================

CURRENT VERSION - UPDATED WEEKLY

Fetcher[
/* FINDING THE NEXT NTRI FILTER - Dec 18, 2006 */

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

/* enter your Lower Limit criteria */
set{LowerLim, Low 52 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 - Dec 18, 2006 */

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

/* enter your Lower Limit criteria */
set{LowerLim, Low 52 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,362 posts
msg #48638
Ignore TheRumpledOne
12/15/2006 5:14:17 PM


CURRENT VERSION - UPDATED WEEKLY

Fetcher[
/* FINDING THE NEXT NTRI FILTER - Dec 18, 2006 */

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

/* enter your Lower Limit criteria */
set{LowerLim, Low 52 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 - Dec 18, 2006 */

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

/* enter your Lower Limit criteria */
set{LowerLim, Low 52 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
]



Has it been a year already? Wow!


TheRumpledOne
6,362 posts
msg #56911
Ignore TheRumpledOne
11/21/2007 3:05:51 PM

stocktrader

I just transferred $1,000 into TRO's account.

Why did I do this?

Not because TRO need it, but to show a small token of appreciation of all the work he does for FREE.

The Next NTRI filter has made me almost $20,000 in a little over 4 weeks.

There is no other filter on the SF site that is better than this one.

My filter search is over. I just rake in money now.

Thanks TRO.
=================================================

Stocktrader, are you still raking it in??

blindgeezer
1 posts
msg #56953
Ignore blindgeezer
11/23/2007 6:40:04 AM

since we cannot buy all of the stocks that fits the criteria, which ones are we supposed to buy ???

StockFetcher Forums · Filter Exchange · Who really wants to find the next NTRI?<< 1 ... 27 28 29 30 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 2016 - 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