Ver no GitHub

Estratégia de Vlado

Estratégia de reversão de momentum baseada no clássico oscilador Williams %R de Larry Williams. O sistema aguarda que o oscilador alcance leituras extremas de sobrevendido ou sobrecomprado e então reverte a posição na próxima barra concluída. O port do StockSharp mantém o caráter discricionário da implementação original do MetaTrader, expondo cada configuração importante como um parâmetro.

Visão Geral

  • Categoria: Estratégia de oscilador de reversão à média.
  • Mercado: Qualquer instrumento líquido que forneça dados de candles estáveis (pares de forex, futuros de índice, pares spot de criptomoedas).
  • Período: Configurável via CandleType. Padrão: candles de 1 hora, correspondendo ao exemplo de uso original.
  • Direção: Comprado e vendido. O motor sempre mantém no máximo uma posição e vira quando o sinal oposto aparece.
  • Indicador: Williams %R com comprimento de lookback e níveis de limiar configuráveis.

Como Funciona

  1. Assina o feed de candles selecionado e calcula Williams %R em cada candle finalizado.
  2. Usa o nível padrão de sobrevendido de -75 e nível de sobrecomprado de -25 (os valores são negativos devido à escala do oscilador).
  3. Quando %R cai abaixo do nível de sobrevendido, a estratégia entra ou reverte para uma posição comprada.
  4. Quando %R sobe acima do nível de sobrecomprado, a estratégia entra ou reverte para uma posição vendida.
  5. As ordens são dimensionadas com Volume + Math.Abs(Position), de modo que uma reversão fecha a posição existente e abre a nova em uma única ordem de mercado.
  6. Nenhum stop-loss ou take-profit explícito é usado. O risco é controlado pelos níveis do indicador e pelo período escolhido.
  7. Cada ação é registrada via LogInfo, facilitando a auditoria de negociações na GUI do StockSharp ou nos arquivos de log.

Parâmetros

  • WilliamsPeriod: Número de candles usados para calcular o oscilador. Valores mais altos suavizam o sinal, valores mais baixos reagem mais rápido.
  • OverboughtLevel: Limiar que define quando o mercado é considerado sobrecomprado (padrão -25). Pode ser otimizado.
  • OversoldLevel: Limiar que define quando o mercado é considerado sobrevendido (padrão -75). Pode ser otimizado.
  • CandleType: Tipo de candle e período aplicado a todos os cálculos. Funciona com períodos, candles de volume ou barras de range.
  • Volume (herdado de Strategy): Define o tamanho base da ordem. Ajustar ao tamanho da conta e ao apetite de risco.

Regras de Negociação

  • Entrada comprado: Acionada quando %R <= OversoldLevel e a posição atual está zerada ou vendida.
  • Entrada vendido: Acionada quando %R >= OverboughtLevel e a posição atual está zerada ou comprada.
  • Saída: Realizada implicitamente pela ordem de reversão quando um sinal oposto aparece.
  • Gestão de posição: Sempre uma única posição aberta. O algoritmo não faz pirâmide nem saída escalonada.

Notas Adicionais

  • Funciona melhor em mercados laterais ou de tendência lenta onde os osciladores podem oscilar entre extremos.
  • Recomenda-se combinar a estratégia com controles de risco externos (stops de patrimônio, filtros de sessão) para negociação ao vivo.
  • A implementação inclui renderização de gráficos: a área principal mostra candles e negociações, enquanto um painel secundário plota Williams %R.
  • Projetada para pesquisa adicional: cada parâmetro suporta otimização dentro dos otimizadores do StockSharp.
using System;
using System.Collections.Generic;

using Ecng.Common;

using StockSharp.Algo.Indicators;
using StockSharp.Algo.Strategies;
using StockSharp.BusinessEntities;
using StockSharp.Messages;

namespace StockSharp.Samples.Strategies;

/// <summary>
/// Vlado momentum strategy using EMA crossover.
/// Buys when fast EMA crosses above slow EMA, sells on reverse.
/// </summary>
public class VladoStrategy : Strategy
{
	private readonly StrategyParam<int> _fastPeriod;
	private readonly StrategyParam<int> _slowPeriod;
	private readonly StrategyParam<int> _stopLossPoints;
	private readonly StrategyParam<int> _takeProfitPoints;

	private ExponentialMovingAverage _fast;
	private ExponentialMovingAverage _slow;

	private decimal _prevFast;
	private decimal _prevSlow;
	private decimal _entryPrice;
	private int _cooldown;

	/// <summary>
	/// Fast EMA period.
	/// </summary>
	public int FastPeriod
	{
		get => _fastPeriod.Value;
		set => _fastPeriod.Value = value;
	}

	/// <summary>
	/// Slow EMA period.
	/// </summary>
	public int SlowPeriod
	{
		get => _slowPeriod.Value;
		set => _slowPeriod.Value = value;
	}

	/// <summary>
	/// Stop-loss distance in price steps.
	/// </summary>
	public int StopLossPoints
	{
		get => _stopLossPoints.Value;
		set => _stopLossPoints.Value = value;
	}

	/// <summary>
	/// Take-profit distance in price steps.
	/// </summary>
	public int TakeProfitPoints
	{
		get => _takeProfitPoints.Value;
		set => _takeProfitPoints.Value = value;
	}

	/// <summary>
	/// Initializes a new instance of the <see cref="VladoStrategy"/> class.
	/// </summary>
	public VladoStrategy()
	{
		_fastPeriod = Param(nameof(FastPeriod), 14)
			.SetGreaterThanZero()
			.SetDisplay("Fast Period", "Fast EMA period", "Indicator");

		_slowPeriod = Param(nameof(SlowPeriod), 50)
			.SetGreaterThanZero()
			.SetDisplay("Slow Period", "Slow EMA period", "Indicator");

		_stopLossPoints = Param(nameof(StopLossPoints), 200)
			.SetNotNegative()
			.SetDisplay("Stop Loss", "Stop-loss in price steps", "Risk");

		_takeProfitPoints = Param(nameof(TakeProfitPoints), 400)
			.SetNotNegative()
			.SetDisplay("Take Profit", "Take-profit in price steps", "Risk");
	}

	/// <inheritdoc />
	public override IEnumerable<(Security sec, DataType dt)> GetWorkingSecurities()
	{
		yield return (Security, TimeSpan.FromMinutes(5).TimeFrame());
	}

	/// <inheritdoc />
	protected override void OnReseted()
	{
		base.OnReseted();

		_fast = null;
		_slow = null;
		_prevFast = 0;
		_prevSlow = 0;
		_entryPrice = 0;
		_cooldown = 0;
	}

	/// <inheritdoc />
	protected override void OnStarted2(DateTime time)
	{
		base.OnStarted2(time);

		_fast = new ExponentialMovingAverage { Length = FastPeriod };
		_slow = new ExponentialMovingAverage { Length = SlowPeriod };

		var subscription = SubscribeCandles(TimeSpan.FromMinutes(5).TimeFrame());
		subscription.Bind(_fast, _slow, ProcessCandle);
		subscription.Start();
	}

	private void ProcessCandle(ICandleMessage candle, decimal fastValue, decimal slowValue)
	{
		if (candle.State != CandleStates.Finished)
			return;

		if (!_fast.IsFormed || !_slow.IsFormed)
		{
			_prevFast = fastValue;
			_prevSlow = slowValue;
			return;
		}

		if (_cooldown > 0)
		{
			_cooldown--;
			_prevFast = fastValue;
			_prevSlow = slowValue;
			return;
		}

		var close = candle.ClosePrice;
		var step = Security?.PriceStep ?? 1m;

		// Check SL/TP
		if (Position > 0 && _entryPrice > 0)
		{
			if (StopLossPoints > 0 && close <= _entryPrice - StopLossPoints * step)
			{
				SellMarket();
				_entryPrice = 0;
				_cooldown = 80;
				_prevFast = fastValue;
				_prevSlow = slowValue;
				return;
			}

			if (TakeProfitPoints > 0 && close >= _entryPrice + TakeProfitPoints * step)
			{
				SellMarket();
				_entryPrice = 0;
				_cooldown = 80;
				_prevFast = fastValue;
				_prevSlow = slowValue;
				return;
			}
		}
		else if (Position < 0 && _entryPrice > 0)
		{
			if (StopLossPoints > 0 && close >= _entryPrice + StopLossPoints * step)
			{
				BuyMarket();
				_entryPrice = 0;
				_cooldown = 80;
				_prevFast = fastValue;
				_prevSlow = slowValue;
				return;
			}

			if (TakeProfitPoints > 0 && close <= _entryPrice - TakeProfitPoints * step)
			{
				BuyMarket();
				_entryPrice = 0;
				_cooldown = 80;
				_prevFast = fastValue;
				_prevSlow = slowValue;
				return;
			}
		}

		// EMA crossover
		if (_prevFast <= _prevSlow && fastValue > slowValue && Position <= 0)
		{
			if (Position < 0)
				BuyMarket();

			BuyMarket();
			_entryPrice = close;
			_cooldown = 80;
		}
		else if (_prevFast >= _prevSlow && fastValue < slowValue && Position >= 0)
		{
			if (Position > 0)
				SellMarket();

			SellMarket();
			_entryPrice = close;
			_cooldown = 80;
		}

		_prevFast = fastValue;
		_prevSlow = slowValue;
	}
}