CALDEIRÃO DE BOLSA

Quico Escreveu:PLPINTO:

"eventCount" não me parece que seja uma função do Metastock.

Isso é o que o VTtrader usa para identificar as ordens enviadas automaticamente para a corretora e não deixar enviar ordens repetidas. No metastock terá outro nome qualquer mas o principio será o mesmo.
No entanto, como provavelmente os utilizadores do Metastock não vão utilizar o mesmo em automatico, não tem importancia... destina-se essencialmente aos que têm VTTrader.
Na sua formula apenas terá que mudar as duas linhas (Long e Short).


Dwer,
Eu postei a imagem porque é mais facil de identificar nas linhas os comandos que se têm que criar para as setas e etc devido às cores e porque era só mais aquelas linhas do fundo, o resto já está lá atraz. Mas aqui vai a formula:


Longx:= haL=haO and ref(haL,-1)=ref(haO,-1);
Shortx:= haH=haO and ref(haH,-1)=ref(haO,-1);

CloseLongx:= haC<haO and ref(haC,-1)<ref(haO,-1);
CloseShortx:= haC>haO and ref(haC,-1)>ref(haO,-1);


Long:= cross(barssince(CloseLongx),barssince(Longx));

Short:= cross(barssince(CloseShortx),barssince(Shortx));


CloseLong:= cross(barssince(Long),barssince(CloseLongx));

CloseShort:= cross(barssince(Short),barssince(CloseShortx));


{ .... PLPINTO - EURO & DÓLAR .... }

OpenBuy:= Long and (eventCount('OpenBuy')= eventCount('CloseBuy'));

CloseBuy:= Closelong and (eventCount('OpenBuy')>eventCount('CloseBuy'));


OpenSell:= Short and (eventCount('OpenSell')= eventCount('CloseSell'));

CloseSell:= Closeshort and (eventCount('OpenSell')>eventCount('CloseSell'));



Eu não uso o teclado... botão direito do rato

PLPINTO:

"eventCount" não me parece que seja uma função do Metastock.

Um abraço.

PL,
Não dá para fazer o cut&paste para texto no post?
CTRL C no software onde escreves a fórmula, CTRL V no post.
Ficava mais simples para importar.

Já agora aproveito para postar aqui o sistema completo já com as formulas de negociação automaticas.

È aquilo que fica abaixo do meu nome.

PS: Quico, muda as duas linhas do Long e Short por as desta imagem para entrar na mesma direcção.

exacto, a primeira formula que eu postei tinha esse defeito, mas na segunda já tinha eliminado isso pois muitas vezes abre-se varias numa mesma tendencia.

Basicamente já puz o sistema a funcionar com outras cores. Mas parece-me haver aqui uma coisa que pode ser facilmente "melhorável". Aqui no gráfico semanal da Sonae, pode-se ver pelas cores que o sistema até teria potencial para mais, mas quando se observa os simbolos de entrada e saída, os resultados são decepcionantes.
O que parece acontecer é que existir um defeito que faz com que se tenha que estar longo e curto alternadamente, i.e, logo que se fecha uma posição longa, não se pode voltar a abrir novamente; tem que se esperar por uma posição curta.

Vou tentar corrigir isto, e logo que tenha ponho aqui.

Highlights:

UP {Côr Azul}
haC:=(OPEN+HIGH+LOW+CLOSE)/4;
haO:=(PREV+Ref(C,-1))/2;
haH:=Max(HIGH,Max(haO,haC));
haL:=Min(LOW,Min(haO,haC));
haO < haC;

DOWN {Côr Vermelha}
haC:=(OPEN+HIGH+LOW+CLOSE)/4;
haO:=(PREV+Ref(C,-1))/2;
haH:=Max(HIGH,Max(haO,haC));
haL:=Min(LOW,Min(haO,haC));
haO > haC;

Symbols

Long {Seta para cima amarela)
haC:=(OPEN+HIGH+LOW+CLOSE)/4;
haO:=(PREV+Ref(C,-1))/2;
haH:=Max(HIGH,Max(haO,haC));
haL:=Min(LOW,Min(haO,haC));
longx:=hal=hao AND Ref(hal,-1)=Ref(hao,-1);
shortx:=hah=hao AND Ref(hah,-1)=Ref(hao,-1);
long:=Cross(BarsSince(shortx),BarsSince(longx));
long

Short {Seta para baixo branca}
haC:=(OPEN+HIGH+LOW+CLOSE)/4;
haO:=(PREV+Ref(C,-1))/2;
haH:=Max(HIGH,Max(haO,haC));
haL:=Min(LOW,Min(haO,haC));
longx:=hal=hao AND Ref(hal,-1)=Ref(hao,-1);
shortx:=hah=hao AND Ref(hah,-1)=Ref(hao,-1);
short:=Cross(BarsSince(longx),BarsSince(shortx));
short

CloseLong {tabuleta icon_smile.gif amarela}
haC:=(OPEN+HIGH+LOW+CLOSE)/4;
haO:=(PREV+Ref(C,-1))/2;
haH:=Max(HIGH,Max(haO,haC));
haL:=Min(LOW,Min(haO,haC));
longx:=hal=hao AND Ref(hal,-1)=Ref(hao,-1);
shortx:=hah=hao AND Ref(hah,-1)=Ref(hao,-1);
long:=Cross(BarsSince(shortx),BarsSince(longx));
short:=Cross(BarsSince(longx),BarsSince(shortx));
CloseLongx:=haC<haO AND Ref(haC,-1)<Ref(haO,-1) AND BarsSince(shortx)>BarsSince(longx);
closelong:=Cross(BarsSince(long),BarsSince(closelongx));
closelong

CloseShort {tabuleta branca}
haC:=(OPEN+HIGH+LOW+CLOSE)/4;
haO:=(PREV+Ref(C,-1))/2;
haH:=Max(HIGH,Max(haO,haC));
haL:=Min(LOW,Min(haO,haC));
longx:=hal=hao AND Ref(hal,-1)=Ref(hao,-1);
shortx:=hah=hao AND Ref(hah,-1)=Ref(hao,-1);
long:=Cross(BarsSince(shortx),BarsSince(longx));
short:=Cross(BarsSince(longx),BarsSince(shortx));
CloseLongx:=haC<haO AND Ref(haC,-1)<Ref(haO,-1) AND BarsSince(shortx)>BarsSince(longx);
CloseShortx:=haC>haO AND Ref(haC,-1)>Ref(haO,-1) AND BarsSince(shortx)<BarsSince(longx);
closelong:=Cross(BarsSince(long),BarsSince(closelongx));
closeshort:=Cross(BarsSince(short),BarsSince(closeshortx));
closeshort

Dwer explica-me por favor: Criei as Highligts sem escrever UP {Côr Azul}e DOWN {Côr Vermelha}correcto? De seguida tentei criar os Symbols e aqui é que começa os problemas. Explico: vou aos simbols e pede-me o name e condition. Escrevo o nome Henkin-Ashi e em condition ponho a formula. Em graphic escolha a seta. Depois disto tudo aparece-me This is not a recognized name, constant or operator. Mudei o name para Long e é a mesma coisa. Podes-me indicar onde estou a falhar?

O próximo passo é testar o sistema no system tester.
Já cá venho dizer qq coisa.

Highlights:

UP {Côr Azul}
haC:=(OPEN+HIGH+LOW+CLOSE)/4;
haO:=(PREV+Ref(C,-1))/2;
haH:=Max(HIGH,Max(haO,haC));
haL:=Min(LOW,Min(haO,haC));
haO < haC;

DOWN {Côr Vermelha}
haC:=(OPEN+HIGH+LOW+CLOSE)/4;
haO:=(PREV+Ref(C,-1))/2;
haH:=Max(HIGH,Max(haO,haC));
haL:=Min(LOW,Min(haO,haC));
haO > haC;

Symbols

Long {Seta para cima amarela)
haC:=(OPEN+HIGH+LOW+CLOSE)/4;
haO:=(PREV+Ref(C,-1))/2;
haH:=Max(HIGH,Max(haO,haC));
haL:=Min(LOW,Min(haO,haC));
longx:=hal=hao AND Ref(hal,-1)=Ref(hao,-1);
long:=Cross(BarsSince(shortx),BarsSince(longx));
long

Short {Seta para baixo branca}
haC:=(OPEN+HIGH+LOW+CLOSE)/4;
haO:=(PREV+Ref(C,-1))/2;
haH:=Max(HIGH,Max(haO,haC));
haL:=Min(LOW,Min(haO,haC));
longx:=hal=hao AND Ref(hal,-1)=Ref(hao,-1);
shortx:=hah=hao AND Ref(hah,-1)=Ref(hao,-1);
short:=Cross(BarsSince(longx),BarsSince(shortx));
short

CloseLong {tabuleta amarela}
haC:=(OPEN+HIGH+LOW+CLOSE)/4;
haO:=(PREV+Ref(C,-1))/2;
haH:=Max(HIGH,Max(haO,haC));
haL:=Min(LOW,Min(haO,haC));
longx:=hal=hao AND Ref(hal,-1)=Ref(hao,-1);
shortx:=hah=hao AND Ref(hah,-1)=Ref(hao,-1);
long:=Cross(BarsSince(shortx),BarsSince(longx));
short:=Cross(BarsSince(longx),BarsSince(shortx));
CloseLongx:=haC<haO AND Ref(haC,-1)<Ref(haO,-1) AND BarsSince(shortx)>BarsSince(longx);
closelong:=Cross(BarsSince(long),BarsSince(closelongx));
closelong

CloseShort {tabuleta branca}
haC:=(OPEN+HIGH+LOW+CLOSE)/4;
haO:=(PREV+Ref(C,-1))/2;
haH:=Max(HIGH,Max(haO,haC));
haL:=Min(LOW,Min(haO,haC));
longx:=hal=hao AND Ref(hal,-1)=Ref(hao,-1);
shortx:=hah=hao AND Ref(hah,-1)=Ref(hao,-1);
long:=Cross(BarsSince(shortx),BarsSince(longx));
short:=Cross(BarsSince(longx),BarsSince(shortx));
CloseLongx:=haC<haO AND Ref(haC,-1)<Ref(haO,-1) AND BarsSince(shortx)>BarsSince(longx);
CloseShortx:=haC>haO AND Ref(haC,-1)>Ref(haO,-1) AND BarsSince(shortx)<BarsSince(longx);
closelong:=Cross(BarsSince(long),BarsSince(closelongx));
closeshort:=Cross(BarsSince(short),BarsSince(closeshortx));
closeshort[/b]

Vamos lá ver...
Seguem setas e tabuletas para o SPY diário.
A fórmula é baseada na definição que está em
http://www.investopedia.com/articles/technical/04/092204.asp
e as setas e tabuletas no sistema do PLPinto.
O código vem a seguir.

PS: todos fossem como o PLPinto, que sem mas nem quês publica o código, sem problemas. E é rápido e prático a codificar.

Vão ter que pedir por e-mail

O Caldeirão não aceita as extenções .vttrs nem .rar

As velas de Heikin-Ashi já consegui no meta seguindo as instruções do Dwer, mas as setas e as tabuletas é que não, apesar de no Expert/Simbolos ter tentado.
No entanto a formula do PLPinto quando faço o copy/pass (desculpem lá o inglês)para cima do destekop (mais uma vez o meu inglês)fica muito parecido com o Sistema do Cem (Radar?)aqui reproduzido à uns anos. O Nuno Faustino deve-se lembrar, pois "desenrascou" na altura o pessoal leigo como eu. É mesmo assim?

PLPINTO Escreveu:Não setas e tabuletas Exit?

Eu não posso textar no Meta porque não tenho instalado... mas quem quizer pode instalar um demo do VTtrader que eu dou-lhe o sistema pronto a meter... è só impostar e já está.

Se me puderes arranjar isso entao, agradecia.

PLPINTO Escreveu:Não setas e tabuletas Exit?

Eu não posso textar no Meta porque não tenho instalado... mas quem quizer pode instalar um demo do VTtrader que eu dou-lhe o sistema pronto a meter... è só impostar e já está.

Já vai, já vai... as tabuletas e a setas.

Não setas e tabuletas Exit?

Eu não posso textar no Meta porque não tenho instalado... mas quem quizer pode instalar um demo do VTtrader que eu dou-lhe o sistema pronto a meter... è só impostar e já está.

Ficam sempre com a mesma côr.

Rmachado, tenho a impressao que tera sido o numero de janeiro de 2004...

Um abraco
Nuno

P.S. dwer e PLPinto... este indicador olha para tras e altera as cores das velas ou uma vela tem sempre a mesma cor?

Um expert para o heikin-ashi: abrir um novo expert;
na tab highlights criar um novo highlight
{Up trend – colour BLUE}
haC:= (O+H+L+C)/4;
haO:= (PREV+Ref(haC,-1))/2;
haO < haC;
e criar outro:
{Down Trend – colour RED}
haC:= (O+H+L+C)/4;
haO:= (PREV+Ref(haC,-1))/2;
haO > haC;

Não queres explicar isso como se eu fosse mesmo mt burro? Fiz copiar/colar, criei os outputs, mas até agora n me apareceu nada nos gráficos.

Caro PLPinto

Não tenho agora de cabeça mas a S&C algures no tempo publicou um artigo sobre o dito mêtodo, com fórmulas e tudo.

Vou tentar encontrar a dita revista e seu número.

Gordon Gekko Escreveu:Ok, mas então quem me pode explicar o conteudo dos gaficos em causa, a sua interpretação?!
Como os utilizamos?

Abraço

GG

http://www.investopedia.com/articles/te ... 092204.asp

um abraço

Ok, mas então quem me pode explicar o conteudo dos gaficos em causa, a sua interpretação?!
Como os utilizamos?

Abraço

GG

Estive a tentar, mas não está bem. Mas não sou exemplo. Vou aguardar que o Dwer instala e nos faça chegar a sua opinião e ajuda.

Ainda não, mas depois ponho aqui.