Metastock fibb. retracements

baron67

Junior member
Messages
16
Likes
1
Hi, does anyone know how to permanently save custom fibb. retracements on metastock 8 pro?
 
Try this

baron67 said:
Hi, does anyone know how to permanently save custom fibb. retracements on metastock 8 pro?
To do that you need to either save a template, or make your own indicator.
This is what I found on this web address:
http://trader.online.pl/MSZ/e-w-Fibonacci_Levels_I.html

Fibonacci Levels I by Rakesh Sahgal

Fib Levels_In
eMonth1:=Input("Enter the Month-MM",1,12,1);
eDate1:=Input("Enter the Date-DD",1,31,1);
eYear1:=Input("Enter the Year-YYYY",0,2100,0);
eMonth2:=Input(".Enter the Month-MM",1,12,1);
eDate2:=Input(".Enter the Date-DD",1,31,1);
eYear2:=Input(".Enter the Year-YYYY",0,2100,0);
h1:=valuewhen(1, dayofmonth()=eDate1 AND month()=eMonth1 AND year()=eYear1,H);
l1:=valuewhen(1, dayofmonth()=eDate1 AND month()=eMonth1 AND year()=eYear1,L);
h2:=valuewhen(1, dayofmonth()=eDate2 AND month()=eMonth2 AND year()=eYear2,H);
l2:=valuewhen(1, dayofmonth()=eDate2 AND month()=eMonth2 AND year()=eYear2,L);
aa:= Max(h1,h2);
bb:=Min(l1,l2);
cc:=Abs(aa-bb);
startpt:=If(h1>h2 AND l1>l2,l2,If(h2>h1 AND l2>l1,h2,0));
sr1:=If(startpt=l2,l2+(cc*.236),If(startpt=h2,h2-(cc*.236),0));
SR2:=If(startpt=l2,l2+(cc*.3),If(startpt=h2,h2-(cc*.3),0));
SR3:=If(startpt=l2,l2+(cc*.382),If(startpt=h2,h2-(cc*.382),0));
SR4:=If(startpt=l2,l2+(cc*.486),If(startpt=h2,h2-(cc*.486),0));
SR5:=If(startpt=l2,l2+(cc*.618),If(startpt=h2,h2-(cc*.618),0));
SR6:=If(startpt=l2,l2+(cc*.786),If(startpt=h2,h2-(cc*.786),0));
aa;
sr1;
SR2;
SR3;
SR4;
SR5;
SR6;
bb;

Fib Levels_Out

eMonth1:=Input("Enter the Month-MM",1,12,1);
eDate1:=Input("Enter the Date-DD",1,31,1);
eYear1:=Input("Enter the Year-YYYY",0,2100,0);
eMonth2:=Input(".Enter the Month-MM",1,12,1);
eDate2:=Input(".Enter the Date-DD",1,31,1);
eYear2:=Input(".Enter the Year-YYYY",0,2100,0);
h1:=ValueWhen(1, DayOfMonth()=eDate1 AND Month()=eMonth1 AND Year()=eYear1,H);
l1:=ValueWhen(1, DayOfMonth()=eDate1 AND Month()=eMonth1 AND Year()=eYear1,L);
h2:=ValueWhen(1, DayOfMonth()=eDate2 AND Month()=eMonth2 AND Year()=eYear2,H);
l2:=ValueWhen(1, DayOfMonth()=eDate2 AND Month()=eMonth2 AND Year()=eYear2,L);
aa:= Max(h1,h2);
bb:=Min(l1,l2);
cc:=Abs(aa-bb);
startpt:=If(h1>h2 AND l1>l2,l2,If(h1<h2 AND l1<l2,h2,0));
sr1:=If(startpt=l2,l2-(cc*1.272),If(startpt=h2,h2+(cc*1.272),0));
SR2:=If(startpt=l2,l2-(cc*1.618),If(startpt=h2,h2+(cc*1.618),0));
SR3:=If(startpt=l2,l2-(cc*2.058),If(startpt=h2,h2+(cc*2.058),0));
SR4:=If(startpt=l2,l2-(cc*2.618),If(startpt=h2,h2+(cc*2.618),0));
SR5:=If(startpt=l2,l2-(cc*3.33),If(startpt=h2,h2+(cc*3.33),0));
SR6:=If(startpt=l2,l2-(cc*4.236),If(startpt=h2,h2+(cc*4.236),0));
aa;
sr1;
SR2;
SR3;
SR4;
SR5;
SR6;
bb;

I hope this will help you; good luck.
Eduardo :)
 
Top