Outros sites Medialivre
Caldeirão da Bolsa

SAP

Espaço dedicado a todo o tipo de troca de impressões sobre os mercados financeiros e ao que possa condicionar o desempenho dos mesmos.

por Bender » 2/3/2004 18:38

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
Avatar do Utilizador
 
Mensagens: 378
Registado: 12/2/2004 18:57

por Pata-Hari » 2/3/2004 18:27

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: .
Avatar do Utilizador
Administrador Fórum
 
Mensagens: 20972
Registado: 25/10/2002 17:02
Localização: Lisboa

por Bender » 2/3/2004 18:24

certo!!
Avatar do Utilizador
 
Mensagens: 378
Registado: 12/2/2004 18:57

por Pata-Hari » 2/3/2004 18:18

hm, dá erro, aposto que está em formato de meta 8.0, certo?
Avatar do Utilizador
Administrador Fórum
 
Mensagens: 20972
Registado: 25/10/2002 17:02
Localização: Lisboa

por Bender » 2/3/2004 18:06

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:
Anexos
Bender.zip
(8 KiB) Transferido 129 Vezes
Avatar do Utilizador
 
Mensagens: 378
Registado: 12/2/2004 18:57

por Pata-Hari » 2/3/2004 16:22

engraçado... e aposto que os testes dão resultados engraçados... queres partilhar :mrgreen: ?
Avatar do Utilizador
Administrador Fórum
 
Mensagens: 20972
Registado: 25/10/2002 17:02
Localização: Lisboa

por Bender » 2/3/2004 16:18

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,
Avatar do Utilizador
 
Mensagens: 378
Registado: 12/2/2004 18:57

por Pata-Hari » 1/3/2004 21:22

como fizeste as setinhas :mrgreen: ?
Avatar do Utilizador
Administrador Fórum
 
Mensagens: 20972
Registado: 25/10/2002 17:02
Localização: Lisboa

SAP

por Bender » 1/3/2004 21:07

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,
Anexos
sapX.png
sapX.png (30.29 KiB) Visualizado 676 vezes
Avatar do Utilizador
 
Mensagens: 378
Registado: 12/2/2004 18:57


Quem está ligado:
Utilizadores a ver este Fórum: Andre_MF, dragom, Google [Bot], m-m, navaldoc, OCTAMA, Shimazaki_2 e 736 visitantes