Codes To Notice Rejection As Well As Retest

//Codes past times Chrismoody

study(title="codes to honor Rejection too Retest", shorttitle="codes to honor Rejection too Retest", overlay=true)
//Inputs Tab Criteria.
pd = input(22, title="codes to honor Rejection too Retest")
bbl = input(20, title="codes to honor Rejection too Retest")
mult = input(2.0 , minval=1, maxval=5, title="codes to honor Rejection too Retest")
lb = input(50 , title="codes to honor Rejection too Retest")
ph = input(.85, title="codes to honor Rejection too Retest")
new = input(false, title="codes to honor Rejection too Retest" )
sbc = input(false, title="codes to honor Rejection too Retest")
sbcc = input(false, title="codes to honor Rejection too Retest")
new2 = input(false, title="codes to honor Rejection too Retest" )
sbcFilt = input(true, title="codes to honor Rejection too Retest")
sbcAggr = input(true, title="codes to honor Rejection too Retest")
ltLB = input(40, minval=25, maxval=99, title="codes to honor Rejection too Retest")
mtLB = input(14, minval=10, maxval=20, title="codes to honor Rejection too Retest")
str = input(3, minval=1, maxval=9, title="codes to honor Rejection too Retest")
//Alerts Instructions too Options Below...Inputs Tab
new4 = input(false, title="codes to honor Rejection too Retest" )
new5 = input(false, title="codes to honor Rejection too Retest")
sa1 = input(false, title="codes to honor Rejection too Retest")
sa2 = input(false, title="codes to honor Rejection too Retest")
sa3 = input(false, title="codes to honor Rejection too Retest")
sa4 = input(false, title="codes to honor Rejection too Retest")

//Williams Vix Fix Formula
wvf = ((highest(close, pd)-low)/(highest(close, pd)))*100
sDev = mult * stdev(wvf, bbl)
midLine = sma(wvf, bbl)
lowerBand = midLine - sDev
upperBand = midLine + sDev
rangeHigh = (highest(wvf, lb)) * ph

//Filtered Bar Criteria
upRange = depression > low[1] too closed > high[1]
upRange_Aggr = closed > close[1] too closed > open[1]
//Filtered Criteria
filtered = ((wvf[1] >= upperBand[1] or wvf[1] >= rangeHigh[1]) too (wvf < upperBand too wvf < rangeHigh))
filtered_Aggr = (wvf[1] >= upperBand[1] or wvf[1] >= rangeHigh[1]) too non (wvf < upperBand too wvf < rangeHigh)

//Alerts Criteria
alert1 = wvf >= upperBand or wvf >= rangeHigh ? 1 : 0
alert2 = (wvf[1] >= upperBand[1] or wvf[1] >= rangeHigh[1]) too (wvf < upperBand too wvf < rangeHigh) ? 1 : 0
alert3 = upRange too closed > close[str] too (close < close[ltLB] or closed < close[mtLB]) too filtered ? 1 : 0
alert4 = upRange_Aggr too closed > close[str] too (close < close[ltLB] or closed < close[mtLB]) too filtered_Aggr ? 1 : 0

plotshape(sbcc too alert1 ? alert1 : na, title="codes to honor Rejection too Retest", color=lime, style=shape.arrowup, location=location.belowbar ,text='Buttom', transp=0)
plotshape(sbc too alert2 ? alert2 : na, title="codes to honor Rejection too Retest", color=aqua, style=shape.arrowup, location=location.belowbar ,text='Entry/Rev', transp=0)
plotshape(sbcAggr too alert4 ? alert4 : na, title="codes to honor Rejection too Retest",color=orange, style=shape.arrowup, location=location.belowbar ,text='Early in/Rev', transp=0)
plotshape(sbcFilt too alert3 ? alert3 : na, title="codes to honor Rejection too Retest", color=fuchsia, style=shape.arrowup, location=location.belowbar ,text='confirm entry/Rev', transp=0)

// Find all Fractals.
// This department based on [RS]Fractal Levels past times RicardoSantos
hidefractals = input(false)
hidelevels = input(false)
topfractal = high[2] > high[1] too high[2] > high too high[2] > high[3] too high[2] > high[4]
botfractal = low[2] < low[1] too low[2] < depression too low[2] < low[3] too low[2] < low[4]

plotshape(hidefractals ? na : topfractal, color=green, transp=0, style=shape.triangleup, location=location.abovebar, offset=-2, size=size.tiny)
plotshape(hidefractals ? na : botfractal, color=red, transp=0, style=shape.triangledown, location=location.belowbar, offset=-2, size=size.tiny)

topfractals = topfractal ? high[2] : topfractals[1]
botfractals = botfractal ? low[2] : botfractals[1]

topfcolor = topfractals != topfractals[1] ? na : green
botfcolor = botfractals != botfractals[1] ? na : red

plot(hidelevels ? na : topfractals, color=topfcolor, transp=0, linewidth=2)
plot(hidelevels ? na : botfractals, color=botfcolor, transp=0, linewidth=2)

//Coloring Criteria of Williams Vix Fix
col = wvf >= upperBand or wvf >= rangeHigh ? lime : gray

//Plots for Williams Vix Fix Histogram too Alerts
plot(sa2 too alert2 ? alert2 : 0, title="codes to honor Rejection too Retest", style=line, linewidth=2, color=aqua)
plot(sa3 too alert3 ? alert3 : 0, title="codes to honor Rejection too Retest", style=line, linewidth=2, color=fuchsia)
plot(sa4 too alert4 ? alert4 : 0, title="codes to honor Rejection too Retest", style=line, linewidth=2, color=orange)

matype = input(defval="HullMA", title="codes to honor Rejection too Retest", type=string)
malength = input(defval=20, title="codes to honor Rejection too Retest", minval=1)
src = input(close,title="codes to honor Rejection too Retest")

// Returns MA input pick variant, default to SMA if blank or typo.
variant(type, src, len) =>
     v1 = sma(src, len) // Simple
     v2 = ema(src, len) // Exponential
     v3 = wma(src, len) // Weighted
     v4 = vwma(src, len) // Volume Weighted
     v5 = na(v5[1]) ? sma(src, len) : (v5[1] * (len - 1) + src) / len // Smoothed
     v6 = two * v2 - ema(v2, len) // Double Exponential
     v7 = three * (v2 - ema(v2, len)) + ema(ema(v2, len), len) // Triple Exponential
     v8 = wma(2 * wma(src, len / 2) - wma(src, len), round(sqrt(len))) // Hull
     ema1 = ema(src, len)
     ema2 = ema(ema1, len)
     v10 = ema1+(ema1-ema2) // Zero Lag Exponential
     v11 = sma(sma(src,len),len) // Trianglular
     // supply variant, defaults to SMA if input invalid.
     type=="EMA"?v2 : type=="WMA"?v3 : type=="VWMA"?v4 : type=="SMMA"?v5 : type=="DEMA"?v6 :         type=="TEMA"?v7 : type=="HullMA"?v8 : type=="ZEMA"?v10 : type=="TMA"?v11 : v1

// Calculate selected MA too become direction of tendency from it.
zlema= variant(matype,src,malength)

upward = zlema > zlema[1] ? 1 : 0
down = zlema < zlema[1] ? 1 : 0

// This department based on Candlestick Patterns With EMA past times rmwaddelljr
//
ufb = input(false, title="codes to honor Rejection too Retest")
udc = input(true, title="codes to honor Rejection too Retest" )
upl = input(true, title="codes to honor Rejection too Retest" )
ube = input(true, title="codes to honor Rejection too Retest" )
ubh = input(true, title="codes to honor Rejection too Retest" )
upb = input(true, title="codes to honor Rejection too Retest")
pctP = input(66, minval=1, maxval=99, title="codes to honor Rejection too Retest")
// This department based on CM_Price-Action-Bars past times ChrisMoody

//EOF