40 lines
2.3 KiB
Plaintext
40 lines
2.3 KiB
Plaintext
//@version=4
|
|
// Copyright (c) 2019-present, Alex Orekhov (everget)
|
|
// Parabolic SAR script may be freely distributed under the terms of the GPL-3.0 license.
|
|
study("Parabolic SAR", shorttitle="PSAR", overlay=true)
|
|
|
|
start = input(title="Start", type=input.float, step=0.001, defval=0.02)
|
|
increment = input(title="Increment", type=input.float, step=0.001, defval=0.02)
|
|
maximum = input(title="Maximum", type=input.float, step=0.01, defval=0.2)
|
|
width = input(title="Point Width", type=input.integer, minval=1, defval=2)
|
|
highlightStartPoints = input(title="Highlight Start Points ?", type=input.bool, defval=true)
|
|
showLabels = input(title="Show Buy/Sell Labels ?", type=input.bool, defval=true)
|
|
highlightState = input(title="Highlight State ?", type=input.bool, defval=true)
|
|
|
|
psar = sar(start, increment, maximum)
|
|
dir = psar < close ? 1 : -1
|
|
|
|
psarColor = dir == 1 ? #3388bb : #fdcc02
|
|
psarPlot = plot(psar, title="PSAR", style=plot.style_circles, linewidth=width, color=psarColor, transp=0)
|
|
|
|
var color longColor = color.green
|
|
var color shortColor = color.red
|
|
|
|
buySignal = dir == 1 and dir[1] == -1
|
|
plotshape(buySignal and highlightStartPoints ? psar : na, title="Long Start", location=location.absolute, style=shape.circle, size=size.tiny, color=longColor, transp=0)
|
|
plotshape(buySignal and showLabels ? psar : na, title="Buy Label", text="Buy", location=location.absolute, style=shape.labelup, size=size.tiny, color=longColor, textcolor=color.white, transp=0)
|
|
|
|
sellSignal = dir == -1 and dir[1] == 1
|
|
plotshape(sellSignal and highlightStartPoints ? psar : na, title="Short Start", location=location.absolute, style=shape.circle, size=size.tiny, color=shortColor, transp=0)
|
|
plotshape(sellSignal and showLabels ? psar : na, title="Sell Label", text="Sell", location=location.absolute, style=shape.labeldown, size=size.tiny, color=shortColor, textcolor=color.white, transp=0)
|
|
|
|
midPricePlot = plot(ohlc4, title="", display=display.none)
|
|
|
|
fillColor = highlightState ? (dir == 1 ? longColor : shortColor) : na
|
|
fill(midPricePlot, psarPlot, title="Trade State Filling", color=fillColor)
|
|
|
|
changeCond = dir != dir[1]
|
|
alertcondition(changeCond, title="Alert: PSAR Direction Change", message="PSAR has changed direction!")
|
|
alertcondition(buySignal, title="Alert: PSAR Long", message="PSAR Long")
|
|
alertcondition(sellSignal, title="Alert: PSAR Short", message="PSAR Sell")
|