Bitcoin Inflation-Adjusted Support and Resistance
// This source code is subject to the terms of the Mozilla Public License 2.0 at https://mozilla.org/MPL/2.0/
// © okor96
// @version=5

// Bitcoin Inflation-Adjusted Support and Resistance
// 0.02836745
indicator(title='Bitcoin Inflation-Adjusted Support and Resistance', shorttitle='BTC Inflation S/R', overlay=true, linktoseries=true)

t5yie_L1 = nz(request.security('FRED:T5YIE', "D", close)) * math.exp(2.23738765 * time / math.pow(10, 11) - 28.3794)
plot(time > 1365552000000 ? t5yie_L1 : na, title='Bitcoin Inflation L1', color=color.new(color.lime, 0), linewidth=1)


t5yie_L2 = nz(request.security('FRED:T5YIE', "D", close)) * math.exp(2.2657551 * time / math.pow(10, 11) - 28.3794)
plot(time > 1365552000000 ? t5yie_L2 : na, title='Bitcoin Inflation L2', color=color.new(color.lime, 0), linewidth=1)


t5yie_L3 = nz(request.security('FRED:T5YIE', "D", close)) * math.exp(2.29412255 * time / math.pow(10, 11) - 28.3794)
plot(time > 1365552000000 ? t5yie_L3 : na, title='Bitcoin Inflation L3', color=color.new(color.lime, 0), linewidth=1)               


t5yie_L4 = nz(request.security('FRED:T5YIE', "D", close)) * math.exp(2.32249 * time / math.pow(10, 11) - 28.3794)
plot(time > 1365552000000 ? t5yie_L4 : na, title='Bitcoin Inflation L4', color=color.new(color.lime, 0), linewidth=1)


t5yie_M1 = nz(request.security('FRED:T5YIE', "D", close)) * math.exp(2.35085745 * time / math.pow(10, 11) - 28.3794)
plot(time > 1365552000000 ? t5yie_M1 : na, title='Bitcoin Inflation M1', color=color.new(color.orange, 0), linewidth=1)


t5yie_M2 = nz(request.security('FRED:T5YIE', "D", close)) * math.exp(2.3792249 * time / math.pow(10, 11) - 28.3794)
plot(time > 1365552000000 ? t5yie_M2 : na, title='Bitcoin Inflation M2', color=color.new(color.orange, 0), linewidth=1)             


t5yie_M3 = nz(request.security('FRED:T5YIE', "D", close)) * math.exp(2.40412255 * time / math.pow(10, 11) - 28.3794)
plot(time > 1365552000000 ? t5yie_M3 : na, title='Bitcoin Inflation M3', color=color.new(color.orange, 0), linewidth=1)


t5yie_H1 = nz(request.security('FRED:T5YIE', "D", close)) * math.exp(2.43249 * time / math.pow(10, 11) - 28.3794)
plot(time > 1365552000000 ? t5yie_H1 : na, title='Bitcoin Inflation H1', color=color.new(color.red, 0), linewidth=1)


t5yie_H2 = nz(request.security('FRED:T5YIE', "D", close)) * math.exp(2.46085745 * time / math.pow(10, 11) - 28.3794)
plot(time > 1365552000000 ? t5yie_H2 : na, title='Bitcoin Inflation H2', color=color.new(color.red, 0), linewidth=1)


t5yie_H3 = nz(request.security('FRED:T5YIE', "D", close)) * math.exp(2.4892249 * time / math.pow(10, 11) - 28.3794)
plot(time > 1365552000000 ? t5yie_H3 : na, title='Bitcoin Inflation H3', color=color.new(color.red, 0), linewidth=1)


t5yie_H4 = nz(request.security('FRED:T5YIE', "D", close)) * math.exp(2.51759235 * time / math.pow(10, 11) - 28.3794)
plot(time > 1365552000000 ? t5yie_H4 : na, title='Bitcoin Inflation H4', color=color.new(color.red, 0), linewidth=1)
//END