Elevated Leverage index System - ELiS
// This source code is subject to the terms of the Mozilla Public License 2.0 at https://mozilla.org/MPL/2.0/
// © KivancOzbilgic

//@version=5
indicator('Elevated Leverage index System', 'ELiS', overlay=false, format=format.price, precision=0, timeframe='')
gear = input.int(defval=2, title='Conservative=1 Standard=2 Average=3 Risky=4 Agressive=5', minval=1, maxval=5)
src = input(close, title='Source')
period = input(title='Length', defval=50)
mult = 2
basis = ta.sma(src, period)
dev = mult * ta.stdev(src, period)
upper = basis + dev
lower = basis - dev
nATR = ta.atr(period) / src
hATR = ta.highest(nATR, period)
lATR = ta.lowest(nATR, period)
nSD = ta.stdev(src, period) / src
hSD = ta.highest(nSD, period)
lSD = ta.lowest(nSD, period)
MA = ta.wma(nATR, period)
perm = 100 * math.abs(nATR - MA) / MA
pers = 100 * (nSD - lSD) / (hSD - lSD)
pera = 100 * (nATR - lATR) / (hATR - lATR)
perb = 100 * (src - lower)/(upper - lower)
per = gear == 4 or gear == 5 ? (perm + pers + pera + perb) / 4 : gear==1 ? math.min(100 , (pers + pera + perb) / 2.5) : (pers + pera + perb) / 3
EL = (100 - per) / (6-gear)
ELiS = math.max(1,int(EL + .5))
plot(ELiS, 'ELiS', color.new(#5218FA, 0), 2)

