Tradingview

super avarage...
bu şekilde tasarımına devam edeceğimizde....

mecburen parabol filtre uzunluğunun artırılması gerekecek ki....yaklaşık 200 değeri olacak....

işlemler parabolun içinde olacağı için....

parabol içinin tanımlanması gerekecek....
bunun için dip-tepe- ve fractallar ile sar alanını koymak daha güzel gibi.....

bu durumda...
fark hesaplamalarını geçmişi hesaba katmadan....

çünkü zaman analizi gereği 1 dakkalık grafik kullanılacağı için....
işlemler parabolde yapılacağı için....

farkların parabol verileri ile hesaplanması daha mantıklı gibi....

örnekler....
https://i.hizliresim.com/ehkbjml.png
https://i.hizliresim.com/7h1u69l.png
https://i.hizliresim.com/ir7vuly.png

zaman analizi ile ilişkilendirme yapılırken.....

zaman analizinin sar tabanlı olması sürekli geriye dönük çalışırken....

15 dakkalık periyoda kıyası yapılınca.... geçmişin çoğu gereksi olacak....

ancak bunu filtreleme yaparken....parabol uzunluğu artırılmalı...

böylece işlemler...parabol içinde daha stabil hale gelmeli gibi....
https://i.hizliresim.com/drxd58d.png
https://i.hizliresim.com/ko4mrgz.png

tümü bir araya gelince....
amacın....sadece 1 dakkalık grafik....kullanmak olduğu neticesine ulaşılır ki....
daha çok hareket kolaylığı sağlanmış olur....

anı yaşar....olasılığı parabole bırakırsınız....
çalışma güzel bir tarama ile sonlandırıldığında....

Alıntı:

---

Originally Posted by @yörük@

tümü bir araya gelince....
amacın....sadece 1 dakkalık grafik....kullanmak olduğu neticesine ulaşılır ki....
daha çok hareket kolaylığı sağlanmış olur....

anı yaşar....olasılığı parabole bırakırsınız....
çalışma güzel bir tarama ile sonlandırıldığında....

---

şu an için hesaplamalar(farklar hariç)....
tasarımın bütünü ile bakıldığında.... parabol bütünü görerek....
örnekler....
https://www.tradingview.com/x/SSW6sa5k/
https://www.tradingview.com/x/7BFr0cVj/
https://www.tradingview.com/x/4rJn0MPv/
https://www.tradingview.com/x/UxTkfMMp/
https://www.tradingview.com/x/NQ7G0sSd/
https://www.tradingview.com/x/BMM8LhJw/
https://www.tradingview.com/x/0tAqIIZT/
https://www.tradingview.com/x/v0m0CAI9/
https://www.tradingview.com/x/1Qg5UJ3i/
https://www.tradingview.com/x/T8ArQzE5/
https://www.tradingview.com/x/6R5bU1Qi/
https://www.tradingview.com/x/Q33V1z8V/

fark hesaplamalrını yapınca....
fiyat super avarage farkı....
https://www.tradingview.com/x/rxyGOSOt/

fiyat ortalama ema farkı....
https://www.tradingview.com/x/B9F5fTtE/

fiyat macd farkı ...
https://www.tradingview.com/x/e6sMyDSW/

fiyat sar farkı...
https://www.tradingview.com/x/bRI40I5N/

beraber görünümleri ise....
https://www.tradingview.com/x/ngmolNla/

sonuç olarak hepsinin ortalaması alındığında ise....
https://www.tradingview.com/x/68Xm40fg/

bu ne anlama gelir dersek....fiyat...
yeşil üstü maviye
kırmızı altı maviye....yani trend hareketi.... pozitif anlamda...çünkü mavi pozitif trend olunca...düzeltme olasılığı gibi....

https://www.tradingview.com/x/P55WK2qU/ pembe negatif trend anlamında

denemek isteyenler için fark hesaplamalarına örnek....

PHP Code:

---

// This source code is subject to the terms of the Mozilla Public License 2.0 at https://mozilla.org/MPL/2.0/
// © carefulCode53358

// This source code is subject to the terms of the Mozilla Public License 2.0 at https://mozilla.org/MPL/2.0/
// © carefulCode53358

//@version=5
indicator(".", overlay = true)
//Trend Sar
psar(start1, inc1, maximum1) =>
    out1 = float(na)
    isUpTrend1 = bool(na)
    maxMin1 = float(na)
    acc1 = float(na)
    prev1 = float(na)

    if bar_index >= 1
        prev1 := out1[1]
        if bar_index == 1
            if close > close[1]
                isUpTrend1 := true
                maxMin1 := math.max(high, high[1])
                prev1 := math.min(low, low[1])
                prev1
            else
                isUpTrend1 := false
                maxMin1 := math.min(low, low[1])
                prev1 := math.max(high, high[1])
                prev1

            acc1 := start1
            acc1
        else
            isUpTrend1 := isUpTrend1[1]
            acc1 := acc1[1]
            maxMin1 := maxMin1[1]
            maxMin1

        if isUpTrend1
            if high > maxMin1
                maxMin1 := high
                acc1 := math.min(acc1 + inc1, maximum1)
                acc1
        else
            if low < maxMin1
                maxMin1 := low
                acc1 := math.min(acc1 + inc1, maximum1)
                acc1

        if na(out1)
            out1 := prev1 + acc1 * (maxMin1 - prev1)
            out1

        if isUpTrend1
            if low <= out1
                isUpTrend1 := false
                out1 := maxMin1
                maxMin1 := low
                acc1 := start1
                acc1
        else
            if high >= out1
                isUpTrend1 := true
                out1 := maxMin1
                maxMin1 := high
                acc1 := start1
                acc1

        if na(out1)
            if isUpTrend1
                out1 := math.min(out1, bar_index == 1 ? low[1] : math.min(low[1], low[2]))
                out1
            else
                out1 := math.max(out1, bar_index == 1 ? high[1] : math.max(high[1], high[2]))
                out1

    [out1, acc1, maxMin1, isUpTrend1]


start1 = input(0)
increment1 = input(0.1)
maximum1 = input(1)
[p1, AF1, EP1, isUpTrend1] = psar(start1, increment1, maximum1)

newEP1 = EP1 != EP1[1]
epNew1 = newEP1 ? EP1 : na

//plot(p1, 'SAR', style=plot.style_stepline, color=isUpTrend1 ? color.rgb(76, 175, 79, 100) : color.rgb(255, 82, 82, 100), linewidth=1)
//plot(EP1, 'ONAY', style=plot.style_circles, color=isUpTrend1 ? color.green : color.red, linewidth=2)
//plot(epNew1, 'Trend-Continue', style=plot.style_line, color=isUpTrend1 ? color.rgb(76, 175, 79, 00) : color.rgb(255, 82, 82, 00), linewidth=1)
asd1=(epNew1-p1 )+close
plot(asd1, title='Pozitif Sar Farkı',style=plot.style_cross, color=color.rgb(0, 230, 119, 100), linewidth=2)

asdx1=close-(epNew1-p1 )
plot(asdx1, title='Negatif Sar Farkı',style=plot.style_cross, color=color.rgb(255, 82, 82, 100), linewidth=2)
//Signal
xyz=ta.crossunder(epNew1,p1)
//plotshape(xyz? epNew1:na, style=shape.circle, location=location.abovebar, color=isUpTrend1 ? color.rgb(34, 247, 6) : color.rgb(247, 3, 3), size=size.small)
xyz1=ta.crossover(epNew1,p1)
//plotshape(xyz1? epNew1:na, style=shape.circle, location=location.belowbar, color=isUpTrend1 ? color.rgb(34, 247, 6) : color.rgb(247, 3, 3), size=size.small)

//END
//Function 
inp = input(title='Source', defval=close)
res = input.timeframe(title='Resolution', defval='')
rep = input(title='Allow Repainting?', defval=false)
//////////////////////////////////////////////////////
src1 = request.security(syminfo.tickerid, res, inp[rep ? 0 : barstate.isrealtime ? 1 : 0])[rep ? 0 : barstate.isrealtime ? 0 : 1]
fastLength1 = input.int(title='FastLength', defval=12, minval=1)
slowLength1 = input.int(title='SlowLength', defval=26, minval=1)
signalLength1 = input.int(title='SignalLength', defval=9, minval=1)
macdLevel1 = input.float(title='MacdLevel', defval=0, minval=0)

fastAlpha1 = 2.0 / (1 + fastLength1)
slowAlpha1 = 2.0 / (1 + slowLength1)

fastEma1 = ta.ema(src1, fastLength1)
slowEma1 = ta.ema(src1, slowLength1)

pMacdEq1 = fastAlpha1 - slowAlpha1 != 0 ? ((nz(fastEma1[1]) * fastAlpha1) - (nz(slowEma1[1]) * slowAlpha1)) / (fastAlpha1 - slowAlpha1) : 0
pMacdEqSig1 = ta.ema(pMacdEq1, signalLength1)
pMacdLevel1 = fastAlpha1 - slowAlpha1 != 0 ? (macdLevel1 - (nz(fastEma1[1]) * (1 - fastAlpha1)) + (nz(slowEma1[1]) * (1 - slowAlpha1))) / (fastAlpha1 - slowAlpha1) : 0

slo1 = src1 - pMacdEq1
sig1 = slo1 > 0 ? slo1 > nz(slo1[1]) ? 2 : 1 : slo1 < 0 ? slo1 < nz(slo1[1]) ? -2 : -1 : 0

rmacdColor = sig1 > 1 ? color.lime : sig1 > 0 ? color.lime : sig1 < -1 ? color.red : sig1 < 0 ? color.red : color.white

plot(pMacdEq1, title='Trend',style=plot.style_cross, color=rmacdColor, linewidth=2)
//plot(pMacdEqSig1, title='Stop', color=color.rgb(255, 255, 255, 100), linewidth=1)
//plot(pMacdLevel1, title='MacdLevel', color=color.blue, linewidth=2)
xyzx=(pMacdEq1+pMacdEqSig1+pMacdLevel1)/3
//plot(xyzx, title='Avarage', color=color.rgb(241, 225, 8, 100), linewidth=2)
//plot(xyzx, title='Trend1',style=plot.style_cross, color=rmacdColor, linewidth=2)

asd=(pMacdEq1-xyzx )+close
plot(asd, title='Pozitif Macd Farkı',style=plot.style_cross, color=color.rgb(0, 230, 119, 100), linewidth=2)

asdx=close-(pMacdEq1-xyzx )
plot(asdx, title='Negatif Macd farkı',style=plot.style_cross, color=color.rgb(255, 82, 82, 100), linewidth=2)
////////////////////////////////////////////////////////////////////////////
// FINAL CALCULATION
reverseUP = ta.crossunder(epNew1,xyzx)
reverseDOWN =ta.crossover(epNew1,xyzx) 
//plotshape(reverseUP , 'reverse UP',shape.triangledown , location.abovebar , color.red,size = size.normal)
//plotshape(reverseDOWN , 'reverse DOWN',shape.triangleup , location.belowbar , color.lime,size = size.normal)
//////////Emalar günlük

price = request.security(syminfo.tickerid, "", close)
EMA_5 = ta.ema(price, 5)
EMA_13 = ta.ema(price, 13)
EMA_26 = ta.ema(price, 26)
EMA_50 = ta.ema(price, 50)
EMA_100 = ta.ema(price, 100)
EMA_200 = ta.ema(price, 200)

fm=(EMA_5+EMA_13+EMA_26+EMA_50+EMA_100+EMA_200)/6
asdrt=(fm-close )+close
plot(asdrt, title='Pozitif Ema Farkı',style=plot.style_cross, color=color.rgb(215, 230, 0, 100), linewidth=2)

asdxrt=close-(fm-close )
plot(asdxrt, title='Negatif Ema farkı',style=plot.style_cross, color=color.rgb(229, 255, 82, 100), linewidth=2)

//plot(EMA_5,"5 EMA",color.rgb(243, 141, 7, 100), 1)
//plot(EMA_13,"13 EMA",color.rgb(243, 7, 243, 100), 1)
//plot(EMA_26,"26 EMA",color.rgb(243, 7, 243, 100), 1)
//plot(EMA_50,"50 EMA",color.rgb(243, 7, 243, 100), 1)
//plot(EMA_100,"100 EMA",color.rgb(243, 7, 243, 100), 1)
//plot(EMA_200,"200 EMA", color.rgb(243, 141, 7, 100), 1)
///////////////

ma(source, length, type) =>
    switch type
        "SMA" => ta.sma(source, length)
        "EMA" => ta.ema(source, length)
        "SMMA (RMA)" => ta.rma(source, length)
        "WMA" => ta.wma(source, length)
        "VWMA" => ta.vwma(source, length)

factor= input(0.001382)
length = input(100)
mult = input.float(0.382, title="Mult")
show_middle_bands = input.bool(true, title="Show Middle Bands")
show_upper_bands = input.bool(true, title="Show Upper Bands")
maTypeInput = input.string("EMA", title="Band MA Type", options=["SMA", "EMA", "SMMA (RMA)", "WMA", "VWMA"], group="MA Settings")
middleTypeInput = input.string("EMA", title="Middle MA Type", options=["SMA", "EMA", "SMMA (RMA)", "WMA", "VWMA"], group="MA Settings")

logHigh = math.log10(high)
logLow = math.log10(low)
logClose = math.log10(close)
logAvg = math.log10((high + low) / 2)

logUppestband = ma(logHigh * (1 + 2 * (((logHigh - logLow) / (logAvg)) * 1000) * factor * (1+mult)), length, maTypeInput)
logUpperband = ma(logHigh * (1 + 2 * (((logHigh - logLow) / (logAvg)) * 1000) * factor), length, maTypeInput)
logLowerband = ma(logLow * (1 - 2 * (((logHigh - logLow) / (logAvg)) * 1000) * factor), length, maTypeInput)
logLowestband = ma(logLow * (1 - 2 * (((logHigh - logLow) / (logAvg)) * 1000) * factor / (1-mult)), length, maTypeInput)
logCentral = ma(logClose, length, middleTypeInput)

Uppestband = math.pow(10, logUppestband)
Upperband = math.pow(10, logUpperband)
Central = math.pow(10, logCentral)
Lowerband = math.pow(10, logLowerband)
Lowestband = math.pow(10, logLowestband)

//plot(Uppestband, color=color.red, linewidth=2, display=show_upper_bands ? display.all : display.none)
//plot(Upperband, color=color.red, linewidth=1, display=show_middle_bands ? display.all : display.none)
//plot(Central, color=color.orange, linewidth=1, display=show_middle_bands ? display.all : display.none)
//plot(Lowerband, color=color.green, linewidth=1, display=show_middle_bands ? display.all : display.none)
//plot(Lowestband, color=color.green, linewidth=2, display=show_upper_bands ? display.all : display.none)


draw_prediction = input.bool(true, title="Draw Prediction Lines")
slope_length_type = input.bool(true, title="Use Fixed Slope Length?")
fixed_slope_length = input(55, title = "Slope Length") // Useful for Prediction Upto Next (80% * Slope Length) Candles
slope_length = slope_length_type ? fixed_slope_length : last_bar_index - length

customLogarithmicRegression(_data, _color, _width) =>
    logData = math.log10(_data)
    linreg = ta.linreg(logData, slope_length, 0)
    linreg_p = ta.linreg(logData, slope_length, 0 + 1)
    x = bar_index
    slope = linreg - linreg_p
    intercept = linreg - x * slope
    deviationSum = 0.0
    for i = 0 to slope_length - 1 by 1
        deviationSum += math.pow(logData[i] - (slope * (x - i) + intercept), 2)
    deviation = math.sqrt(deviationSum / slope_length)
    x1 = x - slope_length
    x2 = x
    y1 = slope * (x - slope_length) + intercept
    y2 = linreg

    var line b = na

    updating = timestamp("20 Jul 2050 00:00 +0300") >= time
    displacement = false

    if draw_prediction
        if updating
            b := line.new(x1, math.pow(10, y1), x2, math.pow(10, y2), xloc.bar_index, extend.right, _color, style=line.style_dotted, width=_width)
            if not displacement
                line.delete(b[1])

//if show_upper_bands
    //customLogarithmicRegression(Uppestband, color.rgb(1, 219, 248), 2)
    //customLogarithmicRegression(Lowestband, color.rgb(2, 219, 248), 2)
//if show_middle_bands
    //customLogarithmicRegression(Upperband, color.red, 1)
    //customLogarithmicRegression(Central, color.rgb(2, 221, 250), 1)
    //customLogarithmicRegression(Lowerband, color.green, 1)
///////
//@version=5

lengthx = input.int(20, title="Length", minval = 1, maxval = 100)

src = input.source(close, title="Source")

// ----------------------------------------------------------------------
upper_1_bool_input  = input.bool(false, title="Upper +1", inline="abc",     group = "channel")
upper_1_float_input = input.float(1.0, title="",         inline="abc",     group = "channel")

upper_2_bool_input  = input.bool(false, title="Upper +2", inline="cde",     group = "channel")
upper_2_float_input = input.float(2.0, title="",         inline="cde",     group = "channel")

upper_3_bool_input  = input.bool(false, title="Upper +3", inline="ghi",     group = "channel")
upper_3_float_input = input.float(3.0, title="",         inline="ghi",     group = "channel")

lower_1_bool_input  = input.bool(false, title="Lower -1", inline="bcd",     group = "channel")
lower_1_float_input = input.float(1.0, title="",         inline="bcd",     group = "channel")

lower_2_bool_input  = input.bool(false, title="Lower -2", inline="def",     group = "channel")
lower_2_float_input = input.float(2.0, title="",         inline="def",     group = "channel")

lower_3_bool_input  = input.bool(false, title="Lower +3", inline="hij",     group = "channel")
lower_3_float_input = input.float(3.0, title="",         inline="hij",     group = "channel")
// ----------------------------------------------------------------------
color_upper_1 = input.color(color.new(#535455, 90),   "", inline = "colors", group = "colors")
color_upper_2 = input.color(color.new(#4caf4f, 100),  "", inline = "colors", group = "colors")
color_upper_3 = input.color(color.new(#ff5252, 100),    "", inline = "colors", group = "colors")

color_lower_1 = input.color(color.new(#535455, 90), "", inline = "colors", group = "colors")
color_lower_2 = input.color(color.new(#4caf4f, 100),  "", inline = "colors", group = "colors")
color_lower_3 = input.color(color.new(#ff5252, 100),    "", inline = "colors", group = "colors")
// ----------------------------------------------------------------------
visual_settings_group = "Visual Settings"

prinp = input.bool(false, "Show Pearson's R",   group = visual_settings_group)
exl   = input.bool(false, "Extend Lines Left",  group = visual_settings_group)
exr   = input.bool(true,  "Extend Lines Right", group = visual_settings_group)

exs = switch
    exl and exr => extend.both
    exl         => extend.left
    exr         => extend.right
    => extend.none
// ----------------------------------------------------------------------
slpclc(source, lengthx) =>

    max_bars_back(source, 500)

    if not barstate.islast or lengthx <= 1
        [float(na), float(na), float(na)]

    else
        sumX = 0.0
        sumY = 0.0
        sumXSqr = 0.0
        sumXY = 0.0

        for i = 0 to lengthx - 1 by 1
            val = source[i]
            per = i + 1.0
            sumX += per
            sumY += val
            sumXSqr += per * per
            sumXY += val * per

        slope = (lengthx * sumXY - sumX * sumY) / (lengthx * sumXSqr - sumX * sumX)

        average = sumY / lengthx

        intercept = average - slope * sumX / lengthx + slope

        [slope, average, intercept]
// ----------------------------------------------------------------------        
[s, a, i] = slpclc(src, lengthx)

st_price  = i + s * (lengthx - 1)
end_price = i

base_line = line.new(bar_index - lengthx + 1, st_price, bar_index, end_price, width=1, extend=exs, style=line.style_dashed, color=color.new(color.orange, 0))
// ----------------------------------------------------------------------
devcalc(source, lengthx, slope, average, intercept) =>
    upDev = 0.0
    dnDev = 0.0
    stdDevAcc = 0.0
    dsxx = 0.0
    dsyy = 0.0
    dsxy = 0.0
    periods = lengthx - 1
    daY = intercept + slope * periods / 2
    val = intercept
    for j = 0 to periods by 1
        price = high[j] - val
        if price > upDev
            upDev := price
        price := val - low[j]
        if price > dnDev
            dnDev := price
        price := source[j]
        dxt = price - average
        dyt = val - daY
        price -= val
        stdDevAcc += price * price
        dsxx += dxt * dxt
        dsyy += dyt * dyt
        dsxy += dxt * dyt
        val += slope
    stdDev = math.sqrt(stdDevAcc / (periods == 0 ? 1 : periods))
    pearsonR = dsxx == 0 or dsyy == 0 ? 0 : dsxy / math.sqrt(dsxx * dsyy)
    [stdDev, pearsonR, upDev, dnDev]
// ----------------------------------------------------------------------
[stdDev, pearsonR, upDev, dnDev] = devcalc(src, lengthx, s, a, i)
// ----------------------------------------------------------------------
create_line(bool_input, float_input, color, dev) =>
    line_start_price = st_price  + (bool_input ? float_input * stdDev : dev)
    line_end_price   = end_price + (bool_input ? float_input * stdDev : dev)
    
    line.new(bar_index - lengthx + 1, line_start_price, bar_index, line_end_price, width=1, style=line.style_dashed, extend=exs, color=color.new(color, 0))    
// ----------------------------------------------------------------------
upper_1_line = create_line(upper_1_bool_input,  upper_1_float_input, color_upper_1,  upDev)
//upper_2_line = create_line(upper_2_bool_input,  upper_2_float_input, color_upper_2,  upDev)
//upper_3_line = create_line(upper_3_bool_input,  upper_3_float_input, color_upper_3,  upDev)

lower_1_line = create_line(lower_1_bool_input, -lower_1_float_input, color_lower_1, -dnDev)
//lower_2_line = create_line(lower_2_bool_input, -lower_2_float_input, color_lower_2, -dnDev)
//lower_3_line = create_line(lower_3_bool_input, -lower_3_float_input, color_upper_3, -dnDev)
// ----------------------------------------------------------------------
linefill.new(upper_1_line, base_line, color = color_upper_1)
linefill.new(lower_1_line, base_line, color = color_lower_1)
// ---------------------------------------------------------------------- 


---

https://www.tradingview.com/x/K47a3aUh/

https://www.tradingview.com/x/XES4qx1N/