동적 추세 추적 및 정확한 손절매 및 손절매 전략

/*backtest
start: 2023-07-25 00:00:00
end: 2024-07-30 00:00:00
period: 1d
basePeriod: 1h
exchanges: [{"eid":"Futures_Binance","currency":"BTC_USDT"}]
*/

//@version=5
strategy("Scalp Slayer (i)", overlay=true)

// Input Parameters
filterNumber = input.float(1.5, "Filter Number", minval=1.0, maxval=10.0, tooltip="Higher = More aggressive Filter, Lower = Less aggressive")
emaTrendPeriod = input.int(50, "EMA Trend Period", minval=1, tooltip="Period for the EMA used for trend filtering")
lookbackPeriod = input.int(20, "Lookback Period for Highs/Lows", minval=1, tooltip="Period for determining recent highs/lows")
colorTP = input.color(title='Take Profit Color', defval=color.orange)
colorSL = input.color(title='Stop Loss Color', defval=color.red)  // Added color for Stop Loss

// Inputs for visibility
showBuyLabels = input.bool(true, title="Show Buy Labels")
showSellLabels = input.bool(true, title="Show Sell Labels")
showStrategy = input.bool(true, title="Show Strategy", tooltip="Enable for strategy testing")

// Calculations
tr = high - low
ema = filterNumber * ta.ema(tr, 50)
trendEma = ta.ema(close, emaTrendPeriod)  // Calculate the EMA for the trend filter

// Ensure calculations are based on historical data only
recentHigh = ta.highest(high, lookbackPeriod)
recentLow = ta.lowest(low, lookbackPeriod)

// Variables to track the entry prices for profit target and stop-loss
var float entryPriceLong = na
var float entryPriceShort = na
var float targetPriceLong = na
var float targetPriceShort = na
var float stopLossLong = na
var float stopLossShort = na

// Buy and Sell Conditions with Trend Filter
buy = close > trendEma and  // Buy only if above the trend EMA
      close[2] > open[2] and close[1] > open[1] and close > open and 
      (math.abs(close[2] - open[2]) > math.abs(close[1] - open[1])) and 
      (math.abs(close - open) > math.abs(close[1] - open[1])) and 
      close > close[1] and close[1] > close[2] and tr > ema

sell = close < trendEma and  // Sell only if below the trend EMA
       close[2] < open[2] and close[1] < open[1] and close < open and 
       (math.abs(close[2] - open[2]) > math.abs(close[1] - open[1])) and 
       (math.abs(close - open) > math.abs(close[1] - open[1])) and 
       close < close[1] and close[1] < close[2] and tr > ema

// Entry Rules
if (buy and barstate.isconfirmed)  // Check for buy condition on candle close
    if (showStrategy)
        strategy.entry("Buy", strategy.long, comment="Buy at Close")
    entryPriceLong := close  // Track entry price for long position
    targetPriceLong := recentHigh  // Set take profit target to recent high
    stopLossLong := recentLow  // Set stop-loss to recent low

if (sell and barstate.isconfirmed)  // Check for sell condition on candle close
    if (showStrategy)
        strategy.entry("Sell", strategy.short, comment="Sell at Close")
    entryPriceShort := close  // Track entry price for short position
    targetPriceShort := recentLow  // Set take profit target to recent low
    stopLossShort := recentHigh  // Set stop-loss to recent high

// Take Profit and Stop Loss Logic
signalBuyTPPrint = (not na(entryPriceLong) and close >= targetPriceLong)
signalSellTPPrint = (not na(entryPriceShort) and close <= targetPriceShort)

signalBuySLPrint = (not na(entryPriceLong) and close <= stopLossLong)
signalSellSLPrint = (not na(entryPriceShort) and close >= stopLossShort)

if (signalBuyTPPrint)
    if (showStrategy)
        strategy.close("Buy", comment="Close Buy at Profit Target")
    entryPriceLong := na  // Reset entry price for long position
    targetPriceLong := na  // Reset target price for long position
    stopLossLong := na  // Reset stop-loss for long position

if (signalSellTPPrint)
    if (showStrategy)
        strategy.close("Sell", comment="Close Sell at Profit Target")
    entryPriceShort := na  // Reset entry price for short position
    targetPriceShort := na  // Reset target price for short position
    stopLossShort := na  // Reset stop-loss for short position

if (signalBuySLPrint)
    if (showStrategy)
        strategy.close("Buy", comment="Close Buy at Stop Loss")
    entryPriceLong := na  // Reset entry price for long position
    targetPriceLong := na  // Reset target price for long position
    stopLossLong := na  // Reset stop-loss for long position

if (signalSellSLPrint)
    if (showStrategy)
        strategy.close("Sell", comment="Close Sell at Stop Loss")
    entryPriceShort := na  // Reset entry price for short position
    targetPriceShort := na  // Reset target price for short position
    stopLossShort := na  // Reset stop-loss for short position

// Plot Buy and Sell Labels with Visibility Conditions
plotshape(showBuyLabels and buy, "Buy", shape.labelup, location=location.belowbar, color=color.green, text="BUY", textcolor=color.white, size=size.tiny, offset=1)
plotshape(showSellLabels and sell, "Sell", shape.labeldown, location=location.abovebar, color=color.red, text="SELL", textcolor=color.white, size=size.tiny, offset=1)

// Plot Take Profit Flags
plotshape(showBuyLabels and signalBuyTPPrint, title="Take Profit (buys)", text="TP", style=shape.flag, location=location.abovebar, color=colorTP, textcolor=color.white, size=size.tiny)
plotshape(showSellLabels and signalSellTPPrint, title="Take Profit (sells)", text="TP", style=shape.flag, location=location.belowbar, color=colorTP, textcolor=color.white, size=size.tiny)

// Plot Stop Loss "X" Marker
plotshape(showBuyLabels and signalBuySLPrint, title="Stop Loss (buys)", text="X", style=shape.xcross, location=location.belowbar, color=colorSL, textcolor=color.white, size=size.tiny)
plotshape(showSellLabels and signalSellSLPrint, title="Stop Loss (sells)", text="X", style=shape.xcross, location=location.abovebar, color=colorSL, textcolor=color.white, size=size.tiny)

// Plot Trend EMA for reference
plot(showStrategy ? trendEma : na, title="Trend EMA", color=color.purple, linewidth=2)

// Plot recent high and low for debugging and validation
plot(showStrategy ? recentHigh : na, title="Recent High", color=color.green, linewidth=1)
plot(showStrategy ? recentLow : na, title="Recent Low", color=color.red, linewidth=1)

// Debugging: Plot bar index to verify real-time behavior
plot(showStrategy ? bar_index : na, title="Bar Index", color=color.blue)

// Debugging: Print the take profit and stop loss conditions
//label.new(bar_index, high, text="TP Buy: " + tostring(signalBuyTPPrint) + "\nSL Buy: " + tostring(signalBuySLPrint) + "\nTP Sell: " + tostring(signalSellTPPrint) + "\nSL Sell: " + tostring(signalSellSLPrint), color=color.blue, textcolor=color.white, size=size.small, style=label.style_label_down)