マジックチャンネルプライスアクション取引戦略

/*backtest
start: 2024-06-28 00:00:00
end: 2024-07-28 00:00:00
period: 2h
basePeriod: 15m
exchanges: [{"eid":"Futures_Binance","currency":"BTC_USDT"}]
*/

//@version=5
strategy("Magic Channel", shorttitle="Magic Channel", overlay=true)

// Magic channel settings with optimization options
conversionPeriod = input.int(5, title="Conversion Period", minval=1, maxval=20)
basePeriod = input.int(51, title="Base Period", minval=1, maxval=100)
laggingSpanPeriod = input.int(68, title="Lagging Span Period", minval=1, maxval=100)
displace = input.int(21, title="Displacement", minval=1, maxval=30)

// Stoploss and Take Profit settings with more granularity
stoplossPercent = input.float(0.1, title="Stoploss Percentage", minval=0.01) / 100
takeProfitPercent = input.float(0.1, title="Take Profit Percentage", minval=0.01) / 100

// Function definition for Magic channel calculation
computeMagicChannel(period) =>
    (ta.lowest(low, period) + ta.highest(high, period)) / 2

// Calculating the lines
convLine = computeMagicChannel(conversionPeriod)
baseLine = computeMagicChannel(basePeriod)
leadingSpan1 = (convLine + baseLine) / 2
leadingSpan2 = computeMagicChannel(laggingSpanPeriod)
displacedLead1 = leadingSpan1[displace]
displacedLead2 = leadingSpan2[displace]

// Defining entry signals
buyCondition = close > displacedLead2 and displacedLead1 > displacedLead2 and ta.crossover(close, baseLine)
sellCondition = close < displacedLead1 and displacedLead1 < displacedLead2 and ta.crossunder(close, baseLine)

// Executing strategy entries based on signals
if (buyCondition)
    strategy.entry("Enter Long", strategy.long)

if (sellCondition)
    strategy.entry("Enter Short", strategy.short)

// Stoploss and Take Profit conditions
stopLossLong = close * (1 - stoplossPercent)
stopLossShort = close * (1 + stoplossPercent)
takeProfitLong = close * (1 + takeProfitPercent)
takeProfitShort = close * (1 - takeProfitPercent)

// Apply stop-loss and take profit orders
if (strategy.position_size > 0)
    strategy.exit("Exit Long", from_entry="Enter Long", stop=stopLossLong, limit=takeProfitLong)

if (strategy.position_size < 0)
    strategy.exit("Exit Short", from_entry="Enter Short", stop=stopLossShort, limit=takeProfitShort)

// Plotting the Magic Channel lines on the chart
plot(convLine, color=color.blue, title="Conversion Line")
plot(baseLine, color=color.red, title="Base Line")
plot(displacedLead1, color=color.green, title="Leading Span 1 (Displaced)")
plot(displacedLead2, color=color.orange, title="Leading Span 2 (Displaced)")

// Highlighting buy and sell signals on the chart
plotshape(series=buyCondition, location=location.belowbar, color=color.green, style=shape.labelup, title="Buy Signal", text="BUY")
plotshape(series=sellCondition, location=location.abovebar, color=color.red, style=shape.labeldown, title="Sell Signal", text="SELL")

// Adding gradient background colors
bgcolor(buyCondition ? color.new(color.green, 80) : na, title="Buy Zone Background")
bgcolor(sellCondition ? color.new(color.red, 80) : na, title="Sell Zone Background")

// Fancy Candle Colors with Borders (Workaround)
bullishColor = color.new(color.green, 0)  // Bright green for bullish candles
bearishColor = color.new(color.red, 0)    // Bright red for bearish candles
dojiColor = color.new(color.yellow, 0)    // Yellow for doji candles
borderColor = color.new(color.black, 50)  // Semi-transparent black for borders

isBullish = close > open
isBearish = close < open
isDoji = math.abs(close - open) < (high - low) * 0.1

candleColor = isDoji ? dojiColor : (isBullish ? bullishColor : bearishColor)

// Plotting Candles
plot(open, color=candleColor, style=plot.style_linebr, linewidth=1, title="Open Line")
plot(close, color=candleColor, style=plot.style_linebr, linewidth=1, title="Close Line")
plot(high, color=candleColor, style=plot.style_linebr, linewidth=1, title="High Line")
plot(low, color=candleColor, style=plot.style_linebr, linewidth=1, title="Low Line")

// Draw borders and candle bodies using plotshape
plotshape(series=isBullish ? high : na, location=location.absolute, color=borderColor, style=shape.triangledown, size=size.small, title="Bullish Border")
plotshape(series=isBearish ? low : na, location=location.absolute, color=borderColor, style=shape.triangleup, size=size.small, title="Bearish Border")

// Trend Arrows
plotarrow(series=buyCondition ? 1 : sellCondition ? -1 : na, colorup=color.green, colordown=color.red, offset=-1, title="Trend Arrows")

// Optional: Overlay Background color based on overall trend or conditions
bgcolor(strategy.position_size > 0 ? color.new(color.blue, 90) : na, title="Long Position Background")
bgcolor(strategy.position_size < 0 ? color.new(color.purple, 90) : na, title="Short Position Background")

// Enhanced Alerts
alertcondition(buyCondition, title="Buy Alert", message="Buy signal detected at {{ticker}} on {{time}}. Conditions met: Close > Displaced Lead 2, Displaced Lead 1 > Displaced Lead 2, Close crossover Base Line.")
alertcondition(sellCondition, title="Sell Alert", message="Sell signal detected at {{ticker}} on {{time}}. Conditions met: Close < Displaced Lead 1, Displaced Lead 1 < Displaced Lead 2, Close crossunder Base Line.")