Risk Metric

//@version=5
// © Oakley Wood 2021

indicator(title='Risk Metric', overlay=true, scale=scale.left)

d1460_sma = request.security(syminfo.tickerid, 'D', ta.sma(close, 1460))
stdev1 = request.security(syminfo.tickerid, 'D', ta.stdev(close, 1460))

btc = request.security(syminfo.tickerid, 'D', close)
main = (btc - d1460_sma) / stdev1

maxRisk = -35.64 * math.log(time) + 1008.1  // Hard coded function of time. Dubious indeed.

risk0 = btc - btc
risk2 = btc / btc * 0.25
risk6 = btc / btc * 0.5
risk8 = btc / btc * 0.75

plot(main / maxRisk, color=color.new(color.orange, 0))
plot(risk0, color=color.new(color.blue, 0))
plot(risk2, color=color.new(color.green, 0))
plot(risk6, color=color.new(color.orange, 0))
plot(risk8, color=color.new(color.red, 0))