ChrisMoody

CM_Williams AD+SMA_V1_Public

I posted this code a long time ago and forgot to add to PineScript Library.

Plots Williams Accumulation Distribution, Williams AD With Optional SMA as a Filter.

In Inputs Tab:
Ability to Turn On/Off SMA Filter.
Ability to change any of the plots to Change Colors Based on Being Above or Below the SMA Filter.
Also Ability to Turn Off Color Change Based on SMA Filter.

สคริปต์โอเพนซอร์ซ

ด้วยจิตวิญญาณของ TradingView อย่างแท้จริง ผู้เขียนสคริปต์นี้ได้เผยแพร่เป็นโอเพนซอร์ส เพื่อให้ผู้ค้าสามารถเข้าใจและตรวจสอบได้ ไชโยให้กับผู้เขียน! คุณสามารถใช้ได้ฟรี แต่การใช้รหัสนี้ซ้ำในสิ่งพิมพ์อยู่ภายใต้กฎระเบียบการใช้งาน คุณสามารถตั้งเป็นรายการโปรดเพื่อใช้บนชาร์ตได้

คำจำกัดสิทธิ์ความรับผิดชอบ

ข้อมูลและบทความไม่ได้มีวัตถุประสงค์เพื่อก่อให้เกิดกิจกรรมทางการเงิน, การลงทุน, การซื้อขาย, ข้อเสนอแนะ หรือคำแนะนำประเภทอื่น ๆ ที่ให้หรือรับรองโดย TradingView อ่านเพิ่มเติมที่ เงื่อนไขการใช้บริการ

ต้องการที่จะใช้สคริปต์นี้บนชาร์ตใช่ไหม?
//Created by user ChrisMoody on 11-30-2014
//Williams AD + SMA of Williams AD + Change Colors based on Williams AD above or below SMA
//Williams AD = Solid Line, SMA = Circles and Solid Line..
study(title = "_CM_Williams AD+SMA_V1", shorttitle="_CM_WAD_SMA_V1", overlay=false)
len = input(20, minval=1, title="SMA Length")
sc = input(true, title="Change Williams AD Color Based on Below/Above SMA?")
sm = input(true, title="Plot SMA?")
smc = input(false, title="Change Williams SMA Color Based on Below/Above SMA?")

trl = min(close[1], low)
trh = max(close[1], high)
ad = close > close[1] ? close - trl : close < close[1] ? close - trh : 0
wad = cum(ad)
ma = sma(cum(ad), len)

spanColor = sc and wad >= ma ? lime : sc and wad < ma ? red : aqua
spanColor2 = smc and wad >= ma ? lime : smc and wad < ma ? red : yellow

p1 = plot(wad, title="Williams AD", style=line, linewidth=4, color=spanColor)
p2 = plot(sm and ma ? ma : na, title="SMA Line",style=linebr, linewidth=4, color=spanColor2)
plot(sm and ma ? ma : na, title="SMA Circles",style=circles, linewidth=3, color=spanColor2)

fill(p1, p2, color=silver, transp=60, title="Fill")