Strategi gabungan pelbagai faktor dengan purata bergerak adaptif

Penulis:ChaoZhang, Tarikh: 2023-12-15 11:30:09
Tag:

I. Ringkasan Strategi

Strategi gabungan pelbagai faktor dengan purata bergerak adaptif adalah strategi gabungan yang menggabungkan penggunaan garis HA, purata bergerak, persilangan stokastik dan bar intraday.

II. Logik Strategi

Logik teras strategi ini adalah untuk menggabungkan beberapa penunjuk teknikal untuk menjaringkan isyarat beli dan jual, dan menjana isyarat perdagangan dengan kekuatan yang berbeza berdasarkan hasil yang sepadan.

Khususnya, empat penunjuk teknikal utama yang digunakan dalam strategi termasuk:

Bar intraday. Strategi ini menggunakan warna bar intraday untuk menentukan trend harga. Dua bar HA warna hijau berturut-turut memberi isyarat beli, sementara dua bar HA berongga merah berturut-turut memberi isyarat jual.
Rata-rata bergerak. Strategi ini menggunakan purata bergerak pantas, perlahan dan penapis dengan tetapan parameter yang berbeza secara serentak. Apabila garis pantas melintasi di atas garis perlahan, dan garis perlahan melintasi di atas garis penapis, ia memberikan isyarat beli. Dan sebaliknya. Purata bergerak baik untuk menentukan trend jangka sederhana hingga panjang.
Indikator Stochastic. Indikator ini menentukan masa persilangan bullish dan bearish. Apabila garis %K memecahkan garis %D dari bawah, ia memberikan isyarat beli. Dan apabila %K memecahkan %D dari atas, ia memberikan isyarat jual.
Mekanisme skor yang sepadan. Menurut pencocokan faktor-faktor di atas, strategi mengamalkan mekanisme skor. Semakin banyak faktor yang sepadan, semakin kuat isyarat perdagangan yang sepadan.

Melalui penilaian komprehensif pelbagai faktor, strategi ini dapat menangkap peluang perdagangan yang lebih halus dalam jangka sederhana dan pendek, dengan itu mencapai pulangan yang berlebihan semasa pasaran bull.

III. Kelebihan

Kelebihan terbesar strategi pelbagai faktor ini adalah bahawa ia meningkatkan kebolehpercayaan isyarat perdagangan. Satu petunjuk teknikal tunggal cenderung menghasilkan isyarat palsu. Dengan menggabungkan beberapa petunjuk, strategi ini dapat mengurangkan gangguan dari isyarat palsu dengan berkesan.

Di samping itu, berbanding dengan hanya mengikuti satu penunjuk, kombinasi pelbagai faktor dapat meningkatkan kadar kemenangan perdagangan. Ia boleh mencapai pulangan kumulatif yang lebih tinggi semasa pasaran bull.

IV. Risiko

Risiko utama strategi ini adalah bahawa gabungan pelbagai faktor itu sendiri meningkatkan kerumitan strategi. Ia perlu menjaga tetapan parameter, pelarasan kerap beberapa penunjuk pada masa yang sama.

Juga, semasa pasaran beruang, masa memegang boleh terlalu lama. Walaupun dengan stop loss di tempat, kerugian yang signifikan masih boleh berlaku.

Di samping itu, penunjuk teknikal seperti garis Stochastic dan HA boleh dipengaruhi oleh peristiwa black swan, yang cenderung menghasilkan isyarat palsu dan menyebabkan kerugian yang tidak perlu.

V. Idea Peningkatan

Strategi ini boleh dioptimumkan dalam aspek berikut:

Mengoptimumkan tetapan parameter setiap penunjuk untuk mencari kombinasi yang optimum.
Tambah latihan model dan modul parameter adaptif untuk pengoptimuman parameter masa nyata.
Tambah strategi stop loss untuk mengurangkan pengeluaran maksimum.
Tambah modul kawalan kedudukan untuk menyesuaikan kedudukan secara dinamik berdasarkan keadaan pasaran.
Menggabungkan algoritma pembelajaran mesin untuk membina model rangkaian saraf untuk sistem penilaian pelbagai faktor.

VI. Kesimpulan

Strategi gabungan pelbagai faktor dengan purata bergerak adaptif menggabungkan kekuatan beberapa penunjuk teknikal. Ia dapat meningkatkan kualiti isyarat dengan berkesan dan mencapai pulangan yang berlebihan semasa pasaran bull. Tetapi pada masa yang sama, ia juga meningkatkan kerumitan strategi, yang memerlukan ujian dan pengoptimuman lanjut.

/*backtest
start: 2022-12-08 00:00:00
end: 2023-12-14 00:00:00
period: 1d
basePeriod: 1h
exchanges: [{"eid":"Futures_Binance","currency":"BTC_USDT"}]
*/

// This source code is subject to the terms of the Mozilla Public License 2.0 at https://mozilla.org/MPL/2.0/
// © cyrule
//@version=4
strategy("2nd Grade Strategy", overlay=true, shorttitle="2GTS", max_lines_count = 500, max_labels_count = 500, calc_on_every_tick = true, calc_on_order_fills = true, pyramiding = 1, default_qty_type = strategy.percent_of_equity, default_qty_value = 10)

source = input(close, title = "Source")

// **********************
// * Heikin-Ahshi       *
// * kudos to garethyeo *
// **********************
showHA   = input(true, title = "Show Heikin Ashi?", group = "Heikin Ashi")
ha_open  = security(heikinashi(syminfo.tickerid), timeframe.period, open)
ha_high  = security(heikinashi(syminfo.tickerid), timeframe.period, high)
ha_low   = security(heikinashi(syminfo.tickerid), timeframe.period, low)
ha_close = security(heikinashi(syminfo.tickerid), timeframe.period, close)

bgcolor(iff(showHA and ha_open < ha_close , color.new(#53b987, transp = 92.5), na), title = 'Green HA')
bgcolor(iff(showHA and ha_open >= ha_close, color.new(#eb4d5c, transp = 92.5), na), title = 'Red HA'  )


// ******************
// * Moving Average *
// ******************
// MA Settings
showMA         = input(true, title = "Show Moving Averages?", group = "Moving Averages")
fastMALength   = input(title = "Fast MA Length", minval = 1, step = 1, defval = 20, group = "Moving Averages")
slowMALength   = input(title = "Slow MA Length", minval = 1, step = 1, defval = 50, group = "Moving Averages")
maType         = input(title = "Moving Average Type", defval = "SMA", options = ["SMA", "EMA", "RMA", "WMA", "VWMA"], group = "Moving Averages")
filterMALength = input(title = "Filter MA Length", minval = 1, step = 1, defval = 200, group = "Moving Averages")
filterMAType   = input(title = "Filter MA Type", defval = "EMA", options = ["SMA", "EMA", "RMA", "WMA", "VWMA"], group = "Moving Averages")

// Calculate MA
var float maFast   = na
var float maSlow   = na
var float maFilter = na

if (maType   == "SMA")
    maFast   := sma(source, fastMALength)
    maSlow   := sma(source, slowMALength)
if (maType   == "EMA")
    maFast   := ema(source, fastMALength)
    maSlow   := ema(source, slowMALength)
if (maType   == "RMA")
    maFast   := rma(source, fastMALength)
    maSlow   := rma(source, slowMALength)
    maFilter := rma(source, filterMALength)
if (maType   == "WMA")
    maFast   := wma(source, fastMALength)
    maSlow   := wma(source, slowMALength)
if (maType   == "VWMA")
    maFast   := vwma(source, fastMALength)
    maSlow   := vwma(source, slowMALength)

if (filterMAType == "SMA")
    maFilter     := sma(source, filterMALength)
if (filterMAType == "EMA")
    maFilter     := ema(source, filterMALength)
if (filterMAType == "RMA")
    maFilter     := rma(source, filterMALength)
if (filterMAType == "WMA")
    maFilter     := wma(source, filterMALength)
if (filterMAType == "VWMA")
    maFilter     := vwma(source, filterMALength)

BiruAtasMerah = (maFast >= maSlow) and (maSlow >= maFilter)
MerahAtasBiru = (maFast <= maSlow) and (maSlow <= maFilter)

// Lukis MA
plot(series = showMA ? maFast   : na, color = color.blue, title = "MA Fast")
plot(series = showMA ? maSlow   : na, color = color.red,  title = "MA Slow")
plot(series = showMA ? maFilter : na, color = #FFCC00,    title = "MA Filter")


// **************
// * Stochastic *
// **************
// Stochastic Settings
showSSC = input(true, title = "Show Stochastic Crossovers?", group = "Stochastic")
Length = input (10, minval = 1, title = "%K Length", group = "Stochastic")
SmoothK = input (3, minval = 1, title = "%K Smoothing", group = "Stochastic")
SmoothD = input (3, minval = 1, title = "%D Smoothing", group = "Stochastic")

// Calculate Stochastic
var float K = na
var float D = na

if (maType ==  "SMA")
	K      := sma(stoch(source, high, low, Length), SmoothK)
	D      := sma(K, SmoothD)
if (maType ==  "EMA")
	K      := ema(stoch(source, high, low, Length), SmoothK)
	D      := ema(K, SmoothD)
if (maType ==  "RMA")
	K      := rma(stoch(source, high, low, Length), SmoothK)
	D      := rma(K, SmoothD)
if (maType ==  "WMA")
	K      := wma(stoch(source, high, low, Length), SmoothK)
	D      := wma(K, SmoothD)
if (maType ==  "VWMA")
	K      := vwma(stoch(source, high, low, Length), SmoothK)
	D      := vwma(K, SmoothD)

StochasticCrossOver  = crossover(K, D)
StochasticCrossUnder = crossunder(K, D)

// Lukis SS
plotshape(showSSC and StochasticCrossOver  and K <=  20            ? K : na, text = "Golden\nCrossover",  color = color.new(color.green, transp = 25), location = location.belowbar, size = size.tiny, title = "Golden Crossover" )
plotshape(showSSC and StochasticCrossUnder and K >=  80            ? D : na, text = "Deadly\nCrossover",  color = color.new(color.red, transp = 25),   location = location.belowbar, size = size.tiny, title = "Deadly Crossover" )
plotshape(showSSC and StochasticCrossOver  and K <=  80 and K > 20 ? K : na, text = "Bullish\nCrossover", color = color.new(color.green, transp = 50), location = location.belowbar, size = size.tiny, title = "Bullish Crossover")
plotshape(showSSC and StochasticCrossUnder and K >=  20 and K < 80 ? D : na, text = "Bearish\nCrossover", color = color.new(color.red, transp = 50),   location = location.belowbar, size = size.tiny, title = "Bearish Crossover")

showBull = input(true, title = "Show Bullish Signal?", group = "Signal")
showBear = input(false, title = "Show Bearish Signal?", group = "Signal")

bullishCriteria = 0
if (ha_open < ha_close) and (ha_open[1] < ha_close[1]) and (ha_open[2] >= ha_close[2])
    bullishCriteria := bullishCriteria + 1
if (maFast > maSlow) and (maSlow > maFilter)
    bullishCriteria := bullishCriteria + 1
if (K > D) and (K > K[1]) and (D > D[1])
    bullishCriteria := bullishCriteria + 1

bearishCriteria = 0
if (ha_open >= ha_close) and (ha_open[1] >= ha_close[1]) and (ha_open[2] < ha_close[2])
    bearishCriteria := bearishCriteria + 1
if (maFast < maSlow) and (maSlow < maFilter)
    bearishCriteria := bearishCriteria + 1
if (K < D) and (K < K[1]) and (D < D[1])
    bearishCriteria := bearishCriteria + 1

signal = color.new(color.white, transp = 0)
if bearishCriteria == 2
    signal := color.new(color.orange, transp = 50)
if bearishCriteria == 3
    signal := color.new(color.red, transp = 50)
if bullishCriteria == 2
    signal := color.new(color.aqua, transp = 50)
if bullishCriteria == 3
    signal := color.new(color.green, transp = 50)

bullishCriteria := showBull ? bullishCriteria : 0
bearishCriteria := showBear ? bearishCriteria : 0

bgcolor(iff(bullishCriteria > 1, signal, na), title = 'Bullish Signal')
bgcolor(iff(bearishCriteria > 1, signal, na), title = 'Bearish Signal')

longTPPerc  = input(title = "Take Profit Threshold (%)"            , minval = 0.0, step = 0.5, defval = 2.5, group = "Trading") / 100
profitRatio = input(title = "Profit-to-Loss ratio (risk tolerance)", minval = 1.0, step = 0.1, defval = 1.4, group = "Trading")
longSLPerc  = longTPPerc / profitRatio
takeProfit  = strategy.position_avg_price * (1 + longTPPerc)
stopLoss    = strategy.position_avg_price * (1 - longSLPerc)
strategy.initial_capital = 50000
strategy.entry("Long" , strategy.long , floor(strategy.initial_capital*.1/close), stop = strategy.position_avg_price * 1.25, when = bullishCriteria > 1)
strategy.entry("Short", strategy.short, floor(strategy.initial_capital*.1/close), stop = strategy.position_avg_price * 1.25, when = bearishCriteria > 1)
strategy.close("Long" , when = (open >= takeProfit) or (open <= stopLoss) or (high >= takeProfit) or (low <= stopLoss))
strategy.close("Short", when = (open >= takeProfit) or (open <= stopLoss) or (high >= takeProfit) or (low <= stopLoss))

plotshape(bullishCriteria, location = location.belowbar, color = color.new(color.black, transp = 100))
plotshape(bearishCriteria, location = location.belowbar, color = color.new(color.black, transp = 100))

Lebih lanjut

2019 FMZ - Semua hak dilindungi