[RS]JR Moving Average System V0

study(title="[RS]JR Moving Average System V0", shorttitle="[RS]JR.MAS.V0", overlay=true)
ma0 = sma(hl2, input(1))

tp = input(8)
ma1 = wma(open, tp)
ma2 = ema(open, tp)

plot(ma0, color=black)
plot(ma1, color=gray)
plot(ma2, color=silver)

condition = ma0 >= ma1 and ma1 >= ma2 ? (close >= open ? lime : green) :
        ma0 <= ma1 and ma0 >= ma2 ? (close >= open ? silver : gray) :
        ma0 <= ma1 and ma1 <= ma2 ? (close >= open ? red : maroon) : (close >= open ? silver : gray)

barcolor(condition)

//  ||---   Crossovers
buyx1 = cross(ma0,ma1) and ma0 >= ma0[1] ? true : false
sellx1 = cross(ma0,ma1) and ma0 <= ma0[1] ? true : false
plotshape(buyx1, style=shape.cross, color=green, location=location.belowbar)
plotshape(sellx1, style=shape.cross, color=maroon, location=location.abovebar)

//  ||---   SL lines
sltop = highest(max(max(high,ma0),max(ma1,ma2)), tp)
slbot = lowest(min(min(low,ma0),min(ma1,ma2)), tp)
plot(sltop, color=silver, style=circles)
plot(slbot, color=silver, style=circles)