Desarrollo de Indicadores en VisualChart
De FinancialPedia
Para empezar a desarrollar un indicador en VisualChart la estructura del programa es la siguiente
Definicion de Variables
Una primera parte en la que definir las variables. Deberemos escribir entre Parametros aquellas variables que son los parametros de entrada. Posteriormente se podrán declarar en Option Explicit todas las variables que se vayan a utilizar dentro del programa. En este ejemplo estamos declarando una variable que sera un Double, y que se llama Mivariable
Temas a ver en esta primera parte.
'¡¡ Parameters 'Parameters !! Option Explicit Dim Mivariable As Double Public APP As OscUserApp Implements Indicator
Calculos al Inicio
Una función para realizar los calculos al inicio
- Fijar el numero de barras que han de pasar para que empiece a calcular valores
- Utilizacion de Indicadores existentes
Public Sub Indicator_OnInitCalculate() With APP End With End Sub
Calculos en cada barra
Una función para realizar los calculos en la barra actual
- Llamadas a procedimientos en VisualChart
- Llamadas a funciones en VisualChart
- Obtener valores de indicadores existentes
Public Sub Indicator_OnCalculateBar(ByVal Bar As Long) With APP End With End Sub
Recuperar los parametros
Una función para fijar los parametros
Public Sub Indicator_OnSetParameters(ParamArray ParamList() As Variant) '¡¡ Parameters initialization 'Parameters initialization !! End Sub
Funciones adicionales
Una funcion en la que se calcula el rango
Public Sub Indicator_OnCalculateRange(ByVal StartBar As Long, ByVal FinalBar As Long)
Dim i As Long
i = APP.StartBar
If StartBar > i Then
i = StartBar
End If
While Not APP.ShouldTerminate And i <= FinalBar
APP.CurrentBar = i
Indicator_OnCalculateBar i
i = i + 1
Wend
End Sub
Una funcion para el tema de conexiones
Private Sub OscUserAppInstance_OnConnection(ByVal Application As OscUserApp, ByVal MTDllInst As Object, Custom() As Variant)
Set APP = Application
End Sub

