[Trading View] Pine editor(Custom Indicators) - SQZMOM & MACD CUSTOM & SUPERTREND

[커스텀 보조지표 - 스퀴즈모먼트 + 맥디커스톰 + 슈퍼트랜드 올인원]

- 전체 레이아웃

- 보조지표 레이아웃

//@version=5

//

// @author LazyBear

// List of all my indicators: https://www.tradingview.com/v/4IneGo8h/

strategy(shorttitle='SQZMOM & MACD CUSTOM & SUPERTREND', title='SQZMOM & MACD CUSTOM & SUPERTREND', overlay=false, process_orders_on_close = true)

hline(100)

hline(-100)

length = input(20, title='BB Length')

mult = input(2.0, title='BB MultFactor')

lengthKC = input(20, title='KC Length')

multKC = input(1.5, title='KC MultFactor')

useTrueRange = input(true, title='Use TrueRange (KC)')

// Calculate BB

source = close

basis = ta.sma(source, length)

dev = multKC * ta.stdev(source, length)

upperBB = basis + dev

lowerBB = basis - dev

// Calculate KC

ma = ta.sma(source, lengthKC)

range_1 = useTrueRange ? ta.tr : high - low

rangema = ta.sma(range_1, lengthKC)

upperKC = ma + rangema * multKC

lowerKC = ma - rangema * multKC

sqzOn = lowerBB > lowerKC and upperBB < upperKC

sqzOff = lowerBB < lowerKC and upperBB > upperKC

noSqz = sqzOn == false and sqzOff == false

val = ta.linreg(source - math.avg(math.avg(ta.highest(high, lengthKC), ta.lowest(low, lengthKC)), ta.sma(close, lengthKC)), lengthKC, 0)

iff_1 = val > nz(val[1]) ? color.lime : color.green // Long 진입 모멘텀

iff_2 = val < nz(val[1]) ? color.red : color.maroon // Short 진입 모멘텀

bcolor = val > 0 ? iff_1 : iff_2

scolor = noSqz ? color.blue : sqzOn ? color.black : color.gray

cond1 = (not noSqz) and (not sqzOn)  // true 변동성이 크다, false 변동성이 작다

cond2 = val > 0  // true면 Long, false면 Short

check1 = cond1 ? 1 : 0

check2 = cond2 ? 1 : 0

isVolaStart = ta.change(check1) == 1

isMomentumChange = ta.change(check2) != 0

isLong = isVolaStart and cond2

isShort = isVolaStart and not cond2

if isLong

    strategy.entry("롱", strategy.long)

if isMomentumChange

    strategy.close("롱")

plot(val, color=bcolor, style=plot.style_histogram, linewidth=4)

plot(0, color=scolor, style=plot.style_cross, linewidth=2)

useCurrentRes = input(true, title='Use Current Chart Resolution?')

resCustom = input.timeframe(title='Use Different Timeframe? Uncheck Box Above', defval='60')

smd = input(true, title='Show MacD & Signal Line? Also Turn Off Dots Below')

sd = input(true, title='Show Dots When MacD Crosses Signal Line?')

sh = input(true, title='Show Histogram?')

macd_colorChange = input(true, title='Change MacD Line Color-Signal Line Cross?')

hist_colorChange = input(true, title='MacD Histogram 4 Colors?')

res = useCurrentRes ? timeframe.period : resCustom

fastLength = input.int(12, minval=1)

slowLength = input.int(26, minval=1)

signalLength = input.int(9, minval=1)

fastMA = ta.ema(source, fastLength)

slowMA = ta.ema(source, slowLength)

macd = fastMA - slowMA

signal = ta.sma(macd, signalLength)

hist = macd - signal

outMacD = request.security(syminfo.tickerid, res, macd)

outSignal = request.security(syminfo.tickerid, res, signal)

outHist = request.security(syminfo.tickerid, res, hist)

histA_IsUp = outHist > outHist[1] and outHist > 0

histA_IsDown = outHist < outHist[1] and outHist > 0

histB_IsDown = outHist < outHist[1] and outHist <= 0

histB_IsUp = outHist > outHist[1] and outHist <= 0

//MacD Color Definitions

macd_IsAbove = outMacD >= outSignal

macd_IsBelow = outMacD < outSignal

plot_color = hist_colorChange ? histA_IsUp ? color.aqua : histA_IsDown ? color.blue : histB_IsDown ? color.red : histB_IsUp ? color.maroon : color.yellow : color.gray

macd_color = macd_colorChange ? macd_IsAbove ? color.lime : color.red : color.red

signal_color = macd_colorChange ? macd_IsAbove ? color.yellow : color.yellow : color.lime

circleYPosition = outSignal

plot(smd and outMacD ? outMacD : na, title='MACD', color=macd_color, linewidth=4)

plot(smd and outSignal ? outSignal : na, title='Signal Line', color=signal_color, style=plot.style_line, linewidth=2)

plot(sh and outHist ? outHist : na, title='Histogram', color=plot_color, style=plot.style_histogram, linewidth=4)

plot(sd and ta.cross(outMacD, outSignal) ? circleYPosition : na, title='Cross', style=plot.style_circles, linewidth=4, color=macd_color)

hline(0, '0 Line', linestyle=hline.style_solid, linewidth=2, color=color.white)

Periods = input(title='ATR Period', defval=10)

src = input(hl2, title='Source')

Multiplier = input.float(title='ATR Multiplier', step=0.1, defval=3.0)

changeATR = input(title='Change ATR Calculation Method ?', defval=true)

showsignals = input(title='Show Buy/Sell Signals ?', defval=true)

highlighting = input(title='Highlighter On/Off ?', defval=true)

atr2 = ta.sma(ta.tr, Periods)

atr = changeATR ? ta.atr(Periods) : atr2

up = src - Multiplier * atr

up1 = nz(up[1], up)

up := close[1] > up1 ? math.max(up, up1) : up

dn = src + Multiplier * atr

dn1 = nz(dn[1], dn)

dn := close[1] < dn1 ? math.min(dn, dn1) : dn

trend = 1

trend := nz(trend[1], trend)

trend := trend == -1 and close > dn1 ? 1 : trend == 1 and close < up1 ? -1 : trend

upPlot = plot(trend == 1 ? up : na, title='Up Trend', style=plot.style_linebr, linewidth=2, color=color.new(color.green, 0))

buySignal = trend == 1 and trend[1] == -1

plotshape(buySignal ? up : na, title='UpTrend Begins', location=location.absolute, style=shape.circle, size=size.tiny, color=color.new(color.green, 0))

plotshape(buySignal and showsignals ? up : na, title='Buy', text='Buy', location=location.absolute, style=shape.labelup, size=size.tiny, color=color.new(color.green, 0), textcolor=color.new(color.white, 0))

dnPlot = plot(trend == 1 ? na : dn, title='Down Trend', style=plot.style_linebr, linewidth=2, color=color.new(color.red, 0))

sellSignal = trend == -1 and trend[1] == 1

plotshape(sellSignal ? dn : na, title='DownTrend Begins', location=location.absolute, style=shape.circle, size=size.tiny, color=color.new(color.red, 0))

plotshape(sellSignal and showsignals ? dn : na, title='Sell', text='Sell', location=location.absolute, style=shape.labeldown, size=size.tiny, color=color.new(color.red, 0), textcolor=color.new(color.white, 0))

mPlot = plot(ohlc4, title='', style=plot.style_circles, linewidth=0)

longFillColor = highlighting ? trend == 1 ? color.green : color.white : color.white

shortFillColor = highlighting ? trend == -1 ? color.red : color.white : color.white

fill(mPlot, upPlot, title='UpTrend Highligter', color=longFillColor, transp=90)

fill(mPlot, dnPlot, title='DownTrend Highligter', color=shortFillColor, transp=90)

alertcondition(buySignal, title='SuperTrend Buy', message='SuperTrend Buy!')

alertcondition(sellSignal, title='SuperTrend Sell', message='SuperTrend Sell!')

changeCond = trend != trend[1]

alertcondition(changeCond, title='SuperTrend Direction Change', message='SuperTrend has changed direction!')

- pine 에디터 코드