MetaStock™ Zone Forum & FAQ Artykuły Linki Elliott Waves EasyLanguage™ Zone

A B C D E F G H I J K L M N O P R S T U V W Y Z #

Fibonacci Levels I by Rakesh Sahgal
At 08:51 AM 8/16/01 -0400, you wrote:
>Hi,
>
>I would welcome any suggestions for a program that can quickly and
>easily calculate and project Fib Time Ratios. Metastock, can do it, BUT
>you cannot choose the ratios. Fibonacci Trader does not project
>forward:)). So far I am using Excel but it is quite cumbersome. Ideally
>I would like to use it with Qcharts and QCollector and use it on
>intraday data.

Message: 14
Date: Thu, 16 Aug 2001 19:00:22 +0530
From: Rakesh Sahgal <rsahgal@xxxxxxxx>
Subject: Re: Searching for program

I wrote formulae for computing fin levels internal and external for use in MetaStock. The ratios used in these formulae are the ones posted by Lenny yesterday, you can change them to whatever values you wish to. I am pasting them below. See if they solve your purpose:


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;

 

Source / From: TOP
Yaroll

Equis and MetaStock® and MetaStock Professional® are registered trademarks of Equis International. Achelis Binary Wave®, The DownLoader®,
Expert Advisor®, OptionScope®, Quotecenter® and Smart Charts® are trademarks of Equis International, a Thomson Reuters company.

TradeStation® Pro, TradeStation® 2000i, OptionStation®, SuperCharts®, PowerEditor® and EasyLanguage®
are registered trademarks of TradeStation Technologies, Inc. Other names and marks referred to are the property of their respective owners.

All information provided on this website is for educational purposes only. Trading involves risk, including possible loss of principal and other losses.

Ten i inne materiały na tej stronie zostały zamieszczone zostały jedynie w celach edukacyjnych, nie ponoszę żadnej odpowiedzialno¶ci za ich stosowanie.

Gra na giełdzie i rynkach walutowych (FOREX) niesie ze sob± ryzyko poważnych strat finansowych!