[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[EquisMetaStock Group] Re: Febhonichi oran;



PureBytes Links

Trading Reference Links


Özgür, how are things in Molvania?
http://www.jetlagtravel.com/molvania

This code plots the same output, faster:

---8<---------------------
a:=Input("ZigZag minimum percentage",.01,100,5);
b:=Input("Fib levels based on:  [1]Troughs,  [2]Peaks",1,2,1);
d:=Input("HHV/LLV periods",1,500,50);

formulal:=Trough(1,C,a);
formulSat:=Peak(1,C,a);
al:=LLV(formulal,d);
sat:=HHV(formulsat,d);

feb:=sat-al;
feb0:=LastValue(al) ;
feb1:=LastValue(al+feb*.236);
feb2:=LastValue(al+feb*.382);
feb3:=LastValue(al+feb*.500);
feb4:=LastValue(al+feb*.618);
feb5:=LastValue(sat) ;
feb6:=LastValue(sat-feb*.236);
feb7:=LastValue(sat-feb*.382);
feb8:=LastValue(sat-feb*.618);

{ Plot on price chart }
If(b=1,feb0,feb8);
If(b=1,feb3,feb3);
If(b=1,feb1,feb7);
If(b=1,feb2,feb6);
If(b=1,feb4,feb0);
feb5;

{Created By Özgür YILDIRIM}
{Code fixed by jOsE}

---8<---------------------


jose '-)
http://www.metastocktools.com



--- In equismetastock@xxxxxxxxxxxxxxx, "ozgur1976yildirim" 
<ozgur1976yildirim@xxxx> wrote:
> 
> 
> Hi all,
> 
> Febhonici oran;
> 
> 
> a:=Input(" Yüzdelik Değer :?",1,100,10);
> b:=Input(" (Dip İçin=1 , Zirve için=2) Giriniz :?",1,2,1);
> d:=Input(" Peryot Dilimi :?",1,500,50);
> 
> f:=Zig(C,a,%);
> 
> formulal:=If(Ref(f,-2)>Ref(f,-1),If(f>Ref(f,-1),Ref(L,-
> 1),PREV),PREV);
> formulSat:=If(Ref(f,-2)<Ref(f,-1),If(Ref(f,-1)>f,Ref(H,-
> 1),PREV),PREV);
> al:=LLV(formulal,d);
> sat:=HHV(formulsat,d);
> feb:=(sat-al);
> feb0:=LastValue(al) ; 
> feb1:=LastValue(al+feb*.236);
> feb2:=LastValue(al+feb*.382);
> feb3:=LastValue(al+feb*.500);
> feb4:=LastValue(al+feb*.618);
> feb5:=LastValue(sat) ;
> 
> feb6:=LastValue(sat-feb*.236);
> feb7:=LastValue(sat-feb*.382);
> feb8:=LastValue(sat-feb*.618);
> 
> ValueWhen(1,b=1,feb0 );
> ValueWhen(1,b=1,feb1 );
> ValueWhen(1,b=1,feb2 );
> ValueWhen(1,b=1,feb3 );
> ValueWhen(1,b=1,feb4 );
> ValueWhen(1,b=1,feb5 );
> 
> ValueWhen(1,b=2,feb5 );
> ValueWhen(1,b=2,feb8 );
> ValueWhen(1,b=2,feb7 );
> ValueWhen(1,b=2,feb3 );
> ValueWhen(1,b=2,feb6 );
> ValueWhen(1,b=2,feb0 );
> {Created By Özgür YILDIRIM}





------------------------ Yahoo! Groups Sponsor --------------------~--> 
What would our lives be like without music, dance, and theater?
Donate or volunteer in the arts today at Network for Good!
http://us.click.yahoo.com/Tcy2bD/SOnJAA/cosFAA/BefplB/TM
--------------------------------------------------------------------~-> 

 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/equismetastock/

<*> To unsubscribe from this group, send an email to:
    equismetastock-unsubscribe@xxxxxxxxxxxxxxx

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/