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

[SPAM]Re: [amibroker] Fibonacci



PureBytes Links

Trading Reference Links

Hello,

I for one do not get attachements. Could someone please post the code 
or put it in the files.

Thank You

--- In amibroker@xxxxxxxxxxxxxxx, "Prashanth" <prash454.ta@xxx> wrote:
>
> Hello,
> 
> Corrected code is attached.
> 
> Cheers
> 
> Prashanth
>   ----- Original Message ----- 
>   From: paulradge 
>   To: amibroker@xxxxxxxxxxxxxxx 
>   Sent: Monday, August 11, 2008 1:28 PM
>   Subject: Re: [SPAM]Re: [amibroker] Fibonacci
> 
> 
>   Hi Pondy,
>                  as a non programer this looks very 
interesting,many thanks for sharing your hard work.
> 
>   Similar to Vinay i have the same error's and i'm also unable to 
resolve them due to the fact that i've had to admitt to myself that 
this programing isn't going to happen for me.
> 
>   Hope you see our posts and suggest a fix as i'd like to play with 
your code some more ,at this stage i've just commented out those two 
lines.
> 
>   warm regards
>   Paul
> 
> 
> 
> 
>     ----- Original Message ----- 
>     From: Vinay Garg 
>     To: amibroker@xxxxxxxxxxxxxxx 
>     Sent: Monday, August 11, 2008 4:30 AM
>     Subject: RE: [SPAM]Re: [amibroker] Fibonacci
> 
> 
> 
>     Hi
> 
> 
>     I get a Syntax error on this line after "CHammer".
> 
> 
>     (AddColumn(CdDoji()OR CHammer(),"Candle",1.0);)
> 
> 
>     And after 
> 
> 
>     Plot(Gauss2ord(C,5),"M5",4,1);
> 
> 
>     Could you please advise the correct syntax or is there some 
other code that I may be missing. I am using version 5.16 
> 
> 
>     Thanks & Regards
> 
>     Vinay 
> 
> 
> --------------------------------------------------------------------
--------
> 
>     From: amibroker@xxxxxxxxxxxxxxx 
[mailto:amibroker@xxxxxxxxxxxxxxx] On Behalf Of pondy
>     Sent: Sunday, August 10, 2008 11:44 AM
>     To: amibroker@xxxxxxxxxxxxxxx
>     Subject: [SPAM]Re: [amibroker] Fibonacci
> 
> 
>     Hi ....
> 
> 
>      I have Commented two lines of code.... Now the Afl shall give 
the desired result...
> 
> 
>     ////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////
> 
>     _SECTION_BEGIN
> 
>     ("Fibonacci"); 
> 
>     //Date: 12-January 2002 by Thomas Zmuck
> 
>     //thomas.zm@xxx
> 
>     Offset = 
> 
>     5; //use two sheets: one with 5 and another with 7, or maybe 
other offset value 
> 
>     Avgmov = Offset*
> 
>     MA(abs(ROC(C,1)),20); 
> 
>     per = 
> 
>     LastValue(Avgmov); 
> 
>     x=
> 
>     Cum(1); Range = 0.01; 
> 
>     PS = 
> 
>     TroughBars(L,per,1) == 0; 
> 
>     xa = 
> 
>     LastValue(ValueWhen(PS,x,1));//x from last trough 
> 
>     Ya = 
> 
>     LastValue(ValueWhen(PS,L,1));//y (Low) last trough 
> 
>     PR = 
> 
>     PeakBars(H,per,1) == 0; 
> 
>     xb = 
> 
>     LastValue(ValueWhen(PR,x,1));//x from last peak 
> 
>     Yb = 
> 
>     LastValue(ValueWhen(PR,H,1));//y (High) last peak 
> 
>     Trough_ReTest = 
> 
>     abs((L/ya)-1)<Range; 
> 
>     Peak_ReTest = 
> 
>     abs((H/yb)-1)<Range; 
> 
>     Trough_Cross = 
> 
>     Cross(ya,C); 
> 
>     Peak_Cross = 
> 
>     Cross(C,yb); 
> 
>     //UP = upSwing DN = downSwing
> 
>     UP = xb>xa;
> 
>     //upSwing 
> 
>     DN = xa>xb;
> 
>     //DownSwing 
> 
>     RT23_6 = 
> 
>     IIf(UP,yb-(yb-ya)*0.236,IIf(DN,ya+(yb-ya)*0.236,-1e10)); 
> 
>     RT38_2 = 
> 
>     IIf(UP,yb-(yb-ya)*0.382,IIf(DN,ya+(yb-ya)*0.382,-1e10)); 
> 
>     RT50_0 = 
> 
>     IIf(UP,yb-(yb-ya)*0.500,IIf(DN,ya+(yb-ya)*0.500,-1e10)); 
> 
>     RT61_8 = 
> 
>     IIf(UP,yb-(yb-ya)*0.618,IIf(DN,ya+(yb-ya)*0.618,-1e10)); 
> 
>     RT78_6 = 
> 
>     IIf(UP,yb-(yb-ya)*0.786,IIf(DN,ya+(yb-ya)*0.786,-1e10)); 
> 
>     RT= 
> 
>     IIf
> 
>     (UP,-100*(yb-L)/(yb-ya), 
> 
>     100
> 
>     *(H-ya)/(yb-ya));//Retracement_Value 
> 
>     InZone = C<yb & C>ya;
> 
>     //use it for filter to receive only signals that are in in the 
Retracement zone. 
> 
>     Buy
> 
>     = Trough_ReTest OR peak_Cross; 
> 
>     Sell
> 
>     = Peak_ReTest OR trough_Cross; 
> 
>     Filter
> 
>     = 1; 
> 
>     AddColumn
> 
>     (RT,"RT%"); 
> 
>     AddColumn
> 
>     (Trough_ReTest,"TR-Test",1.0); 
> 
>     AddColumn
> 
>     (Peak_ReTest,"PK-Test",1.0); 
> 
>     AddColumn
> 
>     (Trough_Cross,"TR-Cross",1.0); 
> 
>     AddColumn
> 
>     (Peak_Cross,"PK-Cross",1.0); 
> 
>     //
> 
>     AddColumn(CdDoji()OR CHammer(),"Candle",1.0); 
> 
>     Plot
> 
>     (C,"C",1,64); 
> 
>     Plot
> 
>     (IIf(x>xa,ya,-1e10),"Bottom",colorBrown,1+8); 
> 
>     Plot
> 
>     (IIf(x>xb,yb,-1e10),"Top",colorBrown,1+8); 
> 
>     xab = 
> 
>     IIf(xb>xa,xb,xa); 
> 
>     //Retracements
> 
>     Plot
> 
>     (IIf(x>=xab+1,RT23_6,-1e10),"23,6% Retr.",5,1); 
> 
>     Plot
> 
>     (IIf(x>=xab+1,RT38_2,-1e10),"38,2% Retr.",5,1); 
> 
>     Plot
> 
>     (IIf(x>=xab+1,RT50_0,-1e10),"50,0% Retr.",colorBlue,1); 
> 
>     Plot
> 
>     (IIf(x>=xab+1,RT61_8,-1e10),"61,8% Retr.",colorYellow,1); 
> 
>     Plot
> 
>     (IIf(x>=xab+1,RT78_6,-1e10),"78,6% Retr.",colorYellow,1); 
> 
>     GraphXSpace
> 
>     = 0.5; 
> 
>     //
> 
>     Plot(Gauss2ord(C,5),"M5",4,1); 
> 
>     GraphXSpace
> 
>     = 1.5; 
> 
>     Title
> 
>     = Name()+" per = "+WriteVal(per,1.0) +" Close = "+WriteVal
(C,1.2)+ " ("+WriteVal(ROC(C,1),1.2)+"%)"+_SECTION_END
> 
>     (); 
> 
>     Best Regards,
> 
> 
>     pondy
> 
>     On Mon, Aug 4, 2008 at 11:20 PM, Ara Kaloustian <ara1@xxx> 
wrote:
> 
>     Hi Pondy,
> 
> 
>     Thanks for the response ..... 
> 
> 
>     I was asking what else do you need to run the code, because 
this code calls a couple of functions that are external ... so there 
is either a DLL or an include file associated with this ... 
> 
> 
>     any idea?
> 
> 
>     A
> 
>       ----- Original Message ----- 
> 
>       From: pondy 
> 
>       To: amibroker@xxxxxxxxxxxxxxx 
> 
>       Sent: Thursday, July 31, 2008 1:26 AM
> 
>       Subject: Re: [amibroker] Fibonacci
> 
> 
>       Hi Ara Kaloustian,
> 
> 
>                         Fibonacci code written by Thomas Zmuck in 
2002
> 
> 
>       //////////////////////////////////////////////////////////////
///////////////////////////////////////////////////
> 
> 
>       _SECTION_BEGIN("Fibonacci");
>       //Date: 12-January 2002 by Thomas Zmuck
>       //thomas.zm@xxx
> 
>       Offset = 5; //use two sheets: one with 5 and another with 7, 
or maybe other offset value
>       Avgmov = Offset*MA(abs(ROC(C,1)),20);
> 
>       per = LastValue(Avgmov); 
>       x=Cum(1); Range = 0.01;
>       PS = TroughBars(L,per,1) == 0;
>       xa = LastValue(ValueWhen(PS,x,1));//x from last trough
>       Ya = LastValue(ValueWhen(PS,L,1));//y (Low) last trough
>       PR = PeakBars(H,per,1) == 0;
>       xb = LastValue(ValueWhen(PR,x,1));//x from last peak
>       Yb = LastValue(ValueWhen(PR,H,1));//y (High) last peak
> 
>       Trough_ReTest = abs((L/ya)-1)<Range;
>       Peak_ReTest = abs((H/yb)-1)<Range;
>       Trough_Cross = Cross(ya,C);
>       Peak_Cross = Cross(C,yb);
> 
>       //UP = upSwing DN = downSwing
>       UP = xb>xa;//upSwing
>       DN = xa>xb;//DownSwing
> 
>       RT23_6 = IIf(UP,yb-(yb-ya)*0.236,IIf(DN,ya+(yb-ya)*0.236,-
1e10));
>       RT38_2 = IIf(UP,yb-(yb-ya)*0.382,IIf(DN,ya+(yb-ya)*0.382,-
1e10));
>       RT50_0 = IIf(UP,yb-(yb-ya)*0.500,IIf(DN,ya+(yb-ya)*0.500,-
1e10));
>       RT61_8 = IIf(UP,yb-(yb-ya)*0.618,IIf(DN,ya+(yb-ya)*0.618,-
1e10));
>       RT78_6 = IIf(UP,yb-(yb-ya)*0.786,IIf(DN,ya+(yb-ya)*0.786,-
1e10));
>       RT= 
>       IIf(UP,-100*(yb-L)/(yb-ya),
>       100*(H-ya)/(yb-ya));//Retracement_Value
> 
>       InZone = C<yb & C>ya;//use it for filter to receive only 
signals that are in in the Retracement zone.
> 
>       Buy = Trough_ReTest OR peak_Cross;
>       Sell = Peak_ReTest OR trough_Cross;
> 
>       Filter = 1;
> 
>       AddColumn(RT,"RT%");
>       AddColumn(Trough_ReTest,"TR-Test",1.0);
>       AddColumn(Peak_ReTest,"PK-Test",1.0);
>       AddColumn(Trough_Cross,"TR-Cross",1.0);
>       AddColumn(Peak_Cross,"PK-Cross",1.0);
>       AddColumn(CdDoji()OR CHammer(),"Candle",1.0);
>       Plot(C,"C",1,64);
> 
>       Plot(IIf(x>xa,ya,-1e10),"Bottom",colorBrown,1+8);
>       Plot(IIf(x>xb,yb,-1e10),"Top",colorBrown,1+8);
> 
>       xab = IIf(xb>xa,xb,xa);
>       //Retracements
>       Plot(IIf(x>=xab+1,RT23_6,-1e10),"23,6% Retr.",5,1);
>       Plot(IIf(x>=xab+1,RT38_2,-1e10),"38,2% Retr.",5,1);
>       Plot(IIf(x>=xab+1,RT50_0,-1e10),"50,0% Retr.",colorBlue,1);
>       Plot(IIf(x>=xab+1,RT61_8,-1e10),"61,8% Retr.",colorYellow,1);
>       Plot(IIf(x>=xab+1,RT78_6,-1e10),"78,6% Retr.",colorYellow,1);
> 
>       GraphXSpace = 0.5;
> 
>       Plot(Gauss2ord(C,5),"M5",4,1);
> 
>       GraphXSpace = 1.5;
> 
>       Title = Name()+"     per = "+WriteVal(per,1.0) +"     Close 
= "+WriteVal(C,1.2)+ " ("+WriteVal(ROC(C,1),1.2)+"%)"+"      Current 
Correction = "+WriteVal(RT,1.0)+"%";
>       _SECTION_END();
> 
> 
>       //////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////
> 
>                     
>       Best Regards,
> 
> 
>       pondy
> 
> 
> 
> 
>        
> 
>       On Thu, Jul 31, 2008 at 9:15 AM, Ara Kaloustian <ara1@xxx> 
wrote:
> 
>       I amlooking at some Fibonacci code written by Thomas Zmuck in 
2002.
> 
> 
>       File name is "INX - NASDAQ Fibonacci" .... ( I think that is 
the original name, but not sure)
> 
> 
>       It seems to use some functions that are not part of AB. 
Anyone familiar with what is needed to run the code?
> 
> 
>       Tx
> 
> 
>       Ara
> 
> 
> 
> 
> 
>       -- 
>       Best Regards,
> 
>       pondy
> 
> 
> 
> 
>     -- 
>     Best Regards,
> 
>     pondy
>



------------------------------------

Please note that this group is for discussion between users only.

To get support from AmiBroker please send an e-mail directly to 
SUPPORT {at} amibroker.com

For NEW RELEASE ANNOUNCEMENTS and other news always check DEVLOG:
http://www.amibroker.com/devlog/

For other support material please check also:
http://www.amibroker.com/support.html
Yahoo! Groups Links

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

<*> Your email settings:
    Individual Email | Traditional

<*> To change settings online go to:
    http://groups.yahoo.com/group/amibroker/join
    (Yahoo! ID required)

<*> To change settings via email:
    mailto:amibroker-digest@xxxxxxxxxxxxxxx 
    mailto:amibroker-fullfeatured@xxxxxxxxxxxxxxx

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

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