Clubeinvest.com

Mercados => Fórum de Bolsa => Tópico começado por: J.Bond em Outubro 25, 2006, 23:33

Título: Criar uma recta de tendencia no Meta ...
Mensagem de: J.Bond em Outubro 25, 2006, 23:33
Há uns dias tinha perguntado aqui no forum se alguém sabia fazer uma formula que criásse uma recta de tendencia.
Como não obtive resposta consegui uma formula que agora partilho com todos. Ela vem no final do post.
Queria perguntar se no Meta é possivel com base nesta formula da recta de tendencia criar um sistema muito simples que é :
-Vender/Comprar quando o preço corta na descendente/ascendente, respectivamente a recta de tendencia criada pelo analista.
Agradeço que os mais entendidos nomeadamente os administradores e o Cem me possam dar uma ajuda. Obrigado.

{ Trendline }

StDay:=Input("start Day",1,31,1);
StMnth:=Input("start Month",1,12,1);
StYear:=Input("start Year",1800,2200,2006);
EnDay:=Input("end Day",1,31,1);
EnMnth:=Input("end Month",1,12,6);
EnYear:=Input("end Year",1800,2200,2006);

start:=Year()>StYear
OR (Year()=StYear AND (Month()>StMnth
OR Month()=StMnth AND DayOfMonth()>=StDay));
end:=Year()<EnYear
OR (Year()=EnYear AND (Month()<EnMnth
OR Month()=EnMnth AND DayOfMonth()<=EnDay));

date1:=start AND Alert(start=0,2);
date2:=end=0 AND Alert(end,2);
date2:=Zig(end AND Cum(1)>1,1,$)=1;

date1:=If(LastValue(Cum(date1))>0,date1,
Cum(1)=1);
date2:=If(LastValue(Cum(date2))>0,date2,
LastValue(Cum(1))=Cum(1));

dateOk:=LastValue(BarsSince(date1))
>LastValue(BarsSince(date2));
day1:=If(dateOk,date1,date2);
day2:=If(dateOk,date2,date1);

dataArray:=L;
price1:=ValueWhen(1,day1,dataArray);
price2:=LastValue(ValueWhen(1,day2,dataArray));

x1:=LastValue(BarsSince(day1));
x2:=LastValue(BarsSince(day2));
trendline:=price1
+BarsSince(day1)*(price2-price1)
/Max(x1-x2,.000001);

trendline:=Ref(Ref(trendline,-x2),x2);

trendline