Comercio armónico - página 43

 

aquí está la otra

 
Ramin:
¡Hola!

Estimado Kamyar, encantado de conocerte aquí, gracias por tu duro trabajo.

Soy un completo principiante en este campo, y deseo aprender estos útiles patrones, por favor recuerde mis errores y ayúdeme a mejorar, gracias de antemano.

En la siguiente imagen, el doble techo me hizo entrar en una posición de venta, aunque

aunque hubo una ruptura en 1.2128 y todavia no hay señales para pensar que puede ser

El precio de la compra de la bolsa de valores es el mismo que el de la compra de la bolsa de valores.

Me detuve en 1.2140 ( mi entery = 1.2129 . es una gran parada para mí )

hola ramin

me alegro de verte por aquí y agradezco que estés trabajando en los patrones.

Supongo que Faraz ha respondido a tus preguntas (ya sabes dónde).

kamyar

 

Hola Kamyar,

¿Qué razón para vender en la línea verde punteada? No pude ver ninguna razón para vender en este punto, la próxima barra tal vez

Gracias

 
ziko123:
Creo que se ve bien

buen indicador ziko, ¿podrías programar una mariposa alcista y ambas gartley?

 
kamyar:
hola ramin

Me alegro de verte aquí y agradezco que estés trabajando en los patrones.

Supongo que Faraz ha respondido a tus preguntas (ya sabes dónde).

kamyar

kamyar ,

Por desgracia, no he recibido la respuesta.

Pero creo que te refieres a que cuando hay una posibilidad de que "AB=CD" se transforme en un patrón de mariposa, no debemos operar el primero (AB=CD).

¿Estoy en lo cierto?

Gracias por su atención.

---------------------------------------

Nota: ¿Cómo estás Carlos?

 

chicos, sólo una pregunta muy tonta y noob: ¿cuáles son los objetivos después de patrón está en su lugar?

 
Ramin:
kamyar ,

¡lamentablemente no entendí la respuesta!

pero creo que te refieres a que cuando hay una posibilidad de que "AB=CD" se transforme en un patrón de mariposa, no deberíamos operar el primero (AB=CD).

¿Estoy en lo cierto?

Gracias por su atención.

---------------------------------------

Nota: ¿Cómo estás Carlos?

no hay que olvidar que la mayoría de las veces se trata de un patrón de mariposa.

 
ziko123:
La razón por la que necesito unas reglas bien definidas es que empecé a desarrollar un indicador para estos patrones, empecé con la mariposa bajista,

Adjunto el indicador,

u puede probar con los gráficos anteriores publicados por kamyar la semana pasada,

probarlo con EURUSD,4H y EURCAD,4H

ziko,

las reglas y el patrón de código tradestation como definde por Scott Carney

{

Mariposa

basado en el código de Mark Conway

por Mark Kaz, "mido", 8/2003

mod 11/2003 para añadir Fuerza dinámica gracias a progster

sadhu en myacc.net

===============

Modificado por

deMicron 10/10/2004

Opcional 'Borrar generación múltiple de líneas' y añadido línea P1-P2

===============

Patrón de mariposa por Scott Carney, http://www.harmonictrader.com/price_patterns.htm

}

Entradas: Length(100),MinStrength(4),MaxStrength(8),n(.2),m(.1),BullColor(Green),BearColor(Yellow),

grosor(1),

DelMulti(TRUE), { Elimina las líneas múltiples de retrazado}

dispLables(TRUE);

Vars: F3(0.382),F7(0.786),F8(0.886),F12(1.27),F16(1.618) ,F26(2.618),

P1Bar(-1),P2Bar(-1),T1Bar(-1),T2Bar(-1),Fuerza(0 ),

P1(0,0),P2(0,0),T1(0,0),T2(0,0),PTValid(False),HLValid(False),

InZone(Falso),GD(0.0),XA(0.0),AB(0.0),BC(0.0),CD(0.0),AD(0.0),

C1(Falso),C2(Falso),C3(Falso),C4(Falso),C5(Falso),

ABdXA(0,0),BCdAB(0,0),CDdBC(0,0),ADdXA(0,0),

TL1(-1),TL2(-1),TL3(-1),TL4(-1),TL5(-1),TL6(-1),TL7(-1), TL8(-1),

TextID(-1), TextGD(-1);

para Fuerza = FuerzaMáxima hasta FuerzaMínima comenzar

P1Bar = SwingHighBar(1, H, Fuerza, Longitud);

P2Bar = SwingHighBar(2, H, Fuerza, Longitud);

T1Bar = SwingLowBar(1, L, Fuerza, Longitud);

T2Bar = SwingLowBar(2, L, Fuerza, Longitud);

Si P1Bar -1 y P2Bar -1 y T1Bar -1 y T2Bar -1 entonces comienza

{prueba de un patrón alcista}

{El canal X es T2}

T2 = L[T2Bar];

{Pico A es P2}

P2 = H[P2Bar];

{El pico B es T1}

T1 = L[T1Bar];

{El pico C es P1}

P1 = H[P1Bar];

{D es el punto de compra}

GD = L;

{ C < B y B < A y A < X }

PTValid = P1Bar < T1Bar y T1Bar < P2Bar y P2Bar < T2Bar;

{ C X y C > B }

HLValid = P1 T2 y P1 > T1;

{ D X y A >= H }

InZone = GD < T1 y GD = Highest(H, T2Bar);

Si PTValid y HLValid e InZone entonces comienzan

XA = P2 - T2; {A - X}

AB = P2 - T1; {A - B}

BC = P1 - T1; {C - B}

CD = P1 - GD; {C - D}

AD = P2 - GD; {A - D}

ABdXA = AB / XA; {AB debe ser el 78,6% de XA}

C1 = ABdXA > F7 - m*F7 y ABdXA < F7 + n*F7 ;

BCdAB = BC / AB; {BC debe ser 38,2-88,6% de AB}

C2 = BCdAB > F3 - m*F3 y BCdAB < F8 + m*F8;

CDdBC = CD / BC; {CD debe ser 161,8-261,8% de BC}

C3 = CDdBC > F16 - m*F16 y CDdBC < F26 + m*F26;

ADdXA = AD / XA; {AD debe ser el 127% o el 161,8% de XA}

C4 = ADdXA > F12 - n*F12 y ADdXA < F16 + n*F16;

C5 = AB <= CD + m*CD;

si C1 y C2 y C3 y C4 y C5 entonces comienzan

TL1 = TL_New(Fecha[T2Bar], Hora[T2Bar], T2, Fecha[P2Bar], Hora[P2Bar], P2);

if TL1 >= 0 then begin

TL_SetColor(TL1, BullColor);

TL_SetStyle(TL1, Tool_Solid);

TL_SetSize(TL1,espesor);

end ;

TL2 = TL_New(Fecha[P2Bar], Hora[P2Bar], P2, Fecha[T1Bar], Hora[T1Bar], T1);

if TL2 >= 0 then begin

TL_SetColor(TL2, BullColor);

TL_SetStyle(TL2, Tool_Solid);

TL_SetSize(TL2,espesor);

end ;

TL3 = TL_New(Fecha[T1Bar], Hora[T1Bar], T1, Fecha[P1Bar], Hora[P1Bar], P1);

if TL3 >= 0 then begin

TL_SetColor(TL3, BullColor);

TL_SetStyle(TL3, Tool_Solid);

TL_SetSize(TL3,espesor);

end ;

si (DelMULTI) entonces

begin

si (TL4>0) entonces TL_Delete(TL4);

si (TL5>0) entonces TL_Delete(TL5);

si (TL5>0) entonces TL_Delete(TL6);

fin;

TL4 = TL_New(Fecha[P1Bar], Hora[P1Bar], P1, Fecha, Hora, GD);

if TL4 >= 0 then begin

TL_SetColor(TL4, BullColor);

TL_SetStyle(TL4, Tool_Solid);

TL_SetSize(TL4,espesor);

fin;

TL5 = TL_New(Fecha[T1Bar], Hora[T1Bar], T1, Fecha, Hora, GD);

if TL5 >= 0 then begin

TL_SetColor(TL5, BullColor);

TL_SetStyle(TL5, Tool_Dotted);

TL_SetSize(TL5,espesor);

fin;

TL6 = TL_New(Fecha[T2Bar], Hora[T2Bar], T2, Fecha, Hora, GD);

if TL6 >= 0 then begin

TL_SetColor(TL6, BullColor);

TL_SetStyle(TL6, Tool_Dotted);

TL_SetSize(TL6,espesor);

fin;

TL7 = TL_New(Fecha[P2Bar], Hora[P2Bar], P2, Fecha[P1Bar], Hora[P1Bar], P1);

Si TL7 >= 0 Entonces Comienza

TL_SetColor(TL7, BullColor);

TL_SetStyle(TL7, Tool_Dotted);

TL_SetSize(TL7,thickness);

Fin;

TL8 = TL_New(Fecha[T2Bar], Hora[T2Bar], T2, Fecha[T1Bar], Hora[T1Bar], T1);

Si TL8 >= 0 Entonces Comienza

TL_SetColor(TL8, BullColor);

TL_SetStyle(TL8, Tool_Dotted);

TL_SetSize(TL8,thickness);

Fin;

{

si (dispLables) entonces

begin

TextID = Show_text(Fecha[P1Bar], Hora[P1Bar], P1, BullColor,3,1, "P1");

TextID = Show_text(Fecha[P2Bar], Hora[P2Bar], P2, BullColor,3,1, "P2");

TextID = Show_text(Fecha[T2Bar], Hora[T2Bar], T2, BullColor,3,3, "T2");

TextID = Show_text(Fecha[T1Bar], Hora[T1Bar], T1, BullColor,3,3, "T1");

si (TEXTGD > 0) entonces Text_Delete(GD);

TextGD = Show_text(Fecha, Hora, GD, BullColor,3,3, "GD");

fin;

}

fin;

fin;

{prueba de un patrón bajista}

{Pico X es P2}

{El pico A es T2}

{Pico B es P1}

{Pico C es T1}

{GD es el punto corto}

GD = H;

PTValid = T1Bar < P1Bar y P1Bar < T2Bar y T2Bar < P2Bar;

HLValid = T1 > T2 y P1 < P2 y T1 < P1;

InZone = GD > P1 y GD > P2 y T2 <= Lowest(L, P2Bar);

si PTValid y HLValid e InZone entonces comienzan

XA = P2 - T2;

AB = P1 - T2

BC = P1 - T1

CD = GD - T1

AD = GD - T2;

ABdXA = AB / XA; {AB debe ser el 78,6% de XA}

C1 = ABdXA > F7 - m*F7 y ABdXA < F7 + n*F7;

BCdAB = BC / AB; {BC debe ser 38,2-88,6% de AB}

C2 = BCdAB > F3 - m*F3 y BCdAB < F8 + m*F8;

CDdBC = CD / BC; {CD debe ser 161,8-261,8% de BC}

C3 = CDdBC > F16 - m*F16 y CDdBC < F26 + m*F26;

ADdXA = AD / XA; {AD debe ser el 127% o el 161,8% de XA}

C4 = ADdXA > F12 - n*F12 y ADdXA < F16 + n*F16;

C5 = AB <= CD + m*CD;

si C1 y C2 y C3 y C4 y C5 entonces comienzan

TL1 = TL_New(Fecha[P2Bar], Hora[P2Bar], P2, Fecha[T2Bar], Hora[T2Bar], T2);

if TL1 >= 0 then begin

TL_SetColor(TL1, BearColor);

TL_SetStyle(TL1, Tool_Solid);

TL_SetSize(TL1,thickness);

end ;

TL2 = TL_New(Fecha[T2Bar], Hora[T2Bar], T2, Fecha[P1Bar], Hora[P1Bar], P1);

if TL2 >= 0 then begin

TL_SetColor(TL2, BearColor);

TL_SetStyle(TL2, Tool_Solid);

TL_SetSize(TL2,espesor);

end ;

TL3 = TL_New(Fecha[P1Bar], Hora[P1Bar], P1, Fecha[T1Bar], Hora[T1Bar], T1);

if TL3 >= 0 then begin

TL_SetColor(TL3, BearColor);

TL_SetStyle(TL3, Tool_Solid);

TL_SetSize(TL3,espesor);

end ;

si (DelMULTI) entonces

begin

si (TL4>0) entonces TL_Delete(TL4);

si (TL5>0) entonces TL_Delete(TL5);

si (TL5>0) entonces TL_Delete(TL6);

fin;

TL4 = TL_New(Fecha[T1Bar], Hora[T1Bar], T1, Fecha, Hora, GD);

if TL4 >= 0 then begin

TL_SetColor(TL4, BearColor);

TL_SetStyle(TL4, Tool_Solid);

TL_SetSize(TL4,espesor);

end ;

TL5 = TL_New(Fecha[P1Bar], Hora[P1Bar], P1, Fecha, Hora, GD);

if TL5 >= 0 then begin

TL_SetColor(TL5, BearColor);

TL_SetStyle(TL5, Tool_Dotted);

TL_SetSize(TL5, grosor);

fin;

TL6 = TL_New(Fecha[P2Bar], Hora[P2Bar], P2, Fecha, Hora, GD);

if TL6 >= 0 Then begin

TL_SetColor(TL6, BearColor);

TL_SetStyle(TL6, Tool_Dotted);

TL_SetSize(TL6, grosor);

fin;

TL7 = TL_New(Fecha[P2Bar], Hora[P2Bar], P2, Fecha[P1Bar], Hora[P1Bar], P1);

Si TL7 >= 0 Entonces Comienza

TL_SetColor(TL7, BearColor);

TL_SetStyle(TL7, Tool_Dotted);

TL_SetSize(TL7, grosor);

Fin;

TL8 = TL_New(Fecha[T2Bar], Hora[T2Bar], T2, Fecha[T1Bar], Hora[T1Bar], T1);

Si TL8 >= 0 Entonces Comienza

TL_SetColor(TL8, BearColor);

TL_SetStyle(TL8, Tool_Dotted);

TL_SetSize(TL8,thickness);

Fin;

{

si (dispLables) entonces

begin

TextID = Show_text(Fecha[P1Bar], Hora[P1Bar], P1, BearColor,3,1, "P1");

TextID = Show_text(Fecha[P2Bar], Hora[P2Bar], P2, BearColor,3,1, "P2");

TextID = Show_text(Fecha[T2Bar], Hora[T2Bar], T2, BearColor,3,3, "T2");

TextID = Show_text(Date[T1Bar], Time[T1Bar], T1, BearColor,3,3, "T1");

si (TEXTGD > 0) entonces Text_Delete(GD);

TextGD = Show_text(Fecha, Hora, GD, BearColor,3,3, "GD");

fin;

}

fin;

end;

end;

 

ziko, y ahora el código para el Gartley, también de tradestation

{ basado en el código de Mark Conway

por Mark Kazmierczak, "mido", 8/2003

mod 11/2003 para añadir Fuerza dinámica gracias a progster

sadhu en myacc.net

Patrón Gartley por Scott Carney

}

Entradas: Length(100),MinStrength(4),MaxStrength(8),n(.2),m(.1),BullColor(Blue),BearColor(Red),

espesor(2);

Vars: F6(0.618),F7(0.786),F12(1.27),F16(1.618),

P1Bar(-1),P2Bar(-1),T1Bar(-1),T2Bar(-1),Fuerza(0),

P1(0,0),P2(0,0),T1(0,0),T2(0,0),PTValid(False),HLValid(False),

InZone(Falso),GD(0.0),XA(0.0),AB(0.0),BC(0.0),CD(0.0),AD(0.0),

C1(Falso),C2(Falso),C3(Falso),C4(Falso),C5(Falso),

ABdXA(0,0),BCdAB(0,0),CDdBC(0,0),ADdXA(0,0),

TL1(-1),TL2(-1),TL3(-1),TL4(-1),TL5(-1),TL6(-1);

para Fuerza = FuerzaMáxima hasta FuerzaMínima comenzar

P1Bar = SwingHighBar(1, H, Fuerza, Longitud);

P2Bar = SwingHighBar(2, H, Fuerza, Longitud);

T1Bar = SwingLowBar(1, L, Fuerza, Longitud);

T2Bar = SwingLowBar(2, L, Fuerza, Longitud);

Si P1Bar -1 y P2Bar -1 y T1Bar -1 y T2Bar -1 {y DBar -1} entonces comienza

{prueba de un patrón alcista}

{El canal X es T2}

T2 = L[T2Bar];

{Pico A es P2}

P2 = H[P2Bar];

{El pico B es T1}

T1 = L[T1Bar];

{El pico C es P1}

P1 = H[P1Bar];

{DBar = PivotLowVSBar(1,L,Strength,2,P1Bar);}

{D es el punto de compra}

GD = L;

{ C < B y B < A y A < X }

PTValid = P1Bar < T1Bar y T1Bar < P2Bar y P2Bar < T2Bar;

{ C X y C > B }

HLValid = P1 T2 y P1 > T1;

{ D X y A >= H }

InZone = GD T2 y P2 >= Highest(H, T2Bar) y T2 <= Lowest(L,T2Bar);

Si PTValid y HLValid e InZone entonces comienzan

XA = P2 - T2; {A - X}

AB = P2 - T1; {A - B}

BC = P1 - T1; {C - B}

CD = P1 - GD; {C - D}

AD = P2 - GD; {A - D}

ABdXA = AB / XA; {AB debe ser el 61,8% de XA}

C1 = ABdXA > F6 - n*F6 y ABdXA < F6 + n*F6 ;

BCdAB = BC / AB; {BC debe ser el 61,8-78,6% de AB}

C2 = BCdAB > F6 - n*F6 y BCdAB < F7 + n*F7;

CDdBC = CD / BC; {CD debe ser el 127% o el 161,8% de BC}

C3 = CDdBC > F12 - m*F12 y CDdBC < F16 + m*F16;

ADdXA = AD / XA; {AD debe ser el 78,6% de XA}

C4 = ADdXA > F7 - n*F7 y ADdXA < F7 + n*F7;

C5 = AB >= CD - m*CD y AB <= CD + m*CD;

Si C1 y C2 y C3 y C4 y C5 entonces comienzan

TL1 = TL_New(Fecha[T2Bar], Hora[T2Bar], T2, Fecha[P2Bar], Hora[P2Bar], P2);

Si TL1 >= 0 Entonces comienza

TL_SetColor(TL1, BullColor);

TL_SetStyle(TL1, Tool_Solid);

TL_SetSize(TL1,thickness);

Fin;

TL2 = TL_New(Fecha[P2Bar], Hora[P2Bar], P2, Fecha[T1Bar], Hora[T1Bar], T1);

Si TL2 >= 0 Entonces comienza

TL_SetColor(TL2, BullColor);

TL_SetStyle(TL2, Tool_Solid);

TL_SetSize(TL2,thickness);

Fin;

TL3 = TL_New(Fecha[T1Bar], Hora[T1Bar], T1, Fecha[P1Bar], Hora[P1Bar], P1);

Si TL3 >= 0 Entonces comienza

TL_SetColor(TL3, BullColor);

TL_SetStyle(TL3, Tool_Solid);

TL_SetSize(TL3,thickness);

Fin;

TL4 = TL_New(Fecha[P1Bar], Hora[P1Bar], P1, Fecha, Hora, GD);

Si TL4 >= 0 Then Begin

TL_SetColor(TL4, BullColor);

TL_SetStyle(TL4, Tool_Solid);

TL_SetSize(TL4,espesor);

Fin;

TL5 = TL_New(Fecha[T1Bar], Hora[T1Bar], T1, Fecha, Hora, GD);

If TL5 >= 0 Then Begin

TL_SetColor(TL5, BullColor);

TL_SetStyle(TL5, Tool_Dotted);

Fin;

TL6 = TL_New(Fecha[T2Bar], Hora[T2Bar], T2, Fecha, Hora, GD);

If TL6 >= 0 Then Begin

TL_SetColor(TL6, BullColor);

TL_SetStyle(TL6, Tool_Dotted);

Fin;

Alert( "Gartley alcista" );

End;

Fin;

{prueba de un patrón bajista}

{El pico X es P2}

{El pico A es T2}

{Pico B es P1}

{El pico C es T1}

{GD es el punto corto}

GD = H;

PTValid = T1Bar < P1Bar y P1Bar < T2Bar y T2Bar < P2Bar;

HLValid = T1 > T2 y P1 < P2 y T1 < P1;

InZone = GD > P1 y GD < P2 y T2 = Highest(H,P2Bar);

Si PTValid y HLValid e InZone entonces comienzan

XA = P2 - T2;

AB = P1 - T2

BC = P1 - T1

CD = GD - T1

AD = GD - T2;

ABdXA = AB / XA; {AB debe ser el 61,8% de XA}

C1 = ABdXA > F6 - n*F6 y ABdXA < F6 + n*F6;

BCdAB = BC / AB; {BC debe ser el 61,8-78,6% de AB}

C2 = BCdAB > F6 - n*F6 y BCdAB < F7 + n*F7;

CDdBC = CD / BC; {CD debe ser el 127% o el 161,8% de BC}

C3 = CDdBC > F12 - m*F12 y CDdBC < F16 + m*F16;

ADdXA = AD / XA; {AD debe ser el 78,6% de XA}

C4 = ADdXA > F7 - n*F7 y ADdXA < F7 + n*F7;

C5 = AB >= CD - m*CD y AB <= CD + m*CD;

Si C1 y C2 y C3 y C4 y C5 entonces comienzan

TL1 = TL_New(Fecha[P2Bar], Hora[P2Bar], P2, Fecha[T2Bar], Hora[T2Bar], T2);

Si TL1 >= 0 Entonces Comienza

TL_SetColor(TL1, BearColor);

TL_SetStyle(TL1, Tool_Solid);

TL_SetSize(TL1,thickness);

Fin;

TL2 = TL_New(Fecha[T2Bar], Hora[T2Bar], T2, Fecha[P1Bar], Hora[P1Bar], P1);

Si TL2 >= 0 Entonces Comienza

TL_SetColor(TL2, BearColor);

TL_SetStyle(TL2, Tool_Solid);

TL_SetSize(TL2,thickness);

Fin;

TL3 = TL_New(Fecha[P1Bar], Hora[P1Bar], P1, Fecha[T1Bar], Hora[T1Bar], T1);

Si TL3 >= 0 Entonces Comienza

TL_SetColor(TL3, BearColor);

TL_SetStyle(TL3, Tool_Solid);

TL_SetSize(TL3,thickness);

Fin;

TL4 = TL_New(Fecha[T1Bar], Hora[T1Bar], T1, Fecha, Hora, GD);

If TL4 >= 0 Then Begin

TL_SetColor(TL4, BearColor);

TL_SetStyle(TL4, Tool_Solid);

TL_SetSize(TL4,espesor);

Fin;

TL5 = TL_New(Fecha[P1Bar], Hora[P1Bar], P1, Fecha, Hora, GD);

Si TL5 >= 0 Then Begin

TL_SetColor(TL5, BearColor);

TL_SetStyle(TL5, Tool_Dotted);

Fin;

TL6 = TL_New(Fecha[P2Bar], Hora[P2Bar], P2, Fecha, Hora, GD);

Si TL6 >= 0 Then Begin

TL_SetColor(TL6, BearColor);

TL_SetStyle(TL6, Tool_Dotted);

Fin;

Alert( "Gartley bajista" );

End;

Fin;

Fin;

Fin;

 
camisa:
chicos, sólo una pregunta muy tonto y noob: ¿cuáles son los objetivos después de que el patrón está en su lugar?

Soy un principiante, pero creo que el 62% CD es el primer objetivo y el 62% AD es el segundo.