StockFetcher Forums · Filter Exchange · Elder Bull(13)<< >>Post Follow-up
glgene
616 posts
msg #114738
Ignore glgene
8/4/2013 12:05:09 AM

I'm fairly new with FreeStockCharts.com, and my SF script writing is limited (at this point).

I'm trying to create the Elder Bull signal (from Dr. Alexander Elder's book, Trading for a Living, 1993).

Pages 220-227 in Elder's book addresses Bull Power and Bear Power. For right now, I'm trying to synch the Bull Power component between Stock Fetcher and FreeStockCharts.com...and I have done so (in a crude way):

Fetcher[
symlist(vti)
add column high
add column low
set{bull,high-ema(13)}
set{bear,low-ema(13)}
add column ema(13)
add column bull
draw bull
draw bull line at 0
]


For end-of-day 8/2/2013, I get the same "Bull" number of 1.20 in both softwares (stock symbol VTI, daily chart). But I don't know how (in SF) to get the weekly chart number of 3.47 as shown on FreeStockCharts.com

Any help with the SF script would be appreciated. Need to get a result of 3.47 in weekly SF, end-of-day 8/2/2013.

Thanks.

Gene

SAFeTRADE
646 posts
msg #114739
Ignore SAFeTRADE
8/4/2013 6:58:22 AM


Fetcher[symlist(vti)
add column high
add column low
set{bull,high-ema(13)}
set{weeklybull, weekly high - weekly ema(13)}
set{bear,low-ema(13)}
add column ema(13)
add column bull
add column weeklybull
draw bull
draw bull line at 0
]



I believe this does it.

Clarence




pirate67
99 posts
msg #114740
Ignore pirate67
8/4/2013 9:58:53 AM

You might want to search for past postings using these key words: Triple Screen, Chetron, Riggs.

glgene
616 posts
msg #114741
Ignore glgene
8/4/2013 10:05:56 AM

Thanks, SafeTrade...You found the answer I needed on weekly output. Shown below is my final script. Now to figure out how to correctly interpret it (Bull vs. Bear info). Pirate67...I will look up Triple Screens.

Fetcher[
symlist(vti,spy,dia,qqq,iwm,eem,agg,tlt)
add column high
add column low
set{bull,high-ema(13)}
set{weeklybull, weekly high - weekly ema(13)}
set{bear,low-ema(13)}
set{weeklybear, weekly low - weekly ema(13)}
add column ema(13)
add column separator
add column bull
add column weeklybull
add column separator
add column bear
add column weeklybear
add column separator
sort on column 9 descending
draw bull line at 0
draw bull
draw bear line at 0
draw bear
]



four
5,087 posts
msg #114742
Ignore four
modified
8/4/2013 1:33:52 PM

perhaps...

https://mahifx.com/indicators/elder-ray-bull-and-bear-power-oscillators

http://www.dailyfx.com/forex_forum/coding-strategy-advisors-indicators-functions/239223-elder-ray-bear-bull-power.html

glgene
616 posts
msg #114745
Ignore glgene
8/4/2013 5:23:50 PM

How do I get my Bull and Bear lines to draw as histograms?

glgene
616 posts
msg #114746
Ignore glgene
8/4/2013 6:36:11 PM

Support at Stockfetcher gave me this 2-line addition to my latest script, to convert the line chart to a histogram on Bull and Bear. Insert after the line, "sort on column 9 descending."

plottype{bull,zerobar}
plottype{bear,zerobar}

Thanks, SF!

glgene
616 posts
msg #114747
Ignore glgene
8/4/2013 9:29:38 PM

Thanks, four, for your 2 reference articles. I read those, and a couple more. Good material.

Gene

jhoffmann
10 posts
msg #114810
Ignore jhoffmann
8/8/2013 5:21:02 PM

Seek and you shall find.

BullPower_BearPower_WSG

show stocks where close is above 40
60 day slope of close is above 0
Do not draw 60 day slope of close
draw EMA(13)
Set{Bullpower, high minus ema(13)}
Set{Bearpower, low minus ema(13)}
set{BLb,days(BullPower is above BullPower 1 day ago,100)}
set{BLa,days(BullPower is below BullPower 1 day ago,100)}
set{BLxBL, BLa - BLb}
set{BRb,days(BearPower is above BearPower 1 day ago,100)}
set{BRa,days(BearPower is below BearPower 1 day ago,100)}
set{BRxBR, BRa - BRb}
Bullpower has been decreasing the last 1 day
Bearpower has been increasing the last 1 day
Bearpower is below 0
Draw Bullpower
Draw Bearpower
add column BLxBL
add column BRxBR
Force Index(2)is increasing
average volume(90)is above 100000
volume is above 100000
sort column 3 DESCENDING

/* NORMALIZE accumulation distribution */

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

/* NORMALIZE momentum(12) */

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

/* NORMALIZE CCI(14) */

set{ccval, INDPOSITION(CCI(14), 60) * 100 }

/* NORMALIZE williams %r(10) */

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


/* DRAW THE MP CCIWLR CHART */

and draw wrval
and draw adval on plot wrval
and draw moval on plot wrval
and draw ccval on plot wrval

add column adval
add column ccval
add column moval
add column wrval

adval is Above 80
ccval is Below 30
moval is Below 30
wrval is Below 30

ccval has been increasing 1-day
adval has been increasing 1-day
wrval has been increasing 1-day
moval has been increasing 1-day

wrval is below 50

boston
58 posts
msg #114819
Ignore boston
8/9/2013 11:14:39 AM

Fetcher[
8/8/2013 5:21:02 PM

Seek and you shall find.

BullPower_BearPower_WSG

show stocks where close is above 40
60 day slope of close is above 0
Do not draw 60 day slope of close
draw EMA(13)
Set{Bullpower, high minus ema(13)}
Set{Bearpower, low minus ema(13)}
set{BLb,days(BullPower is above BullPower 1 day ago,100)}
set{BLa,days(BullPower is below BullPower 1 day ago,100)}
set{BLxBL, BLa - BLb}
set{BRb,days(BearPower is above BearPower 1 day ago,100)}
set{BRa,days(BearPower is below BearPower 1 day ago,100)}
set{BRxBR, BRa - BRb}
Bullpower has been decreasing the last 1 day
Bearpower has been increasing the last 1 day
Bearpower is below 0
Draw Bullpower
Draw Bearpower
add column BLxBL
add column BRxBR
Force Index(2)is increasing
average volume(90)is above 100000
volume is above 100000
sort column 3 DESCENDING

/* NORMALIZE accumulation distribution */

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

/* NORMALIZE momentum(12) */

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

/* NORMALIZE CCI(14) */

set{ccval, INDPOSITION(CCI(14), 60) * 100 }

/* NORMALIZE williams %r(10) */

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


/* DRAW THE MP CCIWLR CHART */

and draw wrval
and draw adval on plot wrval
and draw moval on plot wrval
and draw ccval on plot wrval

add column adval
add column ccval
add column moval
add column wrval

adval is Above 80
ccval is Below 30
moval is Below 30
wrval is Below 30

ccval has been increasing 1-day
adval has been increasing 1-day
wrval has been increasing 1-day
moval has been increasing 1-day

wrval is below 50
]



StockFetcher Forums · Filter Exchange · Elder Bull(13)<< >>Post Follow-up

*** Disclaimer *** StockFetcher.com does not endorse or suggest any of the securities which are returned in any of the searches or filters. They are provided purely for informational and research purposes. StockFetcher.com does not recommend particular securities. StockFetcher.com, Vestyl Software, L.L.C. and involved content providers shall not be liable for any errors or delays in the content, or for any actions taken based on the content.


Copyright 2022 - Vestyl Software L.L.C.Terms of Service | License | Questions or comments? Contact Us
EOD Data sources: DDFPlus & CSI Data Quotes delayed during active market hours. Delay times are at least 15 mins for NASDAQ, 20 mins for NYSE and Amex. Delayed intraday data provided by DDFPlus


This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.