Página 1 de 1

MensagemEnviado: 2/3/2004 18:38
por Bender
Setas :
-----------

Ct:=(Pwr((Abs((C-Ref(C,-4))/Sum(Abs(ROC(C,1,$)),4)))*((2/3)-(2/31))+(2/31),2));

AMA:=If(Cum(1)=5,Ref(C,-1)+(Pwr((Abs((C-Ref(C,-4))/Sum(Abs(ROC(C,1,$)),4)))*((2/3)-(2/31))+(2/31),2))*(C-Ref(C,-1)),PREV+(Pwr((Abs((C-Ref(C,-4))/Sum(Abs(ROC(C,1,$)),4)))*((2/3)-(2/31))+(2/31),2))*(C-PREV));

a:=AMA>Ref(AMA,-1);
b:=AMA<Ref(AMA,-1);

state:=If(BarsSince(a)<BarsSince(b),1,0);

ShowAv := state>Ref(state,-1);

{MACD Histogram}

Hist := MACD() - Mov(MACD(), 9, E);

ShowHist := Hist < 0 AND Hist > Ref(Hist, -1) AND Ref(Hist, -1) < Ref(Hist, -2);

{RSI Buy}
ShowRSI := Cross(Stoch(5,3),20) AND
C>Mov(C,200,E);

{RSI Bullish Divergence}
ShowRSIDiv := Peak(1,C,3)<Peak(2,C,3) AND ValueWhen(1,Peak(1,C,3),Stoch(21,3))>
ValueWhen(2,Peak(1,C,3),Stoch(21,3)) AND
Cross(Stoch(21,3),20) AND
C>Mov(C,200,E);

Cnt := If(ShowAv, 1, 0);
Cnt := Cnt + If(ShowHist, 1,0);
Cnt := Cnt + If(ShowRSI, 1,0);
Cnt := Cnt + If(ShowRSIDiv, 1,0);

Cnt >= 2

Velas Verdes:
---------------------------

Ct:=(Pwr((Abs((C-Ref(C,-4))/Sum(Abs(ROC(C,1,$)),4)))*((2/3)-(2/31))+(2/31),2));

AMA:=If(Cum(1)=5,Ref(C,-1)+(Pwr((Abs((C-Ref(C,-4))/Sum(Abs(ROC(C,1,$)),4)))*((2/3)-(2/31))+(2/31),2))*(C-Ref(C,-1)),PREV+(Pwr((Abs((C-Ref(C,-4))/Sum(Abs(ROC(C,1,$)),4)))*((2/3)-(2/31))+(2/31),2))*(C-PREV));

a:=AMA>Ref(AMA,-1);
b:=AMA<Ref(AMA,-1);

state:=If(BarsSince(a)<BarsSince(b),1,0);

state=1

Velas vermelhas:
-----------------------

Ct:=(Pwr((Abs((C-Ref(C,-4))/Sum(Abs(ROC(C,1,$)),4)))*((2/3)-(2/31))+(2/31),2));

AMA:=If(Cum(1)=5,Ref(C,-1)+(Pwr((Abs((C-Ref(C,-4))/Sum(Abs(ROC(C,1,$)),4)))*((2/3)-(2/31))+(2/31),2))*(C-Ref(C,-1)),PREV+(Pwr((Abs((C-Ref(C,-4))/Sum(Abs(ROC(C,1,$)),4)))*((2/3)-(2/31))+(2/31),2))*(C-PREV));

a:=AMA>Ref(AMA,-1);
b:=AMA<Ref(AMA,-1);

state:=If(BarsSince(a)<BarsSince(b),1,0);

state=0

MensagemEnviado: 2/3/2004 18:27
por Pata-Hari
lol, consegues por favor deixar o código para eu poder brincar...? é que nunca me adaptei ao system tester do meta 8.0 e aliás, por essa razão, não o uso :oops: .

MensagemEnviado: 2/3/2004 18:24
por Bender
certo!!

MensagemEnviado: 2/3/2004 18:18
por Pata-Hari
hm, dá erro, aposto que está em formato de meta 8.0, certo?

MensagemEnviado: 2/3/2004 18:06
por Bender
e porque não...pode ser que surjam ideias para o melhorar.... 8-) 8-)

Para importar selecciona, Expert Advisor\Organizer...

PS: Está uma confusão, por ainda estar em construção...Ahh!! e se for a árvore das patacas, avisa!!! :mrgreen: :mrgreen:

MensagemEnviado: 2/3/2004 16:22
por Pata-Hari
engraçado... e aposto que os testes dão resultados engraçados... queres partilhar :mrgreen: ?

MensagemEnviado: 2/3/2004 16:18
por Bender
Oi Pata,

não te escapa mesmo nada, hein ?? :mrgreen:

As setinhas são a minha 1ª tentativa de fazer um expert... :?

Para quem explora pela primeira vez os expert (conceito brilhante, muito bem implementado) que veêm com o MS, a primeira ideia que me assaltou foi a de unificar diversos experts num único só. No caso usei os mais comuns : MACD, Stoch e RSI.

Como são vários experts a darem sinais, o resultado é um excesso de sinais, "over signalling"...
pelo que adicionei um filtro para eleminar o "ruído" de fundo, e visualizar apenas os sinais mais fortes

Tão simples como isto.... :wink:

Abraço,

MensagemEnviado: 1/3/2004 21:22
por Pata-Hari
como fizeste as setinhas :mrgreen: ?

SAP

MensagemEnviado: 1/3/2004 21:07
por Bender
Oi,

Parece uma boa aposta neste momento. O DAX também parece querer ajudar. E Existem mais no mesmo saco (siemens, Adidas, etc,)

PS: Envelope SAP = 10%

Abraço,