SAP
9 mensagens
|Página 1 de 1
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
-----------
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
e porque não...pode ser que surjam ideias para o melhorar....
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!!!



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!!!


- Anexos
-
Bender.zip
- (8 KiB) Transferido 129 Vezes
Oi Pata,
não te escapa mesmo nada, hein ??
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....
Abraço,
não te escapa mesmo nada, hein ??

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....

Abraço,
9 mensagens
|Página 1 de 1
Quem está ligado:
Utilizadores a ver este Fórum: acintra, m-m, macau5m, navaldoc, OCTAMA, Shimazaki_2, silva_39, trend=friend e 203 visitantes