3c_dm_363





//+------------------------------------------------------------------+
//|                                                                  |
//|                 Copyright © 1999-2007, MetaQuotes Software Corp. |
//|                                         http://www.metaquotes.ru |
//+------------------------------------------------------------------+
#property copyright "Copyright 2002, Finware.ru Ltd."
#property link "http://www.finware.ru/"
//----
#property indicator_separate_window
#property indicator_buffers  3
#property indicator_color1  Lime
#property indicator_color2  Red
#property indicator_color3  Gray
//---- input parameters 
extern int Drow_style= 0;  // Ñòèëü èñïîëíåíèÿ ãðàôèêà 0 - â âèäå òî÷å÷íîé ëèíèè, äðóãîå çíà÷åíèå - â âèäå ãèñòîãðàììû
//---- indicator buffers 
double Ind_Buffer1[];
double Ind_Buffer2[];
double Ind_Buffer3[];
//---- double vars 
double value1,value2,Rezalt,trend;
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
int init()
  {
//---- indicators
   if (Drow_style==0)
     {
      SetIndexStyle(0,DRAW_ARROW);
      SetIndexStyle(1,DRAW_ARROW);
      SetIndexStyle(2,DRAW_ARROW);
      //----
      SetIndexArrow(0,159);
      SetIndexArrow(1,159);
      SetIndexArrow(2,159);
     }
   else
     {
      SetIndexStyle(0,DRAW_HISTOGRAM);
      SetIndexStyle(1,DRAW_HISTOGRAM);
      SetIndexStyle(2,DRAW_HISTOGRAM);
     }
//----
   SetIndexEmptyValue(0,0.0);
   SetIndexEmptyValue(1,0.0);
   SetIndexEmptyValue(2,0.0);
//----
   SetIndexBuffer(0,Ind_Buffer1);
   SetIndexBuffer(1,Ind_Buffer2);
   SetIndexBuffer(2,Ind_Buffer3);
//----   
   IndicatorShortName ("DM");
   SetIndexLabel (0,   "DM_Up");
   SetIndexLabel (1,   "DM_Down");
   SetIndexLabel (2,   "DM_Straight");
   IndicatorDigits(MarketInfo(Symbol(),MODE_DIGITS));
   return(0);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
int start()
  {
//---- get already counted bars 
   int shift,counted_bars=IndicatorCounted();
//---- check for possible errors 
   if (counted_bars<0) return(-1);
//---- 
   if(counted_bars<64)for(shift=1;shift<=64;shift++)
      {Ind_Buffer1[shift]=0.0;Ind_Buffer2[shift]=0.0;Ind_Buffer3[shift]=0.0;}
//---- 
   shift=Bars-64-1;
   if(counted_bars>64) shift=Bars-counted_bars-1;
   while(shift>=0)
     {
      value1=
      -0.057943686277445900*Close[shift+00]
      -0.043658266634319700*Close[shift+01]
      +0.016893339337967300*Close[shift+02]
      +0.110448213843891000*Close[shift+03]
      +0.205220247113110000*Close[shift+04]
      +0.264664029548369000*Close[shift+05]
      +0.264664029548369000*Close[shift+06]
      +0.205220247113110000*Close[shift+07]
      +0.110448213843891000*Close[shift+08]
      +0.016893339337967300*Close[shift+09]
      -0.043658266634319700*Close[shift+10]
      -0.057943686277445900*Close[shift+11]
      -0.034834636631794200*Close[shift+12]
      +0.002212354734218340*Close[shift+13]
      +0.028933121721909400*Close[shift+14]
      +0.032424401776343200*Close[shift+15]
      +0.015569833996195800*Close[shift+16]
      -0.007660554868813180*Close[shift+17]
      -0.022138347829420900*Close[shift+18]
      -0.020552990368271800*Close[shift+19]
      -0.006433347602730440*Close[shift+20]
      +0.009627481503821010*Close[shift+21]
      +0.017394469333231100*Close[shift+22]
      +0.013176086997509700*Close[shift+23]
      +0.001209424586624090*Close[shift+24]
      -0.010002709133594700*Close[shift+25]
      -0.013505578777899800*Close[shift+26]
      -0.008035831519405070*Close[shift+27]
      +0.001903891095510710*Close[shift+28]
      +0.009480467257466930*Close[shift+29]
      +0.010166090979082400*Close[shift+30]
      +0.004303104789688430*Close[shift+31]
      -0.003659787203963280*Close[shift+32]
      -0.008411956859246820*Close[shift+33]
      -0.007282846005800100*Close[shift+34]
      -0.001620704470705190*Close[shift+35]
      +0.004466014467332310*Close[shift+36]
      +0.007048985722291220*Close[shift+37]
      +0.004847799927165300*Close[shift+38]
      -0.000217319809293247*Close[shift+39]
      -0.004603538852047050*Close[shift+40]
      -0.005574817063020290*Close[shift+41]
      -0.002877047191674200*Close[shift+42]
      +0.001371504969476030*Close[shift+43]
      +0.004280506570424680*Close[shift+44]
      +0.004136269885199370*Close[shift+45]
      +0.001361513374633290*Close[shift+46]
      -0.001973820228459360*Close[shift+47]
      -0.003675699277522370*Close[shift+48]
      -0.002836788589562860*Close[shift+49]
      -0.000284631689719810*Close[shift+50]
      +0.002153387731732640*Close[shift+51]
      +0.002934855205103340*Close[shift+52]
      +0.001758962821343280*Close[shift+53]
      -0.000389897847025107*Close[shift+54]
      -0.002031006983868290*Close[shift+55]
      -0.002197277408694140*Close[shift+56]
      -0.000975033303736501*Close[shift+57]
      +0.000693883112457725*Close[shift+58]
      +0.001751056105124850*Close[shift+59]
      +0.001683817123497210*Close[shift+60]
      +0.000645916394658871*Close[shift+61]
      -0.001229513645906610*Close[shift+62]
      -0.005497165615453070*Close[shift+63]
      +0.001719892732445040*Close[shift+64];
      value2=
      0.210642090317950000*Close[shift+00]
      +0.271656355551084000*Close[shift+01]
      +0.271656355551084000*Close[shift+02]
      +0.210642090317950000*Close[shift+03]
      +0.113366214899538000*Close[shift+04]
      +0.017339655129830400*Close[shift+05]
      -0.044811701929405100*Close[shift+06]
      -0.059474537088348700*Close[shift+07]
      -0.035754954878029800*Close[shift+08]
      +0.002270804329963180*Close[shift+09]
      +0.029697524121816400*Close[shift+10]
      +0.033281042507046500*Close[shift+11]
      +0.015981183265287400*Close[shift+12]
      -0.007862943901791450*Close[shift+13]
      -0.022723234810281000*Close[shift+14]
      -0.021095992789986800*Close[shift+15]
      -0.006603314272564040*Close[shift+16]
      +0.009881836012723110*Close[shift+17]
      +0.017854024794657900*Close[shift+18]
      +0.013524194354160800*Close[shift+19]
      +0.001241377137939080*Close[shift+20]
      -0.010266977018020800*Close[shift+21]
      -0.013862391185810200*Close[shift+22]
      -0.008248135223019260*Close[shift+23]
      +0.001954191195740410*Close[shift+24]
      +0.009730937704226890*Close[shift+25]
      +0.010434675351580300*Close[shift+26]
      +0.004416791230436310*Close[shift+27]
      -0.003756477431473020*Close[shift+28]
      -0.008634197655553740*Close[shift+29]
      -0.007475256109987750*Close[shift+30]
      -0.001663522884800100*Close[shift+31]
      +0.004584004921651760*Close[shift+32]
      +0.007235217324080300*Close[shift+33]
      +0.004975877012459140*Close[shift+34]
      -0.000223061318466289*Close[shift+35]
      -0.004725162649865770*Close[shift+36]
      -0.005722101672782540*Close[shift+37]
      -0.002953057716881230*Close[shift+38]
      +0.001407739624700190*Close[shift+39]
      +0.004393595974558090*Close[shift+40]
      +0.004245548609330800*Close[shift+41]
      +0.001397484055608480*Close[shift+42]
      -0.002025967830578520*Close[shift+43]
      -0.003772809896144160*Close[shift+44]
      -0.002911735497357070*Close[shift+45]
      -0.000292151553936419*Close[shift+46]
      +0.002210279441029960*Close[shift+47]
      +0.003012392996694690*Close[shift+48]
      +0.001805433970046320*Close[shift+49]
      -0.000400198804275733*Close[shift+50]
      -0.002084665438964100*Close[shift+51]
      -0.002255328667062000*Close[shift+52]
      -0.001000793323845250*Close[shift+53]
      +0.000712215248254048*Close[shift+54]
      +0.001797318361302890*Close[shift+55]
      +0.001728302950591050*Close[shift+56]
      +0.000662981267470111*Close[shift+57]
      -0.001261996942755200*Close[shift+58]
      -0.005642398702623070*Close[shift+59]
      +0.001765331663815800*Close[shift+60];
      //----
      Rezalt=value2-value1;
      //----
      //---- +SSSSSSSSSSSSSSSS <<< Three colore code >>> SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS+
      trend=Rezalt-Ind_Buffer1[shift+1]-Ind_Buffer2[shift+1]-Ind_Buffer3[shift+1];
      if(trend>0.0)     {Ind_Buffer1[shift]=Rezalt; Ind_Buffer2[shift]=0;      Ind_Buffer3[shift]=0;}
        else{if(trend<0.0){Ind_Buffer1[shift]=0;      Ind_Buffer2[shift]=Rezalt; Ind_Buffer3[shift]=0;}
        else              {Ind_Buffer1[shift]=0;      Ind_Buffer2[shift]=0;      Ind_Buffer3[shift]=Rezalt;}}
      //---- +SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS+
      shift--;
     }
   return(0);
  }
//+------------------------------------------------------------------+



Sample





Analysis



Market Information Used:

Series array that contains close prices for each bar


Indicator Curves created:

Implements a curve of type DRAW_ARROW
Implements a curve of type DRAW_HISTOGRAM


Indicators Used:



Custom Indicators Used:

Order Management characteristics:

Other Features: