Re: [amibroker] Att : Reinsley (ONLY ONE LOGIC)

[reinsley <reinsley@xxxxxxxx>]

Hello sanjiv,

Thanks for sharing. It was a job on my todolist.

I re-post full formula and I will send it into the library.

Best regards


// pivots and prices
// based on Pramod's comments 
http://www.amibroker.com/library/detail.php?id=617
// adapted by Reinsley : Prices on Pivot and ajustable digits #
// mod by Sanjiv Bansal : take care of Highs or Lows when two adjacent 
bars are equal
// does not reference to future

SetChartOptions( 0, chartShowDates );

_SECTION_BEGIN( "Price" );
_N( Title = StrFormat( "{{NAME}} - {{INTERVAL}} {{DATE}} \nOp %g, \nHi 
%g, \nLo %g, \nCl %g (%.1f%%) {{VALUES}}", O, H, L, C, SelectedValue( 
ROC( C, 1 ) ) ) );
Plot( C, "Close", ParamColor( "Color", colorBlack ), styleNoTitle | 
styleCandle  | styleThick );
_SECTION_END();

_SECTION_BEGIN( "pivot" );
price = ParamToggle( "Plot Price", "Off|On", 1 );
num = Param( "trend", 4, 1, 10, 1 );
dist = 0.5 * ATR( 10 );
rightfig = Param( "rightfig ", 7, 1, 10, 1 );
xspace = Param( "GraphXSpace ", 10, 1, 20, 1 );

mHHV = HHV( H, num );
mLLV = LLV( L, num );

FirstVisibleBar = Status( "FirstVisibleBar" );
Lastvisiblebar = Status( "LastVisibleBar" );

for ( b = Firstvisiblebar + num; b <= Lastvisiblebar AND b < BarCount -
         num; b++ )
{
     i = num;
     ml = 0;
     mu = 0;

     while ( i > 0 )
     {

         if ( L[b] < L[b+i] )
         {
             ml++;
         }


         if ( H[b] > H[b+i] )
         {
             mu++;
         }

         i--;
     }


     if ( ml == num AND L[B] == mLLV[B] )
     {
         PlotText( "\n *\n", b, L[b], colorGreen );

         if ( price == 1 )
         {
             p = StrRight( NumToStr( L[b], 4.1 ), rightfig );
             PlotText( "\n\n" + p, b - 2 , L[b] , colorGreen );
         }
     }


     if ( mu == num AND H[B] == mHHV[B] )
     {
         PlotText( " *\n", b, H[b], colorRed );

         if ( price == 1 )
         {
             p = StrRight( NumToStr( H[b], 4.1 ), rightfig );
             PlotText( p , b - 2 , H[b] + dist[b] + 1, colorRed );
         }
     }
}

GraphXSpace = xspace;


Le 31/12/2009 12:34, sanjiv a écrit :
> Highs or Lows of two adjacent bars are equal




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

**** IMPORTANT PLEASE READ ****
This group is for the discussion between users only.
This is *NOT* technical support channel.

TO GET TECHNICAL SUPPORT send an e-mail directly to 
SUPPORT {at} amibroker.com

TO SUBMIT SUGGESTIONS please use FEEDBACK CENTER at
http://www.amibroker.com/feedback/
(submissions sent via other channels won't be considered)

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

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:
    amibroker-digest@xxxxxxxxxxxxxxx 
    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/