国际黄金圈
加入本圈
收藏本贴

BollTrade

楼主  收藏   举报   帖子创建时间:  2019-05-05 05:15 回复：0 关注量：127
XAUUSDM30.png

  1. //+-----------+
  2. //| TwoPerBar |
  3. //+-----------+
  4. #property copyright "Ron Thompson"
  5. #property link      "http://www.lightpatch.com/forex/"

  7. #property indicator_chart_window
  8. #property indicator_buffers 2
  9. #property indicator_color1 DodgerBlue
  10. #property indicator_color2 Magenta

  12. extern double BDistance    =      14;    // plus how much
  13. extern int    BPeriod      =      15;    // Bollinger period
  14. extern int    Deviation    =       2;    // Bollinger deviation

  16. //---- buffers
  17. double val1[];
  18. double val2[];

  20. //+----------------+
  21. //| Custom DE-init |
  22. //+----------------+
  23. // Called onCE when EA is removed from chart

  25. int deinit()
  26.   {
  27.    int    i;
  28.    string o;

  30.    //remove the old objects
  31.    for(i=0; i<Bars; i++)
  32.      {
  33.       o=DoubleToStr(i,0);
  34.       ObjectDelete("myx"+o);
  35.      }
  36.    Print("DE-Init happened ",CurTime());
  37.    Comment(" ");
  38.   }



  42. //+------------------------------------------------------------------+
  43. //| Custom indicator initialization function                         |
  44. //+------------------------------------------------------------------+
  45. int init()
  46.   {
  47.    IndicatorBuffers(2);
  48.    
  49.    SetIndexStyle(0,DRAW_ARROW);
  50.    SetIndexArrow(0,233);
  51.    SetIndexBuffer(0,val1);
  52.    
  53.    SetIndexStyle(1,DRAW_ARROW);
  54.    SetIndexArrow(1,234);
  55.    SetIndexBuffer(1,val2);
  56.   }
  57.   
  58.   
  59. //+-----+
  60. //| TPB |
  61. //+-----+
  62. int start()
  63.   {   
  64.    
  65.    int i;
  66.    int mybars=2000;

  68.    double bup=iBands(Symbol(),0,BPeriod,Deviation,0,PRICE_OPEN,MODE_UPPER,0);
  69.    double bdn=iBands(Symbol(),0,BPeriod,Deviation,0,PRICE_OPEN,MODE_LOWER,0);

  71.       
  72.    for (i=mybars; i>=0; i--)
  73.      {
  74.       bup=iBands(Symbol(),0,BPeriod,Deviation,0,PRICE_OPEN,MODE_UPPER,i);
  75.       bdn=iBands(Symbol(),0,BPeriod,Deviation,0,PRICE_OPEN,MODE_LOWER,i);

  77.       if( High[i]>=bup+(14*Point) )
  78.         {
  79.          val2[i]=bup+(15*Point);         
  80.          //ObjectDelete ("myx"+DoubleToStr(objtick,0));
  81.          //ObjectCreate ("myx"+DoubleToStr(objtick,0), OBJ_TEXT, 0, Time[i], High[i]+(7*Point));
  82.          //ObjectSetText("myx"+DoubleToStr(objtick,0),"X",15,"Arial",Red);
  83.          //objtick++;
  84.         }
  85.       if( Low[i]<=bdn-(14*Point) )
  86.         {
  87.          val1[i]=bdn-(15*Point);         
  88.          //ObjectDelete ("myx"+DoubleToStr(objtick,0));
  89.          //ObjectCreate ("myx"+DoubleToStr(objtick,0), OBJ_TEXT, 0, Time[i], High[i]+(7*Point));
  90.          //ObjectSetText("myx"+DoubleToStr(objtick,0),"X",15,"Arial",Red);
  91.          //objtick++;
  92.         }

  94.      }//for
  95.    
  96.    //Comment(DoubleToStr(mybars,0)+" bars with usable ="+DoubleToStr(objtick,0)+" and unusable="+DoubleToStr(noobj,0)+" maxTR="+DoubleToStr(maxTR,4));
  97.   
  98.   }//start
  99.   
打赏
分享到：

本文作者

Ta的圈贴

更多

最新创建圈子

最新话题

我要发帖