[RS]Time Based Thermal Support and Resistance V0 — Petunjuk oleh RicardoSantos

EXPERIMENTAL:
theres a bug where certain dates dont work for the loop, returning a out of index error, please review..
Skrip sumber terbuka
Dalam semangat TradingView yang sebenar, penulis skrip ini telah menerbitkannya dengan menggunakan sumber terbuka supaya pedagang-pedagang dapat memahami dan mengesahkannya. Sorakan kepada penulis! Anda dapat menggunakannya secara percuma tetapi penggunaan semula kod ini dalam penerbitan adalah dikawalselia oleh Peraturan Dalaman. Anda boleh menyukainya untuk menggunakannya pada carta.
Penafian
Maklumat dan penerbitan adalah tidak dimaksudkan untuk menjadi, dan tidak membentuk, nasihat untuk kewangan, pelaburan, perdagangan dan jenis-jenis lain atau cadangan yang dibekalkan atau disahkan oleh TradingView. Baca dengan lebih lanjut di Terma Penggunaan.
Ingin menggunakan skrip ini pada carta?
//@version=2
study(title='[RS]Time Based Thermal Support and Resistance V0', shorttitle='T',overlay=true)
d_year = input(2016)
d_month = input(04)
d_day = input(1)
d_hour = input(0)
d_minute = input(0)
isvalid_time = time >= timestamp(d_year, d_month, d_day, d_hour, d_minute) 
src = input(close)
length = input(100)

f_frequency_of_range(_src, _lower, _upper, _length)=>
    _adjusted_length = _length < 1 ? 1 : _length
    _frequency = 0
    for _i = 0 to _adjusted_length-1
        if (_src[_i] >= _lower and _src[_i] <= _upper)
            _frequency := _frequency + 1
    _return = nz(_frequency/_adjusted_length, 0)

h = isvalid_time ? (high >= nz(h[1], high[1]) ? high : h[1]) : na
l = isvalid_time ? (low <= nz(l[1], low[1]) ? low : l[1]) : na
r = h-l
fraction =  r * 0.1
start_bar = change(isvalid_time) > 0 ? n : start_bar[1]
window = n - start_bar

f01 = f_frequency_of_range(src, l, l+fraction*1, window)
f02 = f_frequency_of_range(src, l+fraction*1, l+fraction*2, window)
f03 = f_frequency_of_range(src, l+fraction*2, l+fraction*3, window)
f04 = f_frequency_of_range(src, l+fraction*3, l+fraction*4, window)
f05 = f_frequency_of_range(src, l+fraction*4, l+fraction*5, window)
f06 = f_frequency_of_range(src, l+fraction*5, l+fraction*6, window)
f07 = f_frequency_of_range(src, l+fraction*6, l+fraction*7, window)
f08 = f_frequency_of_range(src, l+fraction*7, l+fraction*8, window)
f09 = f_frequency_of_range(src, l+fraction*8, l+fraction*9, window)
f10 = f_frequency_of_range(src, l+fraction*9, h, window)

// r00 = plot(l, color=black)
// r01 = plot(l+((fraction*1) * f01), color=blue)
// r02 = plot(l+((fraction*1)), color=blue)
// r03 = plot(l+((fraction*1) + fraction * f02), color=blue)
// r04 = plot(l+((fraction*2)), color=blue)
// r05 = plot(l+((fraction*2) + fraction * f03), color=blue)
// r06 = plot(l+((fraction*3)), color=blue)
// r07 = plot(l+((fraction*3) + fraction * f04), color=blue)
// r08 = plot(l+((fraction*4)), color=blue)
// r09 = plot(l+((fraction*4) + fraction * f05), color=blue)
// r10 = plot(l+((fraction*5)), color=blue)
// r11 = plot(l+((fraction*5) + fraction * f06), color=blue)
// r12 = plot(l+((fraction*6)), color=blue)
// r13 = plot(l+((fraction*6) + fraction * f07), color=blue)
// r14 = plot(l+((fraction*7)), color=blue)
// r15 = plot(l+((fraction*7) + fraction * f08), color=blue)
// r16 = plot(l+((fraction*8)), color=blue)
// r17 = plot(l+((fraction*8) + fraction * f09), color=blue)
// r18 = plot(l+((fraction*9)), color=blue)
// r19 = plot(l+((fraction*9) + fraction * f10), color=blue)
// r20 = plot(h, color=black)

t01_color = f01 >= 0.00 and f01 < 0.10 ? #336699 :
         f01 >= 0.10 and f01 < 0.20 ? #0099cc :
         f01 >= 0.20 and f01 < 0.30 ? #00ccff :
         f01 >= 0.30 and f01 < 0.40 ? #33ccff :
         f01 >= 0.40 and f01 < 0.50 ? #66ccff :
         f01 >= 0.50 and f01 < 0.60 ? #ccccff :
         f01 >= 0.60 and f01 < 0.70 ? #cc99ff :
         f01 >= 0.70 and f01 < 0.80 ? #cc66ff :
         f01 >= 0.80 and f01 < 0.90 ? #cc33ff :
         f01 >= 0.90 and f01 < 1.00 ? #cc00ff :
         black
t02_color = f02 >= 0.00 and f02 < 0.10 ? #336699 :
         f02 >= 0.10 and f02 < 0.20 ? #0099cc :
         f02 >= 0.20 and f02 < 0.30 ? #00ccff :
         f02 >= 0.30 and f02 < 0.40 ? #33ccff :
         f02 >= 0.40 and f02 < 0.50 ? #66ccff :
         f02 >= 0.50 and f02 < 0.60 ? #ccccff :
         f02 >= 0.60 and f02 < 0.70 ? #cc99ff :
         f02 >= 0.70 and f02 < 0.80 ? #cc66ff :
         f02 >= 0.80 and f02 < 0.90 ? #cc33ff :
         f02 >= 0.90 and f02 < 1.00 ? #cc00ff :
         black
t03_color = f03 >= 0.00 and f03 < 0.10 ? #336699 :
         f03 >= 0.10 and f03 < 0.20 ? #0099cc :
         f03 >= 0.20 and f03 < 0.30 ? #00ccff :
         f03 >= 0.30 and f03 < 0.40 ? #33ccff :
         f03 >= 0.40 and f03 < 0.50 ? #66ccff :
         f03 >= 0.50 and f03 < 0.60 ? #ccccff :
         f03 >= 0.60 and f03 < 0.70 ? #cc99ff :
         f03 >= 0.70 and f03 < 0.80 ? #cc66ff :
         f03 >= 0.80 and f03 < 0.90 ? #cc33ff :
         f03 >= 0.90 and f03 < 1.00 ? #cc00ff :
         black
t04_color = f04 >= 0.00 and f04 < 0.10 ? #336699 :
         f04 >= 0.10 and f04 < 0.20 ? #0099cc :
         f04 >= 0.20 and f04 < 0.30 ? #00ccff :
         f04 >= 0.30 and f04 < 0.40 ? #33ccff :
         f04 >= 0.40 and f04 < 0.50 ? #66ccff :
         f04 >= 0.50 and f04 < 0.60 ? #ccccff :
         f04 >= 0.60 and f04 < 0.70 ? #cc99ff :
         f04 >= 0.70 and f04 < 0.80 ? #cc66ff :
         f04 >= 0.80 and f04 < 0.90 ? #cc33ff :
         f04 >= 0.90 and f04 < 1.00 ? #cc00ff :
         black
t05_color = f05 >= 0.00 and f05 < 0.10 ? #336699 :
         f05 >= 0.10 and f05 < 0.20 ? #0099cc :
         f05 >= 0.20 and f05 < 0.30 ? #00ccff :
         f05 >= 0.30 and f05 < 0.40 ? #33ccff :
         f05 >= 0.40 and f05 < 0.50 ? #66ccff :
         f05 >= 0.50 and f05 < 0.60 ? #ccccff :
         f05 >= 0.60 and f05 < 0.70 ? #cc99ff :
         f05 >= 0.70 and f05 < 0.80 ? #cc66ff :
         f05 >= 0.80 and f05 < 0.90 ? #cc33ff :
         f05 >= 0.90 and f05 < 1.00 ? #cc00ff :
         black
t06_color = f06 >= 0.00 and f06 < 0.10 ? #336699 :
         f06 >= 0.10 and f06 < 0.20 ? #0099cc :
         f06 >= 0.20 and f06 < 0.30 ? #00ccff :
         f06 >= 0.30 and f06 < 0.40 ? #33ccff :
         f06 >= 0.40 and f06 < 0.50 ? #66ccff :
         f06 >= 0.50 and f06 < 0.60 ? #ccccff :
         f06 >= 0.60 and f06 < 0.70 ? #cc99ff :
         f06 >= 0.70 and f06 < 0.80 ? #cc66ff :
         f06 >= 0.80 and f06 < 0.90 ? #cc33ff :
         f06 >= 0.90 and f06 < 1.00 ? #cc00ff :
         black
t07_color = f07 >= 0.00 and f07 < 0.10 ? #336699 :
         f07 >= 0.10 and f07 < 0.20 ? #0099cc :
         f07 >= 0.20 and f07 < 0.30 ? #00ccff :
         f07 >= 0.30 and f07 < 0.40 ? #33ccff :
         f07 >= 0.40 and f07 < 0.50 ? #66ccff :
         f07 >= 0.50 and f07 < 0.60 ? #ccccff :
         f07 >= 0.60 and f07 < 0.70 ? #cc99ff :
         f07 >= 0.70 and f07 < 0.80 ? #cc66ff :
         f07 >= 0.80 and f07 < 0.90 ? #cc33ff :
         f07 >= 0.90 and f07 < 1.00 ? #cc00ff :
         black
t08_color = f08 >= 0.00 and f08 < 0.10 ? #336699 :
         f08 >= 0.10 and f08 < 0.20 ? #0099cc :
         f08 >= 0.20 and f08 < 0.30 ? #00ccff :
         f08 >= 0.30 and f08 < 0.40 ? #33ccff :
         f08 >= 0.40 and f08 < 0.50 ? #66ccff :
         f08 >= 0.50 and f08 < 0.60 ? #ccccff :
         f08 >= 0.60 and f08 < 0.70 ? #cc99ff :
         f08 >= 0.70 and f08 < 0.80 ? #cc66ff :
         f08 >= 0.80 and f08 < 0.90 ? #cc33ff :
         f08 >= 0.90 and f08 < 1.00 ? #cc00ff :
         black
t09_color = f09 >= 0.00 and f09 < 0.10 ? #336699 :
         f09 >= 0.10 and f09 < 0.20 ? #0099cc :
         f09 >= 0.20 and f09 < 0.30 ? #00ccff :
         f09 >= 0.30 and f09 < 0.40 ? #33ccff :
         f09 >= 0.40 and f09 < 0.50 ? #66ccff :
         f09 >= 0.50 and f09 < 0.60 ? #ccccff :
         f09 >= 0.60 and f09 < 0.70 ? #cc99ff :
         f09 >= 0.70 and f09 < 0.80 ? #cc66ff :
         f09 >= 0.80 and f09 < 0.90 ? #cc33ff :
         f09 >= 0.90 and f09 < 1.00 ? #cc00ff :
         black
t10_color = f10 >= 0.00 and f10 < 0.10 ? #336699 :
         f10 >= 0.10 and f10 < 0.20 ? #0099cc :
         f10 >= 0.20 and f10 < 0.30 ? #00ccff :
         f10 >= 0.30 and f10 < 0.40 ? #33ccff :
         f10 >= 0.40 and f10 < 0.50 ? #66ccff :
         f10 >= 0.50 and f10 < 0.60 ? #ccccff :
         f10 >= 0.60 and f10 < 0.70 ? #cc99ff :
         f10 >= 0.70 and f10 < 0.80 ? #cc66ff :
         f10 >= 0.80 and f10 < 0.90 ? #cc33ff :
         f10 >= 0.90 and f10 < 1.00 ? #cc00ff :
         black

plotcandle(l, l, l, l+fraction*1, color=t01_color)
plotcandle(l+fraction*1, l+fraction*1, l+fraction*1, l+fraction*2, color=t02_color)
plotcandle(l+fraction*2, l+fraction*2, l+fraction*2, l+fraction*3, color=t03_color)
plotcandle(l+fraction*3, l+fraction*3, l+fraction*3, l+fraction*4, color=t04_color)
plotcandle(l+fraction*4, l+fraction*4, l+fraction*4, l+fraction*5, color=t05_color)
plotcandle(l+fraction*5, l+fraction*5, l+fraction*5, l+fraction*6, color=t06_color)
plotcandle(l+fraction*6, l+fraction*6, l+fraction*6, l+fraction*7, color=t07_color)
plotcandle(l+fraction*7, l+fraction*7, l+fraction*7, l+fraction*8, color=t08_color)
plotcandle(l+fraction*8, l+fraction*8, l+fraction*8, l+fraction*9, color=t09_color)
plotcandle(l+fraction*9, l+fraction*9, l+fraction*9, h, color=t10_color)