- Katılım
- 23 Eki 2020
- Mesajlar
- 1,828
Fibonacci Tool · To: metastock@xxxxxxxxxxxxx · Subject: Fibonacci Tool · From: wander@xxxxxxxx · Date: Thu, 09 Sep 1999 19:50:47 -0400 · References: <37D5593C.5AE69129@xxxxxxxxx> · Reply-To: metastock@xxxxxxxxxxxxx · Sender: owner-metastock@xxxxxxxxxxxxx Glad ya'll liked it....hope it proves helpful.  I've made a fewchanges, the most noticeable being that I added more extensions. Feelfree to bracket off the ones you don't want, add additional ones, or createyour own retracement variations.Regards, Ken |
|
Fibonacci Tool - Custom {Ken 9/8/99} j:=Input("year to begin line study",1800,3000,1999); k:=Input("month to begin line study",1,12,1); m:=Input("day of month to begin line study",1,31,4); ext:=Input("Extension: 2=upward; 1=downward; 0=none",0,2,0); hi:=Input("high",0,20000,100); lo:=Input("low",0,20000,50); BeginPlot:=Year()=j AND Month()=k AND DayOfMonth()=m; n:=ValueWhen(1,BeginPlot,(hi-(hi-lo)*2.618)); q:=ValueWhen(1,BeginPlot,(hi-(hi-lo)*1.618)); u:=ValueWhen(1,BeginPlot,(hi-(hi-lo)*1.382)); x:=ValueWhen(1,BeginPlot,((hi-lo)*1.382)+lo); y:=ValueWhen(1,BeginPlot,((hi-lo)*1.618)+lo); z:=ValueWhen(1,BeginPlot,((hi-lo)*2.618)+lo); If(ext=1,n,lo); If(ext=1,q,lo); If(ext=1,u,lo); ValueWhen(1,BeginPlot,lo); ValueWhen(1,BeginPlot,((hi-lo)*.236)+lo); ValueWhen(1,BeginPlot,((hi-lo)*.382)+lo); ValueWhen(1,BeginPlot,((hi-lo)*.5)+lo); ValueWhen(1,BeginPlot,((hi-lo)*.618)+lo); ValueWhen(1,BeginPlot,((hi-lo)*.764)+lo); ValueWhen(1,BeginPlot,hi); If(ext=2,x,hi); If(ext=2,y,hi); If(ext=2,z,hi); |
Source / From: | |
