Kod:
//@version=5
indicator (title='Yeni StratejiGa240', shorttitle='PSG240', overlay=true)
per=input.timeframe(title='Per', defval="D")
per1=input.timeframe(title='Per1', defval="W")
//Close1 = request.security(syminfo.tickerid, per, close, lookahead=barmerge.lookahead_on)
guh9 = request.security(syminfo.tickerid, per1, ta.highest(9))
guh26 = request.security(syminfo.tickerid, per1, ta.highest(26))
guh52 = request.security(syminfo.tickerid, per1, ta.highest(52))
gul9 = request.security(syminfo.tickerid, per1, ta.lowest(9))
gul26 = request.security(syminfo.tickerid, per1, ta.lowest(26))
gul52 = request.security(syminfo.tickerid, per1, ta.lowest(52))
gutk = request.security(syminfo.tickerid, per1, (guh9 + gul9) / 2)
gukj = request.security(syminfo.tickerid, per1, (guh26 + gul26) / 2)
gusa = request.security(syminfo.tickerid, per1, (gutk[25] + gukj[25]) / 2)
gusb = request.security(syminfo.tickerid, per1, (guh52[25] + gul52[25]) / 2)
hl52 = request.security(syminfo.tickerid, per1, (guh52 + gul52) / 2)
gucs = request.security(syminfo.tickerid, per1, math.max(math.max(gutk, gukj), math.max(gusa, gusb))[25])
kudo = request.security(syminfo.tickerid, per1, math.max((gukj), math.max(gusa, gusb)))
gucsl = request.security(syminfo.tickerid, per1, math.min(math.min(gutk, gukj), math.min(gusa, gusb))[25])
kudol = request.security(syminfo.tickerid, per1, math.min((gukj), math.min(gusa, gusb)))
hl= hl52>0 ? hl52 : gukj>0 ? gukj : gutk>0 ? gutk:0
HL = plot(hl, title="HL", color=#4a47df, linewidth = 1)
//Direnc1 = plot(timd, title="direnc", color=color.new(color.blue, 0), linewidth = 1)
//KuDo = plot(kudo, title="kumo", color=color.new(color.blue, 0), linewidth = 2)
//CS = plot(gucs, title="CSC", color=color.new(color.green, 0), linewidth = 2)
//KuDoL = plot(kudol, title="kumoL", color=color.new(color.red, 0), linewidth = 2)
CSL = plot(gucsl, title="CSCL", color=#13745f, linewidth = 2)
//PP = request.security(syminfo.tickerid, per1, hlc3[1], lookahead=barmerge.lookahead_on)
//TPP = plot(PP, title="PP", color=color.new(color.yellow, 0), linewidth = 1)
//plotcandle(open, high, low, close, color=close < open ? color.red : color.green, bordercolor=close < open ? color.red : color.green)
// al = ta.crossover(close,gucs)
// plotshape(al, color=color.green, text="Al" , style=shape.triangleup)
// sh = ta.crossunder(close,kudo)
// plotshape(sh, color=color.red, text="Kapan", style=shape.triangledown)
// ti = input.string("BINANCE:BTCUSDT", "Endeks", options=["BINANCE:BTCUSDT", "BIST:XU100"])
// bclose = request.security(ti, timeframe.period, close)
// bguh9 = request.security(ti, per, ta.highest(9))
// bguh26 = request.security(ti, per, ta.highest(26))
// bguh52 = request.security(ti, per, ta.highest(52))
// bgul9 = request.security(ti, per, ta.lowest(9))
// bgul26 = request.security(ti, per, ta.lowest(26))
// bgul52 = request.security(ti, per, ta.lowest(52))
// bgutk = request.security(ti, per, (bguh9 + bgul9) / 2)
// bgukj = request.security(ti, per, (bguh26 + bgul26) / 2)
// bgusa = request.security(ti, per, (bgutk[25] + bgukj[25]) / 2)
// bgusb = request.security(ti, per, (bguh52[25] + bgul52[25]) / 2)
// bhl52 = request.security(ti, per, (bguh52 + bgul52) / 2)
// bgucs = request.security(ti, per, math.max(math.max(bgutk, bgukj), math.max(bgusa,bgusb))[25])
// bkudo = request.security(ti, per, math.max((bgukj), math.max(bgusa, bgusb)))
// bgucsl = request.security(ti, per, math.min(math.min(bgutk,bgukj), math.min(bgusa, bgusb))[25])
// bkudol = request.security(ti, per, math.min((bgukj), math.min(bgusa, bgusb)))
// bhl= bhl52>0 ? bhl52 : bgukj>0 ? bgukj : bgutk>0 ? bgutk:0
// bgcolor(bclose < bhl ? color.new(color.red,95) : color.new(color.green, 95))
g20 = request.security(syminfo.tickerid,per1, ta.sma(close, 20))
// g50 = request.security(syminfo.tickerid,per, ta.sma(close, 50))
// g100 = request.security(syminfo.tickerid,per, ta.sma(close, 100))
// g200 = request.security(syminfo.tickerid,per, ta.sma(close, 200))
// g500 = request.security(syminfo.tickerid,per, ta.sma(close, 500))
plot(g20, color=color.red, title="m20", linewidth = 1 , style=plot.style_line)
// plot(g50, color=color.white, title="m50", linewidth = 1 , style=plot.style_line)
// plot(g100, color=color.orange, title="m100", linewidth = 1 , style=plot.style_line)
// plot(g200, color=color.blue, title="m200", linewidth = 1, style=plot.style_line)
// plot(g500, color=#551a8b, title="m500", linewidth = 1, style=plot.style_line)
//tur=input.source(close)
//deger = request.security(syminfo.tickerid, per1, tur)
kapanis = request.security(syminfo.tickerid, per1, close)
ss=input.float(1)
ss1=input.float(2)
ss2=input.float(3)
ss3=input.float(4)
ss4=input.float(5)
uz=input.int(20,'uzunluk')
uz1=input.int(50,'uzunluk1')
uz2=input.int(100,'uzunluk2')
uz3=input.int(200,'uzunluk3')
uz4=input.int(500,'uzunluk4')
[middle8, upper8, lower8] = request.security(syminfo.tickerid, per1, ta.bb(kapanis, uz, ss), lookahead=barmerge.lookahead_on)
[middle7, upper7, lower7] = request.security(syminfo.tickerid, per1, ta.bb(kapanis, uz, ss1), lookahead=barmerge.lookahead_on)
[middle6, upper6, lower6] = request.security(syminfo.tickerid, per1, ta.bb(kapanis, uz, ss2), lookahead=barmerge.lookahead_on)
[middle5, upper5, lower5] = request.security(syminfo.tickerid, per1, ta.bb(kapanis, uz, ss3), lookahead=barmerge.lookahead_on)
[middle4, upper4, lower4] = request.security(syminfo.tickerid, per1, ta.bb(kapanis, uz, ss4), lookahead=barmerge.lookahead_on)
i_switch4 = close>=g20 ? true : false
plot((i_switch4 ? upper4 :lower4 ), title="UZ4",color=color.new(#551a8b, 0))
//plot((i_switch4 ? lower4 :na ), title="BL4",color=color.new(#00bfff, 50))
plot((i_switch4 ? upper5 :lower5 ), title="UZ3",color=color.new(#97ffff, 0))
//plot((i_switch5 ? lower5 :na ), title="BL5",color=color.new(#00bfff, 50))
plot((i_switch4 ? upper6 :lower6 ), title="UZ2",color=color.new(color.orange, 0))
//plot((i_switch6 ? lower6 :na ), title="BL6",color=color.new(#00bfff, 50))
plot((i_switch4 ? upper7 :lower7 ), title="UZ1",color=color.new(#ffffff, 0))
plot((i_switch4 ? upper8 :lower8 ), title="UZ",color=#ff02b380)
fast_length = input(title="Fast Length", defval=9)
slow_length = input(title="Slow Length", defval=26)
extraslow_length = input(title="extraSlow Length", defval=52)
src = input(title="Source", defval=close)
signal_length = input.int(title="Signal Smoothing", minval = 1, maxval = 50, defval = 9)
sma_source = input.string(title="Oscillator MA Type", defval="EMA", options=["SMA", "EMA"])
sma_signal = input.string(title="Signal Line MA Type", defval="EMA", options=["SMA", "EMA"])
// Plot colors
col_macd = input(#2962FF, "MACD Line  ", group="Color Settings", inline="MACD")
col_macd1 = input(#02ff2c, "MACD Line  ", group="Color Settings", inline="MACD")
col_signal = input(#FF6D00, "Signal Line â€â€*", group="Color Settings", inline="Signal")
col_grow_above = input(#26A69A, "Above   Grow", group="Histogram", inline="Above")
col_fall_above = input(#B2DFDB, "Fall", group="Histogram", inline="Above")
col_grow_below = input(#FFCDD2, "Below Grow", group="Histogram", inline="Below")
col_fall_below = input(#FF5252, "Fall", group="Histogram", inline="Below")
// Calculating
fast_ma = sma_source == "SMA" ? ta.sma(src, fast_length) : ta.ema(src, fast_length)
slow_ma = sma_source == "SMA" ? ta.sma(src, slow_length) : ta.ema(src, slow_length)
extraslow_ma = sma_source == "SMA" ? ta.sma(src, extraslow_length) : ta.ema(src, extraslow_length)
macd = (fast_ma - slow_ma)
macd1 = (slow_ma - extraslow_ma)
signal = (sma_signal == "SMA" ? ta.sma(macd, signal_length) : ta.ema(macd, signal_length))
//hist = (macd - signal)* (close/4)
//hline(0, "Zero Line", color=color.new(#787B86, 50))
//plot(hist, title="Histogram", style=plot.style_columns, color=(hist>=0 ? (hist[1] < hist ? col_grow_above : col_fall_above) : (hist[1] < hist ? col_grow_below : col_fall_below)))
plot(macd, title="MACD", color=col_macd)
plot(macd1, title="MACD", color=col_macd1)
plot(signal, title="Signal", color=col_signal)
res1 = input.timeframe(title='Periyot1', defval='D')
res2 = input.timeframe(title='Periyot2', defval='W')
res3 = input.timeframe(title='Periyot3', defval='M')
res4 = input.timeframe(title='Periyot4', defval='3M')
res5 = input.timeframe(title='Periyot5', defval='12M')
// Close_12M = request.security(syminfo.tickerid, res5, close[1], lookahead=barmerge.lookahead_on)
// Close_3M = request.security(syminfo.tickerid, res3, close[1], lookahead=barmerge.lookahead_on)
// Close_M = request.security(syminfo.tickerid, res2, close[1], lookahead=barmerge.lookahead_on)
// Close_W = request.security(syminfo.tickerid, res1, close[1], lookahead=barmerge.lookahead_on)
Hcol_1 = color.new(#97ffff, 0)
Hcol_2 = color.new(#2f4f4f, 0)
Hcol_3 = color.new(#ee1289, 0)
Hcol_4 = color.new(#1b8bb4, 0)
Hcol_5 = color.new(#ffb90f, 0)
var table perfTable = table.new(position.middle_left, 4, 10, border_width=1)
LIGHTTRANSP = 90
AVGTRANSP = 80
HEAVYTRANSP = 70
High_1 = request.security(syminfo.tickerid, res5, high[1], lookahead=barmerge.lookahead_on)
High_2 = request.security(syminfo.tickerid, res4, high[1], lookahead=barmerge.lookahead_on)
High_3 = request.security(syminfo.tickerid, res3, high[1], lookahead=barmerge.lookahead_on)
High_4 = request.security(syminfo.tickerid, res2, high[1], lookahead=barmerge.lookahead_on)
High_5 = request.security(syminfo.tickerid, res1, high[1], lookahead=barmerge.lookahead_on)
Pivot_1 = request.security(syminfo.tickerid, res5, hlc3[1], lookahead=barmerge.lookahead_on)
Pivot_2 = request.security(syminfo.tickerid, res4, hlc3[1], lookahead=barmerge.lookahead_on)
Pivot_3 = request.security(syminfo.tickerid, res3, hlc3[1], lookahead=barmerge.lookahead_on)
Pivot_4 = request.security(syminfo.tickerid, res2, hlc3[1], lookahead=barmerge.lookahead_on)
Pivot_5 = request.security(syminfo.tickerid, res1, hlc3[1], lookahead=barmerge.lookahead_on)
Close_1 = request.security(syminfo.tickerid, res5, close[1], lookahead=barmerge.lookahead_on)
Close_2 = request.security(syminfo.tickerid, res4, close[1], lookahead=barmerge.lookahead_on)
Close_3 = request.security(syminfo.tickerid, res3, close[1], lookahead=barmerge.lookahead_on)
Close_4 = request.security(syminfo.tickerid, res2, close[1], lookahead=barmerge.lookahead_on)
Close_5 = request.security(syminfo.tickerid, res1, close[1], lookahead=barmerge.lookahead_on)
Low_1 = request.security(syminfo.tickerid, res5, low[1], lookahead=barmerge.lookahead_on)
Low_2 = request.security(syminfo.tickerid, res4, low[1], lookahead=barmerge.lookahead_on)
Low_3 = request.security(syminfo.tickerid, res3, low[1], lookahead=barmerge.lookahead_on)
Low_4 = request.security(syminfo.tickerid, res2, low[1], lookahead=barmerge.lookahead_on)
Low_5 = request.security(syminfo.tickerid, res1, low[1], lookahead=barmerge.lookahead_on)
i_posColor = input(color.rgb(38, 166, 154), title='Positive Color')
i_negColor = input(color.rgb(240, 83, 80), title='Negative Color')
f_rateOfreturn(_v1, _v2) =>
(_v1 - _v2) * 100 / math.abs(_v2)
f_fillCell(_table, _column, _row, _value, _timeframe) =>
_c_color = close < _value ? i_negColor : i_posColor
_transp = close > _value ? HEAVYTRANSP : close < _value ? AVGTRANSP : LIGHTTRANSP
_cellText = str.tostring(_value, '#.####') + '\n' + _timeframe
table.cell(_table, _column, _row, _cellText, bgcolor=color.new(_c_color, _transp), text_color=_c_color, width=5, text_size=size.small)
table.cell(_table, column=0, row=0, text='H', bgcolor=color.white, text_color=color.black, text_size=size.small)
table.cell(_table, column=1, row=0, text='P', bgcolor=color.white, text_color=color.black, text_size=size.small)
table.cell(_table, column=2, row=0, text='C', bgcolor=color.white, text_color=color.black, text_size=size.small)
table.cell(_table, column=3, row=0, text='L', bgcolor=color.white, text_color=color.black, text_size=size.small)
if barstate.islast
f_fillCell(perfTable, 0, 1, High_5, 'D')
f_fillCell(perfTable, 0, 2, High_4, 'W')
f_fillCell(perfTable, 0, 3, High_3, 'M')
f_fillCell(perfTable, 0, 4, High_2, '3M')
f_fillCell(perfTable, 0, 5, High_1, '12M')
f_fillCell(perfTable, 1,1, Pivot_5, 'D')
f_fillCell(perfTable, 1, 2, Pivot_4, 'W')
f_fillCell(perfTable, 1, 3, Pivot_3, 'M')
f_fillCell(perfTable, 1, 4, Pivot_2, '3M')
f_fillCell(perfTable, 1, 5, Pivot_1, '12M')
f_fillCell(perfTable, 2, 1, Close_5, 'D')
f_fillCell(perfTable, 2, 2, Close_4, 'W')
f_fillCell(perfTable, 2, 3, Close_3, 'M')
f_fillCell(perfTable, 2, 4, Close_2, '3M')
f_fillCell(perfTable, 2, 5, Close_1, '12M')
f_fillCell(perfTable, 3, 1, Low_5, 'D')
f_fillCell(perfTable, 3, 2, Low_4, 'W')
f_fillCell(perfTable, 3, 3, Low_3, 'M')
f_fillCell(perfTable, 3, 4, Low_2, '3M')
f_fillCell(perfTable, 3, 5, Low_1, '12M')
Yer Ýmleri