moving average system which can indicate the best buy or sell point
study(title="Moving Average System",shorttitle="MAS",overlay=true) // Inputs legs = input(defval=3) legm = input(defval=9) legl = input(defval=18) sd = input(true, title="Show dots?") ccol = input(true,title="Change Color?") // Calc wwma(l,p) => wwma = (nz(wwma[1]) * (l - 1) + p) / l wmas = wwma(legs,close) wmam = wwma(legm,close) wmal = wwma(legl,close) // Styling cols = ccol ?( wmas > wmas[1] ? #D26900: #28FF28) : #D26900 colm = ccol ?( wmam > wmam[1] ? #D26900 : #28FF28) : #D26900 coll = ccol ?( wmal > wmal[1] ? #D26900F : #28FF28) : #D26900 x = cross(wmas,wmam) y = cross(wmam,wmal) // Plots plot(wmas,linewidth=1,color=cols) plot(wmam,linewidth=1,color=colm) plot(wmal,linewidth=1,color=coll) plot(sd and x ? wmas : na,style=circles, linewidth=6, color=black) plot(sd and y ? wmam : na,style=cross, linewidth=6, color=#F9F900)