II Curso de Programación. Sistema Ejercicio 14.

Continuamos con la publicación de los sistemas de ejemplo que estamos elaborando a través de nuestro 2º Curso de Programación para Visual Chart 5.

En este caso, publicamos la resolución del sistema propuesto durante el ejercicio 14.

Sistema Ejercicio 14: StopLoss en Soporte y Resistencia con pérdida máxima porcentual

Durante este ejercicio, se propuso la creación de un sistema con el cual poder repasar el diseño de los stops porcentuales. Además, se planteaba un diseño de stop dinámico basado en niveles de soporte y resistencia.

Reglas de entrada.
El sistema entra cuando se produce un cruce entre dos medias de diferente periodo.

Reglas de salida.
El sistema cierra posición en base a los nuevos soportes y resistencias que se vayan generando. Además, incluye un margen porcentual de pérdida máxima, de modo que el stop de pérdida nunca puede superar dicho margen.



Para obtener los niveles de soporte y resistencia el sistema utiliza las funciones GetHighest() y GetLowest().

Para obtener la pérdida máxima, se añade el parámetro StopPerdida, que representa un tanto por ciento del precio de entrada.

El desarrollo del sistema sería el siguiente:


Código PDV



Código VBA

'¡¡ Parameters
Dim Contratos As Long '1
Dim PeriodoCorta As Integer '5
Dim PeriodoLarga As Integer '30
Dim StopPerdida As Double '0.1
Dim DistanciaMaxMin As Integer '10
'Parameters !!
Dim avshortdata As DataIdentifier
Dim avlongdata As DataIdentifier
Dim preciostop As Double
Option Explicit
Public APP As SysUserApp
Implements System
Public Sub System_OnInitCalculate()
With APP

preciostop = 0
avshortdata = .GetIndicatorIdentifier(AvExponential, Data, PeriodoCorta, PriceClose)
avlongdata = .GetIndicatorIdentifier(AvExponential, Data, PeriodoLarga, PriceClose)
End With
End Sub
Public Sub System_OnCalculateBar(ByVal Bar As Long)
With APP

Dim medcortaact As Double
Dim medcortaant As Double
Dim medlargaact As Double
Dim medlargaant As Double
Dim pos_abierta As Integer
Dim pentrada As Double
Dim ulsop As Double
Dim ulres As Double
Dim stopmax As Double

medcortaact = .GetIndicatorValue(avshortdata)
medcortaant = .GetIndicatorValue(avshortdata, 1, 1)
medlargaact = .GetIndicatorValue(avlongdata)
medlargaant = .GetIndicatorValue(avlongdata, 1, 1)
pos_abierta = .GetMarketPosition()
pentrada = .GetEntryPrice()
ulres = .GetHighest(Data, PriceHigh, DistanciaMaxMin)
ulsop = .GetLowest(Data, PriceLow, DistanciaMaxMin)

'entradas
If (pos_abierta <> 1 And medcortaact > medlargaact And medcortaant <= medlargaant) Then
.Buy AtClose, Contratos
pos_abierta = 1
pentrada = .Close()
preciostop = 0
ElseIf (pos_abierta <> -1 And medcortaact < medlargaact And medcortaant >= medlargaant) Then
.Sell AtClose, Contratos
pos_abierta = -1
pentrada = .Close()
preciostop = 0
End If

'salidas
If (pos_abierta = 1) Then
stopmax = pentrada * (1 - StopPerdida / 100)
If (preciostop = 0 Or ulsop > preciostop) Then
'control pérdida máxima
If (ulsop < stopmax) Then
preciostop = stopmax
Else
preciostop = ulsop
End If
End If
.ExitLong AtStop, Contratos, preciostop
ElseIf (pos_abierta = -1) Then
stopmax = pentrada * (1 + StopPerdida / 100)
If (preciostop = 0 Or ulres < preciostop) Then
'control pérdida máxima
If (ulres > stopmax) Then
preciostop = stopmax
Else
preciostop = ulres
End If
End If
.ExitShort AtStop, Contratos, preciostop
End If
End With
End Sub

Comentarios

Publicar un comentario

Entradas populares de este blog

El indicador Relative Strength Mansfield with Index

Imagen
Esta semana les invitamos desde nuestro blog a que prueben una de las últimas incorporaciones añadidas a nuestra extensa lista de indicadores públicos: el indicador Relative Strength Mansfield with Index. Podrán encontrar ésta herramienta dentro de la carpeta Visual Chart/Spread: Acerca del Relative Strength de Mansfield (RS Mansfield) El indicador Relative Strength Mansfield es uno de los indicadores clásicos de Visual Chart , que permite comparar la fuerza entre dos activos o entre un activo y un índice. A diferencia de otros indicadores de fuerza (como puede ser el RSI), los cuales sólo tienen en cuenta la velocidad y cambio de los precios dentro del mismo producto, éste indicador permite medir el verdadero comportamiento del activo respecto al conjunto del mercado o sector . Para ello, aplica la fórmula de fuerza relativa sobre la relación entre los precios del activo y los valores dados por un índice que represente al mercado o sector. Por defecto, el RS Mansfield se dise
Leer más

Trading Tools: Descarga de históricos para Visual Chart 6

Imagen
Las Trading Tools de Visual Chart son unas potentes herramientas basadas en la tecnología COM ( Component Object Model ) que permiten acceder a la información que se maneja desde el programa a través de cualquier entorno de desarrollo compatible con dicha tecnología. Es decir, que podemos desarrollar un programa cliente que utilice a Visual Chart como servidor de datos, pudiendo trabajar desde el programa cliente con los datos bursátiles que proporciona Visual Chart . El ejemplo más común de programa cliente compatible con esta tecnología es Microsoft Excel . A través de las macros de Microsoft, podemos diseñar sencillas herramientas que nos permitan manipular desde la famosa hoja de cálculo datos como precios en tiempo real, indicadores, información de estrategias, noticias, análisis técnico, información de la cuenta, etc... Un ejemplo de ello lo tenemos en la hoja Excel que publicamos en este artículo. Puede descargar la hoja desde el siguiente enlace: Ejemplo Descarga H
Leer más

KDJ - Indicador Stochastic %J

Imagen
El indicador KDJ es una variación del indicador clásico Estocástico. La diferencia entre un indicador y otro estriba en que el indicador KDJ incluye una línea extra denominada línea %J. Esta línea representa la divergencia entre el valor %D del estocástico frente al valor %K del mismo. Al igual que sucede con las líneas %K y %D, la línea %J oscila en torno a 0 y 100. Pero a diferencia de las dos primeras, el valor de %J puede superar estos niveles, llegando a estar por encima de 100 y por debajo de 0. Pueden descargar este indicador desde el siguiente enlace: Stochastic %J Comportamiento del indicador A la hora de analizar las señales de este indicador, nos fijamos principalmente en la línea J para la toma de decisiones, usando la línea K como secundaria y la línea D como el valor más estable o de confirmación. No obstante, la ruptura de la línea J sobre las otras dos líneas siempre coincide, ya que como hemos dicho, ésta línea representa la divergencia entre K y D. Al tratarse de un
Leer más