StockFetcher Forums · Filter Exchange · The strongest indicator (quote Dr. Elder)<< 1 2 >>Post Follow-up
chetron
2,817 posts
msg #68426
Ignore chetron
modified
10/14/2008 7:32:39 PM

ONE THING I MIGHT DO IS THIS....



Fetcher[




/* TACHIKAWA */

/* WORK IN PROGRESS FOR LONG PLAYS */

set{LBB_40,count(low < lower bollinger band(40,0.4),1)}
set{LBB_9,count(low < lower bollinger band(9,0.4),1)}

Set{vMA20,CMA(volume,20)}
set{vSD,cstddev(volume,20)}
set{vSD20,2 * vSD}
set{vBOLU,vMA20 + vSD20}
set{vBOLD,vMA20 - vSD20}
set{varvol,volume}
SET{TRIP_WIRE,COUNT(VOLUME > vBOLU,13)}

set{BUY_ME,macd(7,12,3)}
set{SHORT_ME,macd(5,3,3)}
set{cross_me,buy_me - short_me}

SET{LONG,COUNT(BUY_ME CROSSED ABOVE SHORT_ME,1)}
SET{SHORT,COUNT(SHORT_ME CROSSED ABOVE BUY_ME,1)}

SET{VAR40,COUNT(3 DAY SLOPE OF BOLLINGER BAND(40,0.4) < 0,1)}
SET{VAR9,COUNT(3 DAY SLOPE OF BOLLINGER BAND(9,0.4) > 0,1)}

set{diff,close - ema(40)}
set{%diff,diff / ema(40)}
set{KISS,%diff * 100}
set{kissma40,cema(kiss,40)}

set{var21, kiss 20 day high}
set{var22, kiss 20 day low}
set{var23, kissma40-var22}
set{var24, var21-var22}
set{var25, var23/var24}
set{super_trig, var25*100}

set{SD,cstddev(kiss,40)}
set{SD40,2 * SD}
set{BOLU,kissma40 + SD40}
set{BOLD,kissma40 - SD40}


draw bolu on plot kiss
draw bold on plot kiss
draw kissma40 on plot KISS
draw kiss 20 day high on plot kiss
draw kiss 20 day low on plot kiss
draw SHORT_ME on plot BUY_ME
draw cross_me LINE AT 0 on plot cross_me
draw trip_wire on plot trip_wire
DRAW Bollinger Band(40,0.4)
draw bollinger band(9,0.4)
DRAW MACD(4,8)

add column KISS
ADD COLUMN SEPARATOR
add column LBB_40
add column LBB_9
ADD COLUMN SEPARATOR
add column BUY_ME
add column SHORT_ME
ADD COLUMN SEPARATOR
add column super_trig
ADD COLUMN SEPARATOR
add column var9
add column var40
add column cross_me
add column trip_wire

var40 above .5
volume above 1955000
close between 2 and 20
lbb_9 above .5
lbb_40 above .5
trip_wire above .5
buy_me above buy_me 1 day ago
buy_me 2 day ago above buy_me 1 day ago

sort column 4 descending

]



johnpaulca
11,289 posts
msg #68428
Ignore johnpaulca
10/14/2008 9:30:33 PM

Chet...yet another amazing filter...keep up the great work.

chetron
2,817 posts
msg #68429
Ignore chetron
10/14/2008 9:47:48 PM


THANX JP, I COULDN'T HAVE DONE THIS ONE WITHOUT YOU. THANX FOR ALL YOUR COACHING.


chetron
2,817 posts
msg #68431
Ignore chetron
10/14/2008 10:13:54 PM

EVEN ....

Fetcher[






/* TACHIKAWA */

/* WORK IN PROGRESS FOR PULLBACK PLAYS */

set{LBB_40,count(low < lower bollinger band(40,0.4),1)}
set{LBB_9,count(low < lower bollinger band(9,0.4),1)}

Set{vMA20,CMA(volume,20)}
set{vSD,cstddev(volume,20)}
set{vSD20,2 * vSD}
set{vBOLU,vMA20 + vSD20}
set{vBOLD,vMA20 - vSD20}
set{varvol,volume}
SET{TRIP_WIRE,COUNT(VOLUME > vBOLU,13)}

set{BUY_ME,macd(7,12,3)}
set{SHORT_ME,macd(5,3,3)}
set{cross_me,buy_me - short_me}

SET{LONG,COUNT(BUY_ME CROSSED ABOVE SHORT_ME,1)}
SET{SHORT,COUNT(SHORT_ME CROSSED ABOVE BUY_ME,1)}

SET{VAR40,COUNT(3 DAY SLOPE OF BOLLINGER BAND(40,0.4) < 0,1)}
SET{VAR9,COUNT(3 DAY SLOPE OF BOLLINGER BAND(9,0.4) > 0,1)}

set{diff,close - ema(40)}
set{%diff,diff / ema(40)}
set{KISS,%diff * 100}
set{kissma40,cema(kiss,40)}

set{var21, kiss 20 day high}
set{var22, kiss 20 day low}
set{var23, kissma40-var22}
set{var24, var21-var22}
set{var25, var23/var24}
set{super_trig, var25*100}

set{SD,cstddev(kiss,40)}
set{SD40,2 * SD}
set{BOLU,kissma40 + SD40}
set{BOLD,kissma40 - SD40}


draw bolu on plot kiss
draw bold on plot kiss
draw kissma40 on plot KISS
draw kiss 20 day high on plot kiss
draw kiss 20 day low on plot kiss
draw SHORT_ME on plot BUY_ME
draw cross_me LINE AT 0 on plot cross_me
draw trip_wire on plot trip_wire
DRAW Bollinger Band(40,0.4)
draw bollinger band(9,0.4)
DRAW MACD(4,8)

add column KISS
ADD COLUMN SEPARATOR
add column LBB_40
add column LBB_9
ADD COLUMN SEPARATOR
add column BUY_ME
add column SHORT_ME
ADD COLUMN SEPARATOR
add column super_trig
ADD COLUMN SEPARATOR
add column var9
add column var40
add column cross_me
add column trip_wire

SHORT_ME 1 DAY AGO BELOW BUY_ME 1 DAY AGO
CROSS_ME ABOVE -0.00
buy_me above buy_me 1 day ago
buy_me 2 day ago above buy_me 1 day ago
TRIP_WIRE ABOVE .5
CLOSE ABOVE 0.10
VOLUME ABOVE 50000
SHORT_ME ABOVE -0.01
VAR9 ABOVE .5
VAR40 ABOVE .5
LBB_40 ABOVE .5
sort column 4 descending

]



chetron
2,817 posts
msg #68434
Ignore chetron
10/15/2008 9:26:48 AM

AND FOR THOSE UP DAYS....


Fetcher[
/* TACHIKAWA */

/* WORK IN PROGRESS FOR PULLBACK PLAYS FOR UP DAYS */

set{LBB_40,count(low < lower bollinger band(40,0.4),1)}
set{LBB_9,count(low < lower bollinger band(9,0.4),1)}

Set{vMA20,CMA(volume,20)}
set{vSD,cstddev(volume,20)}
set{vSD20,2 * vSD}
set{vBOLU,vMA20 + vSD20}
set{vBOLD,vMA20 - vSD20}
set{varvol,volume}
SET{TRIP_WIRE,COUNT(VOLUME > vBOLU,13)}

set{BUY_ME,macd(7,12,3)}
set{SHORT_ME,macd(5,3,3)}
set{cross_me,buy_me - short_me}

SET{LONG,COUNT(BUY_ME CROSSED ABOVE SHORT_ME,1)}
SET{SHORT,COUNT(SHORT_ME CROSSED ABOVE BUY_ME,1)}

SET{VAR40,COUNT(3 DAY SLOPE OF BOLLINGER BAND(40,0.4) < 0,1)}
SET{VAR9,COUNT(3 DAY SLOPE OF BOLLINGER BAND(9,0.4) > 0,1)}

set{diff,close - ema(40)}
set{%diff,diff / ema(40)}
set{KISS,%diff * 100}
set{kissma40,cema(kiss,40)}

set{var21, kiss 20 day high}
set{var22, kiss 20 day low}
set{var23, kissma40-var22}
set{var24, var21-var22}
set{var25, var23/var24}
set{super_trig, var25*100}

set{SD,cstddev(kiss,40)}
set{SD40,2 * SD}
set{BOLU,kissma40 + SD40}
set{BOLD,kissma40 - SD40}


draw bolu on plot kiss
draw bold on plot kiss
draw kissma40 on plot KISS
draw kiss 20 day high on plot kiss
draw kiss 20 day low on plot kiss
draw SHORT_ME on plot BUY_ME
draw cross_me LINE AT 0 on plot cross_me
draw trip_wire on plot trip_wire
DRAW Bollinger Band(40,0.4)
draw bollinger band(9,0.4)
DRAW MACD(4,8)

add column KISS
ADD COLUMN SEPARATOR
add column LBB_40
add column LBB_9
ADD COLUMN SEPARATOR
add column BUY_ME
add column SHORT_ME
ADD COLUMN SEPARATOR
add column super_trig
ADD COLUMN SEPARATOR
add column var9
add column var40
add column cross_me
add column trip_wire


SHORT_ME 1 DAY AGO BELOW BUY_ME 1 DAY AGO
CROSS_ME ABOVE -0.00
buy_me above buy_me 1 day ago
buy_me 2 day ago above buy_me 1 day ago
TRIP_WIRE ABOVE .5
CLOSE ABOVE 0.10
VOLUME ABOVE 50000
SHORT_ME BELOW -0.01
VAR9 ABOVE .5
VAR40 BELOW .5
LBB_40 BELOW .5


sort column 4 descending

]



johnpaulca
11,289 posts
msg #68448
Ignore johnpaulca
10/15/2008 11:23:22 AM

CHET: DO YOU CODE THIS STUFF IN TD AMERITRADE ???

chetron
2,817 posts
msg #68458
Ignore chetron
10/15/2008 5:03:28 PM


SOME, NOT ALL.



chetron
2,817 posts
msg #68487
Ignore chetron
modified
10/16/2008 10:36:08 AM

SOMETHING LIKE.....


SORRY JP, STOCKFETCHER DOESN'T LIKE TD CODE.



johnpaulca
11,289 posts
msg #68490
Ignore johnpaulca
10/16/2008 12:33:07 PM

BASTARDS...THANKS CHET.

chetron
2,817 posts
msg #68508
Ignore chetron
10/16/2008 8:09:31 PM


LOL

StockFetcher Forums · Filter Exchange · The strongest indicator (quote Dr. Elder)<< 1 2 >>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