国家价值因子策略
该策略按席勒CAPE比率对各国股市进行排序。CAPE最低的国家被视为低估并买入,而昂贵市场被避开。此方法利用了低估市场长期跑赢的现象。
策略在每月的第一个交易日将资金平均分配到最便宜的国家。持仓规模基于投资组合价值,并在交易金额超过设定的美元下限时才执行。
细节
- 投资范围:一组代表各国的股票指数或ETF。
- 信号:买入CAPE比率最低的国家。
- 再平衡:每月第一个交易日。
- 仓位:仅做多。
- 参数:
Universe– 各国相关的证券。MinTradeUsd– 最小交易金额(美元)。CandleType– 使用的K线周期(默认1天)。
- 注意:示例代码仅为占位实现,实际策略需补充完整的因子计算。
using System;
using System.Collections.Generic;
using Ecng.Common;
using StockSharp.Algo.Indicators;
using StockSharp.Algo.Strategies;
using StockSharp.BusinessEntities;
using StockSharp.Configuration;
using StockSharp.Messages;
namespace StockSharp.Samples.Strategies;
/// <summary>
/// Country value factor strategy that trades the primary instrument when its synthetic CAPE ratio is cheap or expensive relative to a benchmark.
/// </summary>
public class CountryValueFactorStrategy : Strategy
{
private readonly StrategyParam<string> _security2Id;
private readonly StrategyParam<int> _earningsLength;
private readonly StrategyParam<int> _lookbackPeriod;
private readonly StrategyParam<decimal> _entryThreshold;
private readonly StrategyParam<decimal> _exitThreshold;
private readonly StrategyParam<int> _cooldownBars;
private readonly StrategyParam<decimal> _stopLoss;
private readonly StrategyParam<DataType> _candleType;
private Security _benchmark = null!;
private ExponentialMovingAverage _primaryEarnings = null!;
private ExponentialMovingAverage _benchmarkEarnings = null!;
private SimpleMovingAverage _capeSpreadAverage = null!;
private StandardDeviation _capeSpreadDeviation = null!;
private decimal _latestPrimaryCape;
private decimal _latestBenchmarkCape;
private decimal? _previousZScore;
private bool _primaryUpdated;
private bool _benchmarkUpdated;
private int _cooldownRemaining;
/// <summary>
/// Benchmark security identifier.
/// </summary>
public string Security2Id
{
get => _security2Id.Value;
set => _security2Id.Value = value;
}
/// <summary>
/// Smoothing length for the synthetic earnings proxy.
/// </summary>
public int EarningsLength
{
get => _earningsLength.Value;
set => _earningsLength.Value = value;
}
/// <summary>
/// Lookback period used to normalize CAPE spread.
/// </summary>
public int LookbackPeriod
{
get => _lookbackPeriod.Value;
set => _lookbackPeriod.Value = value;
}
/// <summary>
/// Z-score threshold required to open a position.
/// </summary>
public decimal EntryThreshold
{
get => _entryThreshold.Value;
set => _entryThreshold.Value = value;
}
/// <summary>
/// Z-score threshold required to close a position.
/// </summary>
public decimal ExitThreshold
{
get => _exitThreshold.Value;
set => _exitThreshold.Value = value;
}
/// <summary>
/// Closed candles to wait before another position change.
/// </summary>
public int CooldownBars
{
get => _cooldownBars.Value;
set => _cooldownBars.Value = value;
}
/// <summary>
/// Stop loss percentage.
/// </summary>
public decimal StopLoss
{
get => _stopLoss.Value;
set => _stopLoss.Value = value;
}
/// <summary>
/// Candle type used for both instruments.
/// </summary>
public DataType CandleType
{
get => _candleType.Value;
set => _candleType.Value = value;
}
/// <summary>
/// Initializes strategy parameters.
/// </summary>
public CountryValueFactorStrategy()
{
_security2Id = Param(nameof(Security2Id), Paths.HistoryDefaultSecurity2)
.SetDisplay("Benchmark Security Id", "Identifier of the benchmark security", "General");
_earningsLength = Param(nameof(EarningsLength), 14)
.SetRange(2, 80)
.SetDisplay("Earnings Length", "Smoothing length for the synthetic earnings proxy", "Indicators");
_lookbackPeriod = Param(nameof(LookbackPeriod), 28)
.SetRange(10, 150)
.SetDisplay("Lookback Period", "Lookback period used to normalize CAPE spread", "Indicators");
_entryThreshold = Param(nameof(EntryThreshold), 1.35m)
.SetRange(0.4m, 4m)
.SetDisplay("Entry Threshold", "Z-score threshold required to open a position", "Signals");
_exitThreshold = Param(nameof(ExitThreshold), 0.35m)
.SetRange(0m, 2m)
.SetDisplay("Exit Threshold", "Z-score threshold required to close a position", "Signals");
_cooldownBars = Param(nameof(CooldownBars), 12)
.SetRange(0, 120)
.SetDisplay("Cooldown Bars", "Closed candles to wait before another position change", "Risk");
_stopLoss = Param(nameof(StopLoss), 2.5m)
.SetRange(0.5m, 10m)
.SetDisplay("Stop Loss %", "Stop loss percentage", "Risk");
_candleType = Param(nameof(CandleType), TimeSpan.FromHours(4).TimeFrame())
.SetDisplay("Candle Type", "Candle series for both instruments", "General");
}
/// <inheritdoc />
public override IEnumerable<(Security sec, DataType dt)> GetWorkingSecurities()
{
if (Security != null)
yield return (Security, CandleType);
if (!Security2Id.IsEmpty())
yield return (new Security { Id = Security2Id }, CandleType);
}
/// <inheritdoc />
protected override void OnReseted()
{
base.OnReseted();
_benchmark = null!;
_primaryEarnings = null!;
_benchmarkEarnings = null!;
_capeSpreadAverage = null!;
_capeSpreadDeviation = null!;
_latestPrimaryCape = 0m;
_latestBenchmarkCape = 0m;
_previousZScore = null;
_primaryUpdated = false;
_benchmarkUpdated = false;
_cooldownRemaining = 0;
}
/// <inheritdoc />
protected override void OnStarted2(DateTime time)
{
base.OnStarted2(time);
if (Security == null)
throw new InvalidOperationException("Primary security is not specified.");
if (Security2Id.IsEmpty())
throw new InvalidOperationException("Benchmark security identifier is not specified.");
_benchmark = this.LookupById(Security2Id) ?? new Security { Id = Security2Id };
_primaryEarnings = new ExponentialMovingAverage { Length = EarningsLength };
_benchmarkEarnings = new ExponentialMovingAverage { Length = EarningsLength };
_capeSpreadAverage = new SimpleMovingAverage { Length = LookbackPeriod };
_capeSpreadDeviation = new StandardDeviation { Length = LookbackPeriod };
var primarySubscription = SubscribeCandles(CandleType, security: Security);
var benchmarkSubscription = SubscribeCandles(CandleType, security: _benchmark);
primarySubscription
.Bind(ProcessPrimaryCandle)
.Start();
benchmarkSubscription
.Bind(ProcessBenchmarkCandle)
.Start();
var area = CreateChartArea();
if (area != null)
{
DrawCandles(area, primarySubscription);
DrawCandles(area, benchmarkSubscription);
DrawOwnTrades(area);
}
StartProtection(
new Unit(2, UnitTypes.Percent),
new Unit(StopLoss, UnitTypes.Percent));
}
private void ProcessPrimaryCandle(ICandleMessage candle)
{
if (candle.State != CandleStates.Finished)
return;
_latestPrimaryCape = UpdateCape(_primaryEarnings, candle);
_primaryUpdated = true;
TryProcessSpread(candle.OpenTime);
}
private void ProcessBenchmarkCandle(ICandleMessage candle)
{
if (candle.State != CandleStates.Finished)
return;
_latestBenchmarkCape = UpdateCape(_benchmarkEarnings, candle);
_benchmarkUpdated = true;
TryProcessSpread(candle.OpenTime);
}
private decimal UpdateCape(ExponentialMovingAverage average, ICandleMessage candle)
{
var syntheticEarnings = CalculateSyntheticEarnings(candle);
var smoothedEarnings = average.Process(syntheticEarnings, candle.OpenTime, true).ToDecimal();
return candle.ClosePrice / Math.Max(smoothedEarnings, 1m);
}
private decimal CalculateSyntheticEarnings(ICandleMessage candle)
{
var priceBase = Math.Max(candle.OpenPrice, 1m);
var range = Math.Max(candle.HighPrice - candle.LowPrice, Security?.PriceStep ?? 1m);
var profitabilityProxy = priceBase * (1m + Math.Min(0.08m, (candle.ClosePrice - candle.OpenPrice) / priceBase));
var stabilityProxy = priceBase * (1m - Math.Min(0.2m, range / priceBase));
return (profitabilityProxy + stabilityProxy) / 2m;
}
private void TryProcessSpread(DateTime time)
{
if (!_primaryUpdated || !_benchmarkUpdated)
return;
_primaryUpdated = false;
_benchmarkUpdated = false;
if (!_primaryEarnings.IsFormed || !_benchmarkEarnings.IsFormed)
return;
var spread = _latestPrimaryCape - _latestBenchmarkCape;
var mean = _capeSpreadAverage.Process(spread, time, true).ToDecimal();
var deviation = _capeSpreadDeviation.Process(spread, time, true).ToDecimal();
if (!_capeSpreadAverage.IsFormed || !_capeSpreadDeviation.IsFormed || deviation <= 0m)
return;
if (!IsFormedAndOnlineAndAllowTrading())
return;
if (_cooldownRemaining > 0)
_cooldownRemaining--;
var zScore = (spread - mean) / deviation;
var bullishEntry = _previousZScore is decimal previousBullish && previousBullish > -EntryThreshold && zScore <= -EntryThreshold;
var bearishEntry = _previousZScore is decimal previousBearish && previousBearish < EntryThreshold && zScore >= EntryThreshold;
if (_cooldownRemaining == 0 && Position == 0)
{
if (bullishEntry)
{
BuyMarket();
_cooldownRemaining = CooldownBars;
}
else if (bearishEntry)
{
SellMarket();
_cooldownRemaining = CooldownBars;
}
}
else if (Position > 0 && zScore >= -ExitThreshold)
{
SellMarket(Position);
_cooldownRemaining = CooldownBars;
}
else if (Position < 0 && zScore <= ExitThreshold)
{
BuyMarket(Math.Abs(Position));
_cooldownRemaining = CooldownBars;
}
_previousZScore = zScore;
}
}
import clr
clr.AddReference("StockSharp.Messages")
clr.AddReference("StockSharp.Algo")
clr.AddReference("StockSharp.BusinessEntities")
clr.AddReference("StockSharp.Algo.Indicators")
clr.AddReference("StockSharp.Algo.Strategies")
from System import TimeSpan, Math
from StockSharp.Messages import DataType, CandleStates, Unit, UnitTypes
from StockSharp.Algo.Indicators import ExponentialMovingAverage, SimpleMovingAverage, StandardDeviation
from StockSharp.Algo.Strategies import Strategy
from StockSharp.BusinessEntities import Security
from indicator_extensions import *
class country_value_factor_strategy(Strategy):
"""Country value factor strategy using synthetic CAPE ratio on dual securities."""
def __init__(self):
super(country_value_factor_strategy, self).__init__()
self._security2_id = self.Param("Security2Id", "TONUSDT@BNBFT") \
.SetDisplay("Benchmark Security Id", "Identifier of the benchmark security", "General")
self._earnings_length = self.Param("EarningsLength", 14) \
.SetRange(2, 80) \
.SetDisplay("Earnings Length", "Smoothing length for the synthetic earnings proxy", "Indicators")
self._lookback_period = self.Param("LookbackPeriod", 28) \
.SetRange(10, 150) \
.SetDisplay("Lookback Period", "Lookback period used to normalize CAPE spread", "Indicators")
self._entry_threshold = self.Param("EntryThreshold", 1.35) \
.SetRange(0.4, 4.0) \
.SetDisplay("Entry Threshold", "Z-score threshold required to open a position", "Signals")
self._exit_threshold = self.Param("ExitThreshold", 0.35) \
.SetRange(0.0, 2.0) \
.SetDisplay("Exit Threshold", "Z-score threshold required to close a position", "Signals")
self._cooldown_bars = self.Param("CooldownBars", 12) \
.SetRange(0, 120) \
.SetDisplay("Cooldown Bars", "Closed candles to wait before another position change", "Risk")
self._stop_loss = self.Param("StopLoss", 2.5) \
.SetRange(0.5, 10.0) \
.SetDisplay("Stop Loss %", "Stop loss percentage", "Risk")
self._candle_type = self.Param("CandleType", DataType.TimeFrame(TimeSpan.FromHours(4))) \
.SetDisplay("Candle Type", "Candle series for both instruments", "General")
self._benchmark = None
self._primary_earnings = None
self._benchmark_earnings = None
self._cape_spread_average = None
self._cape_spread_deviation = None
self._latest_primary_cape = 0.0
self._latest_benchmark_cape = 0.0
self._previous_z_score = None
self._primary_updated = False
self._benchmark_updated = False
self._cooldown_remaining = 0
@property
def candle_type(self):
return self._candle_type.Value
def GetWorkingSecurities(self):
result = []
if self.Security is not None:
result.append((self.Security, self.candle_type))
sec2_id = str(self._security2_id.Value)
if sec2_id:
s = Security()
s.Id = sec2_id
result.append((s, self.candle_type))
return result
def OnReseted(self):
super(country_value_factor_strategy, self).OnReseted()
self._benchmark = None
self._primary_earnings = None
self._benchmark_earnings = None
self._cape_spread_average = None
self._cape_spread_deviation = None
self._latest_primary_cape = 0.0
self._latest_benchmark_cape = 0.0
self._previous_z_score = None
self._primary_updated = False
self._benchmark_updated = False
self._cooldown_remaining = 0
def OnStarted2(self, time):
super(country_value_factor_strategy, self).OnStarted2(time)
sec2_id = str(self._security2_id.Value)
if not sec2_id:
raise Exception("Benchmark security identifier is not specified.")
s = Security()
s.Id = sec2_id
self._benchmark = s
earn_len = int(self._earnings_length.Value)
lookback = int(self._lookback_period.Value)
self._primary_earnings = ExponentialMovingAverage()
self._primary_earnings.Length = earn_len
self._benchmark_earnings = ExponentialMovingAverage()
self._benchmark_earnings.Length = earn_len
self._cape_spread_average = SimpleMovingAverage()
self._cape_spread_average.Length = lookback
self._cape_spread_deviation = StandardDeviation()
self._cape_spread_deviation.Length = lookback
primary_subscription = self.SubscribeCandles(self.candle_type, True, self.Security)
benchmark_subscription = self.SubscribeCandles(self.candle_type, True, self._benchmark)
primary_subscription.Bind(self.ProcessPrimaryCandle).Start()
benchmark_subscription.Bind(self.ProcessBenchmarkCandle).Start()
area = self.CreateChartArea()
if area is not None:
self.DrawCandles(area, primary_subscription)
self.DrawCandles(area, benchmark_subscription)
self.DrawOwnTrades(area)
self.StartProtection(
Unit(2, UnitTypes.Percent),
Unit(float(self._stop_loss.Value), UnitTypes.Percent)
)
def ProcessPrimaryCandle(self, candle):
if candle.State != CandleStates.Finished:
return
self._latest_primary_cape = self.UpdateCape(self._primary_earnings, candle)
self._primary_updated = True
self.TryProcessSpread(candle.OpenTime)
def ProcessBenchmarkCandle(self, candle):
if candle.State != CandleStates.Finished:
return
self._latest_benchmark_cape = self.UpdateCape(self._benchmark_earnings, candle)
self._benchmark_updated = True
self.TryProcessSpread(candle.OpenTime)
def UpdateCape(self, average, candle):
synthetic_earnings = self.CalculateSyntheticEarnings(candle)
result = process_float(average, synthetic_earnings, candle.OpenTime, True)
smoothed_earnings = float(result)
return float(candle.ClosePrice) / max(smoothed_earnings, 1.0)
def CalculateSyntheticEarnings(self, candle):
price_base = max(float(candle.OpenPrice), 1.0)
price_step = float(self.Security.PriceStep) if self.Security is not None and self.Security.PriceStep is not None else 1.0
range_val = max(float(candle.HighPrice) - float(candle.LowPrice), price_step)
profitability_proxy = price_base * (1.0 + min(0.08, (float(candle.ClosePrice) - float(candle.OpenPrice)) / price_base))
stability_proxy = price_base * (1.0 - min(0.2, range_val / price_base))
return (profitability_proxy + stability_proxy) / 2.0
def TryProcessSpread(self, time):
if not self._primary_updated or not self._benchmark_updated:
return
self._primary_updated = False
self._benchmark_updated = False
if not self._primary_earnings.IsFormed or not self._benchmark_earnings.IsFormed:
return
spread = self._latest_primary_cape - self._latest_benchmark_cape
mean_result = process_float(self._cape_spread_average, spread, time, True)
mean = float(mean_result)
dev_result = process_float(self._cape_spread_deviation, spread, time, True)
deviation = float(dev_result)
if not self._cape_spread_average.IsFormed or not self._cape_spread_deviation.IsFormed or deviation <= 0:
return
if not self.IsFormedAndOnlineAndAllowTrading():
return
if self._cooldown_remaining > 0:
self._cooldown_remaining -= 1
z_score = (spread - mean) / deviation
entry_thresh = float(self._entry_threshold.Value)
exit_thresh = float(self._exit_threshold.Value)
cooldown = int(self._cooldown_bars.Value)
bullish_entry = self._previous_z_score is not None and self._previous_z_score > -entry_thresh and z_score <= -entry_thresh
bearish_entry = self._previous_z_score is not None and self._previous_z_score < entry_thresh and z_score >= entry_thresh
if self._cooldown_remaining == 0 and self.Position == 0:
if bullish_entry:
self.BuyMarket()
self._cooldown_remaining = cooldown
elif bearish_entry:
self.SellMarket()
self._cooldown_remaining = cooldown
elif self.Position > 0 and z_score >= -exit_thresh:
self.SellMarket(self.Position)
self._cooldown_remaining = cooldown
elif self.Position < 0 and z_score <= exit_thresh:
self.BuyMarket(Math.Abs(self.Position))
self._cooldown_remaining = cooldown
self._previous_z_score = z_score
def CreateClone(self):
return country_value_factor_strategy()