CM Percent Move Upper V1

//Created by ChrisMoody on 9/3/2014 by Request from vlad.adrian
//Plots A BackGround Highlight if % Move is Greater or Equal to user input
// % Move is based on Close of Current Bar Compared to Close of Previous Bar
study("CM_Percent_Move_Upper", overlay=true)
sbh = input(true, title="Show Background Highlights?")
def = input(false, title="***Input Below is Multiplied by .1, 5 = .5%, 10 = 1%, 15 = 1.5% etc.***")
pctmve = input(15, minval=5, maxval=40, title="If % move is Greater or Equal to Input Plots BackGround Highlight")

//Percent Calculations
pctmove = pctmve * .1
diff = close-close[1]
pct = abs(diff/close)*100

//BackGround Color Definitions
pctPlot = pct >= pctmove ? 1 : 0

col = close < close[1] ? red : close > close[1] ? lime : yellow
//BackGround Color Plots
bgcolor(sbh and pctPlot ? col : na, transp=50)