Hi Don, Wow! Exactly what I was looking for. Many thanks.
I hope to learn to do these codes myself eventually. Regards, Larry On 18 Apr 2007 at 2:13, Don Lindberg wrote: > > Larry, > If I understand what you want, then the code below will satisfy your Buy and > Sell statements, as > well as plot buy and sell arrows. > Buy = Cross(Ergodic,SigLin); > Sell = Cross(SigLin,Ergodic); > PlotShapes( IIf( Buy, shapeDownArrow + shapePositionAbove, shapeNone ), > colorGreen ); > PlotShapes( IIf( Sell, shapeHollowUpArrow + shapePositionAbove, shapeNone ), > colorRed ); > > You can then add whatever Filter and AddColumn statements you want for the > Exploration. > (Example:) > Filter=C>1 AND C<50 ; > AddColumn(C," Close ",1.2); > AddColumn(Ergodic," Ergodic ",1.2); > AddColumn(SigLin," SigLin ",1.2); > > Hope this helps, > Don Lindberg > > > > From: [email protected] [mailto:[EMAIL PROTECTED] On Behalf Of Larry > Sent: Tuesday, April 17, 2007 10:32 PM > To: [email protected] > Subject: Re: [amibroker] Blau: TSI & Ergodic Oscillator > > > Hi Rick, > > Thank you so much for you response. I saw the following comment in the forum > too: > > "Green Histogram & Blue line above 0 is buy > Red Histogram & Blue line under 0 is sell" > > However,the poster appeared to be seeking a confirmation whether his/her > assumption was > correct. Unfortunately there was no response to the enquiry. > > From my observation, based on a comparison of the Ergodic chat with the price > chart of a stock, > the stock's price will start moving up when the blue signal line crosses > above the Ergodic > oscillator. And the price moves downward when the blue signal line crosses > below the Ergodic > Oscillator. > > Could you please devise a code for the crossing without regard to whether it > is in the green or red > histogram? > > Once again, thank you. > > Larry > > P.S. I'll also experiment with the code that you've already given me below. > > On 18 Apr 2007 at 1:12, Rick Osborn wrote: > > > > >If, as the forum says... > >Green Histogram & Blue line above 0 is buy > >Red Histogram & Blue line under 0 is sell > > > >Then the code would be > > > >Buy = Ergodic > SigLin AND Hist >= 0; > >Sell = SigLin > Ergodic AND Hist < 0; > >Filter = Buy OR Sell; > >AddColumn(Filter,"Signal",1.0); > > > > (you may want to separate the Addcolumn stuff) > >Rick > >--- Larry <[EMAIL PROTECTED]> wrote: > > > >> Hi there, > >> > >> I came across the above indicator at > >> www.amibrokerfan.com (forum). > >> > >> I found it useful as an indicator but I was > >> wondering if it can be turned into a scanner also > >> with the inclusion of buy and sell signals. I am not > >> sure but I think a buy signal is when > >> the signal line crosses above the Ergodic > >> Oscillator. Could someone please help with the > >> necessary codes. > >> > >> I reproduce the original code below for your easy > >> reference. > >> > >> Thank you. > >> Larry > >> > >> // Blau: TSI & Ergodic Oscillator > >> > >> Len_r = Param( "TSI period 'r':", 32 , 1 , 100 ); > >> Len_s = Param( "TSI period 's':", 5 , 1 , 100 ); > >> Len_5 = 5 ; > >> > >> Mtm = C - Ref ( C, -1 ); > >> AbsMtm = abs ( Mtm ); > >> //=============================== > >> Num_T = EMA ( EMA ( Mtm, Len_r ), Len_s ); > >> Den_T = EMA ( EMA ( AbsMtm, Len_r ), Len_s ); > >> > >> TSI = 100 * Nz ( Num_T / Den_T ); > >> //=============================== > >> Num_E = EMA ( EMA ( Mtm, Len_r ), Len_5 ); > >> Den_E = EMA ( EMA ( AbsMtm, Len_r ), Len_5 ); > >> > >> Ergodic = 100 * Nz ( Num_E / Den_E ); > >> SigLin = EMA ( Ergodic, Len_5 ); > >> //=============================== > >> GraphXSpace = 2 ; > >> //Plot( TSI, "TSI", colorGreen, styleLine ); > >> ErgCol = colorBlue ; > >> Plot( Ergodic, "Ergodic Osc.", ErgCol, styleLine > >> ); > >> Plot( SigLin, "", colorDarkYellow, styleLine ); > >> //=============================== > >> Hist = Ergodic - SigLin; > >> HistCol = IIf ( Hist>= 0, colorGreen, colorRed ); > >> Plot(Hist, "Histogram", HistCol, styleHistogram | > >> styleThick | > >> styleNoLabel ); > >> //=============================== > >> Title = EncodeColor( colorDarkBlue ) + FullName() + > >> " [" + Name() + "] > >> " + > >> EncodeColor( colorDarkGrey ) + WriteVal( DateTime(), > >> formatDateTime ) + > >> "\n" + > >> EncodeColor( colorBrown ) + "Blau: The Ergodic > >> Oscillator, EO(" + > >> EncodeColor( ErgCol ) + "r" + EncodeColor( > >> colorBrown ) + ",5,5 ) " + > >> EncodeColor( ErgCol ) + "r_Pds: " + Len_r + > >> EncodeColor( colorGrey40 ) + " (Adjustable)."; > >> //=============================== > >> > >> > > > >Rick Osborn & Associates > > 885 Sorrento Ave. > > Oshawa, Ontario L1J 6V6 > >(905) 728-8543 fax 728-0815 > > > > > > > > > > >
