Shows your potential profit by going short(red)/long(green) against the current trend, use with you favorite entry/exit method for maximum effect, can be adjusted for share cost and commission.
//Shows your potential profit by going short(red)/long(green) against the current trend, use with you favorite entry/exit method for maximum effect, //can be adjusted for share cost and commission. study(shorttitle = "DP_CTI", title="DP's Countertrend Indicator") MA = input(120, minval=1, title = "Moving Avg Length") source = close mg = na(mg[1]) ? ema(source, MA) : mg[1] + (source - mg[1]) / (MA * pow(source/mg[1], 4)) Bars = input(30,title="Lookback Bars") Cost = input(0,type = float,title = "Per Share Cost $") Comm = input(0, type = float, title = "Per Share Commission $") BullR = highest(close,Bars)-ohlc4 BearR = ohlc4-lowest(close,Bars) BullT = iff(high<mg,mg,close + BullR) BearT = iff(low>mg,mg,close - BearR) BuC = iff(BullT-close-(Cost+Comm)>0,green,lime) BeC = iff(close-BearT-(Cost+Comm)>0,maroon,red) Hull = wma(2*wma(source, MA/2)-wma(source, MA), round(sqrt(MA))) plot((BullT-close)-(Cost+Comm), color=BuC, style=histogram, linewidth = 2, trackprice = false) plot((close-BearT)-(Cost+Comm), color=BeC, style=histogram, linewidth = 2, trackprice = false)