Russian forex indicators: 01/2010

This forex indicator is designed for traders who use their work analysis of figures candles.

Indicator determines shape of candles, candle comparing current to previous. Here is the code figures bear absorption:

if ( High [ bar + 1 ] < High [ bar ] & & Low [ bar + 1 ] > Close [ bar ] & & if (High [bar + 1]  [bar] & & Low [bar + 1]> Close [bar] & &
Open [ bar + 1 ] < Close [ bar + 1 ] & & Open [ bar ] > Close [ bar ] ) Open [bar + 1]  [bar + 1] & & Open [bar]> Close [bar])

High - The maximum price candles
Low - price candles
Close - Closing price candles
Open - Opening price candles
[Bar] - current bar
[Bar + 1] - the last bar

The body of the current candle body more than the previous (High [bar + 1] Close [bar])
The current candlestick "bull" (Open [bar]> Close [bar]), and past "bear" (Open [bar + 1]

Adding to their indicator figures, you can significantly expand its capabilities, and at the same time practice in programming.
For example, the code "Bull tweezers"

if ( High [ bar + 1 ] >  High  [ bar ]  & & High [ bar + 2 ] <  High  [ bar + 1 ] & & High [ bar + 3 ] > High [ bar + 2 ] & & if (High [bar + 1]> High [bar] & & High [bar + 2]  [bar + 1] & & High [bar + 3]> High [bar + 2] & &
    Low  [ bar + 1 ] < = Low   [ bar ]  & & Low  [ bar + 3 ] < = Low   [ bar + 2 ] & & Open [ bar ]  < Close [ bar ]  & & Low [bar + 1] <= Low [bar] & & Low [bar + 3] <= Low [bar + 2] & & Open [bar]  [bar] & &
    Open [ bar + 1 ] >  Close [ bar + 1 ] & & Open [ bar + 2 ] < Close [ bar + 2 ] & & Open [ bar + 3 ] > Close [ bar + 3 ] ) Open [bar + 1]> Close [bar + 1] & & Open [bar + 2]  [bar + 2] & & Open [bar + 3]> Close [bar + 3])

To add a shape, it is necessary in the function "Figura" to add the selected rows.

int Figura ( int bar ) int Figura (int bar) 
 { ( 
 //----------------------------------------- анализ фигур //----------------------------------------- Analysis of figures 
 if ( High [ bar + 1 ] < High [ bar ] & & Low [ bar + 1 ] > Close [ bar ] & & if (High [bar + 1]  [bar] & & Low [bar + 1]> Close [bar] & & 
 Open [ bar + 1 ] < Close [ bar + 1 ] & & Open [ bar ] > Close [ bar ] ) Open [bar + 1]  [bar + 1] & & Open [bar]> Close [bar]) 
 { ( 
 return ( - 1 ) ; return (- 1); 
 } ) 
 if ( Low [ bar + 1 ] > Low [ bar ] & & High [ bar + 1 ] < Close [ bar ] & & if (Low [bar + 1]> Low [bar] & & High [bar + 1]  [bar] & & 
 Open [ bar + 1 ] > Close [ bar + 1 ] & & Open [ bar ] < Close [ bar ] ) Open [bar + 1]> Close [bar + 1] & & Open [bar]  [bar]) 
 { ( 
 return ( 1 ) ; return (1); 
 } ) 
    if ( High [ bar + 1 ] >  High  [ bar ]  & & High [ bar + 2 ] <  High  [ bar + 1 ] & & High [ bar + 3 ] > High [ bar + 2 ] & & if (High [bar + 1]> High [bar] & & High [bar + 2]  [bar + 1] & & High [bar + 3]> High [bar + 2] & &
       Low  [ bar + 1 ] < = Low   [ bar ]  & & Low  [ bar + 3 ] < = Low   [ bar + 2 ] & & Open [ bar ]  < Close [ bar ]  & & Low [bar + 1] <= Low [bar] & & Low [bar + 3] <= Low [bar + 2] & & Open [bar]  [bar] & &
       Open [ bar + 1 ] >  Close [ bar + 1 ] & & Open [ bar + 2 ] < Close [ bar + 2 ] & & Open [ bar + 3 ] > Close [ bar + 3 ] ) Open [bar + 1]> Close [bar + 1] & & Open [bar + 2]  [bar + 2] & & Open [bar + 3]> Close [bar + 3]) 
    { (
return ( 2 ) ; return (2); 
    } ) 
 return ( 0 ) ; return (0); 
 } )

and in the Start function to add:

switch ( S ) switch (S) 
 { ( 
 case 1 : BufferUP [ i ] = Low [ i ] ; case 1: BufferUP [i] = Low [i]; 
           NameFigur = "бык поглощение" ; NameFigur = "bull absorption; 
           Redraw ( i , colorBulls , NameFigur ) ; Redraw (i, colorBulls, NameFigur); 
           Redraw ( i + 1 , colorBulls , NameFigur ) ; Redraw (i + 1, colorBulls, NameFigur); 
 break ; break; 

 case 2 : BufferUP [ i ] = Low [ i ] ; case 2: BufferUP [i] = Low [i];
          NameFigur = "бык пинцет" ; NameFigur = "bull tweezers;
          Redraw ( i , colorBulls , NameFigur ) ;     //Перерисовывает текущую свечу цветом = NameFigur Redraw (i, colorBulls, NameFigur); / / Redraws the current candle color = NameFigur
          Redraw ( i + 1 , colorBulls , NameFigur ) ; Redraw (i + 1, colorBulls, NameFigur);
          Redraw ( i +2 , colorBulls , NameFigur ) ; Redraw (i +2, colorBulls, NameFigur); 
           Redraw ( i +3 , colorBulls , NameFigur ) ; Redraw (i +3, colorBulls, NameFigur); 
 break ; break;

case - 1 : BufferLOW [ i ] = High [ i ] ; case - 1: BufferLOW [i] = High [i]; 
           NameFigur = "медведь поглощение" ; NameFigur = "Bear absorption; 
           Redraw ( i , colorBears , NameFigur ) ; Redraw (i, colorBears, NameFigur); 
           Redraw ( i + 1 , colorBears , NameFigur ) ; Redraw (i + 1, colorBears, NameFigur); 
 break ; break; 
 } )