Página 1 de 1

Indicador Coppock Curve

Publicado: 10 Mar 2009 13:10
por X-Trader
Código para Visual Chart de la Curva de Coppock.

Saludos,
X-Trader

Publicado: 13 Ago 2009 18:44
por Bill-T
me he bajado el indicador, lo guarde en indicators y le doy a modificar indicador pero no me sale para darle a debug y publish.

alguien sabe que pasa o que puedo hacer

adjunto un gráfico del coppock guide en los ultimos 90 años.

23 señales y solo 2 errores...fiabilidad por encima del 90% en barras mensuales en el dow jones.

Publicado: 13 Ago 2009 20:19
por smassax
prueba a borrar la dll del indicador. Si no te deja, hazlo con el visual cerrado

saludos

Publicado: 13 Ago 2009 21:09
por Bill-T
gracias smassax, no se como pero lo pude solucionar hehe.

ahora tengo un problema,los parametros que vienen por defecto no son los que son.

alberto, tu que estás más puesto en esto, y según esto: http://en.wikipedia.org/wiki/Coppock_curve

que parametros he de poner en el indicador para que se parezca a su definición original?

en

AvSimpleDataPeriod
PriceROCAvSimpleDataPeriod
AvExponentialPriceROC.

vamos que que deberia poner en cada uno, que de indicadores no se nada.

s2

Publicado: 30 Sep 2009 11:27
por X-Trader
Hola Vil-trader, lo primero disculpa la tardanza de la respuesta, tu correo se quedó literalmente sepultado por otros muchos correos en mi Bandeja de Entrada. Sobre la versión que programé para Visual Chart, una aclaración: no es la fórmula que aparece en Wikipedia sino la que aparece en la web de Equis International (desarrolladores de Metastock):

http://www.equis.com/customer/resources ... aspx?Id=13

Si analizas la formula que aparece ahi verás que debes poner estos parámetros:

AvSimpleDataPeriod = 22
PriceROCAvSimpleDataPeriod = 250
AvExponentialPriceROC = 150

Saludos,
X-Trader

Re: Indicador Coppock Curve

Publicado: 28 Nov 2009 21:50
por nuse2004
Hola X-TRADER, no logro hacer funcionar el indicador, podrias incorporarlo de nuevo cuando tengas un minutillo.
He leido sobre Coppock y parece que todo el mundo coincide.
Gracias por anticipado
Un saludo y buen dia

Re: Indicador Coppock Curve

Publicado: 29 Nov 2009 17:35
por X-Trader
nuse2004 escribió:Hola X-TRADER, no logro hacer funcionar el indicador, podrias incorporarlo de nuevo cuando tengas un minutillo.
He leido sobre Coppock y parece que todo el mundo coincide.
Gracias por anticipado
Un saludo y buen dia
Qué version usas de Visual Chart? Recuerda que lo programé con la 4.

Saludos,
X-Trader

Re: Indicador Coppock Curve

Publicado: 29 Nov 2009 21:52
por nuse2004
Uso el VC4
He intentado activarlo sin estar en conexion pero nada. Lei algo en un post de un dll pero solo se baja el flw.

Por cierto y al hilo de tu frase, el otro dia oi que la experiencia es un peine que nos dan cuando apenas nos queda pelo
Gracias de nuevo

Re: Indicador Coppock Curve

Publicado: 30 Nov 2009 10:47
por X-Trader
Nuse2004, haz una cosa, crea un nuevo Indicador con Visual Basic, elimina todo el código que te aparece y copia y pega el siguiente código:

Código: Seleccionar todo

'¡¡ Parameters
'Parameters !!
'¡¡ PDV parameters
Dim AvSimpleDataPeriod As Long '30
Dim PriceROCAvSimpleDataPeriod As Long '20
Dim AvExponentialPriceROCAvSimpleDataPeriod As Long '30
Const Data As Long = 0
'PDV parameters !!
'¡¡ PDV declarations
Dim AvSimpleData As Long
Dim PriceROCAvSimpleData As Long
Dim AvExponentialPriceROCAvSimpleData As Long
'PDV declarations !!
Option Explicit
Public APP As OscUserApp
Implements Indicator
Public Sub Indicator_OnInitCalculate()
With APP
'¡¡ PDV initializations
    AvSimpleData = .GetIndicatorIdentifier(AvSimple, Data, AvSimpleDataPeriod, PriceClose)
    PriceROCAvSimpleData = .GetIndicatorIdentifier(PriceROC, AvSimpleData, PriceROCAvSimpleDataPeriod, PriceClose, 0#)
    AvExponentialPriceROCAvSimpleData = .GetIndicatorIdentifier(AvExponential, PriceROCAvSimpleData, AvExponentialPriceROCAvSimpleDataPeriod, PriceClose)
    .StartBar = 0
'PDV initializations !!
End With
End Sub
Public Sub Indicator_OnCalculateBar(ByVal Bar As Long)
With APP
'¡¡ PDV code
    .SetIndicatorValue .GetIndicatorValue(AvExponentialPriceROCAvSimpleData), , 0
'PDV code !!
End With
End Sub
Public Sub Indicator_OnSetParameters(ParamArray ParamList() As Variant)
'¡¡ Parameters initialization
    AvSimpleDataPeriod = ParamList(1)
    PriceROCAvSimpleDataPeriod = ParamList(2)
    AvExponentialPriceROCAvSimpleDataPeriod = ParamList(3)
'Parameters initialization !!
End Sub
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
Private Sub OscUserAppInstance_OnConnection(ByVal Application As OscUserApp, ByVal MTDllInst As Object, Custom() As Variant)
    Set APP = Application
End Sub

Después compilalo (menú Debug->Publish) y ya lo tienes.

Saludos,
X-Trader