MT4 Crocodile鳄鱼指标交易系统

时间：2020/03/30 23:36 分类：技术指标人气：2130
鳄鱼交易系统主图用均线MA金叉死叉区分上涨及下跌行情、用SR做止损水平、用BBands Stop指标创建两种颜色的箭头给出做多和做空入场信号。
副图集合了熊牛、RSI、KD三个指标，也可以说是经典集合。
从交易的实际需求可以感悟到系统作者非凡的构建思路。
这里整理的鳄鱼交易系统可能会与原版有所出入，希望对您学习此类型的交易系统有所帮助。
压缩包目录结构：
必须读我.txt
MQL4/
MQL4/Indicators/
MQL4/Indicators/FOREX STRATEGIST BB.mq4
MQL4/Indicators/FOREX STRATEGIST DI.mq4
MQL4/Indicators/FOREX STRATEGIST MA.mq4
MQL4/Indicators/FOREX STRATEGIST RSI.mq4
MQL4/Indicators/FOREX STRATEGIST SR.mq4
MQL4/Indicators/FOREX STRATEGIST STOCH.mq4
MQL4/Indicators/FOREX STRATEGIST STOPS.mq4
templates/
templates/Forex Crocodile.tpl
策汇在线.url

MQL4/Indicators/FOREX STRATEGIST BB.mq4代码片段：
#property copyright "Copyright 2013, Forex Strategies Mentor."
#property link      "http://www.forexstrategist.com/"

#property indicator_chart_window
#property indicator_buffers 6
#property indicator_color1 Lime
#property indicator_color2 Gold
#property indicator_color3 Lime
#property indicator_color4 Gold
#property indicator_color5 Lime
#property indicator_color6 Gold

extern int Length = 8;
extern int Deviation = 1;
extern double MoneyRisk = 1.0;
extern int Signal = 1;
extern int Line = 1;
extern int Nbars = 1000;
double G_ibuf_104[];
double G_ibuf_108[];
double G_ibuf_112[];
double G_ibuf_116[];
double G_ibuf_120[];
double G_ibuf_124[];
extern bool SoundON = TRUE;
bool Gi_132 = FALSE;
bool Gi_136 = FALSE;

// E37F0136AA3FFAF149B351F6A4C948E9
int init() {
   SetIndexBuffer(0, G_ibuf_104);
   SetIndexBuffer(1, G_ibuf_108);
   SetIndexBuffer(2, G_ibuf_112);
   SetIndexBuffer(3, G_ibuf_116);
   SetIndexBuffer(4, G_ibuf_120);
   SetIndexBuffer(5, G_ibuf_124);
   SetIndexStyle(0, DRAW_ARROW, STYLE_SOLID, 0);
   SetIndexStyle(1, DRAW_ARROW, STYLE_SOLID, 0);
   SetIndexStyle(2, DRAW_ARROW, STYLE_SOLID, 1);
   SetIndexStyle(3, DRAW_ARROW, STYLE_SOLID, 1);
   SetIndexStyle(4, DRAW_LINE);
   SetIndexStyle(5, DRAW_LINE);
   SetIndexArrow(0, 159);
   SetIndexArrow(1, 159);
   SetIndexArrow(2, 233);
   SetIndexArrow(3, 234);
   IndicatorDigits(MarketInfo(Symbol(), MODE_DIGITS));
   string Ls_0 = "BBands Stop(" + Length + "," + Deviation + ")";
   IndicatorShortName(Ls_0);
   SetIndexLabel(0, "UpTrend Stop");
   SetIndexLabel(1, "DownTrend Stop");
   SetIndexLabel(2, "UpTrend Signal");
   SetIndexLabel(3, "DownTrend Signal");
   SetIndexLabel(4, "UpTrend Line");
   SetIndexLabel(5, "DownTrend Line");
   SetIndexDrawBegin(0, Length);
   SetIndexDrawBegin(1, Length);
   SetIndexDrawBegin(2, Length);
   SetIndexDrawBegin(3, Length);
   SetIndexDrawBegin(4, Length);
   SetIndexDrawBegin(5, Length);
   return (0);
}

// EA2B2676C28C0DB26D39331A336C6B92
int start() {
   int Li_8;
   double Lda_12[25000];
   double Lda_16[25000];
   double Lda_20[25000];
   double Lda_24[25000];
   for (int shift_4 = Nbars; shift_4 >= 0; shift_4--) {
      G_ibuf_104[shift_4] = 0;
      G_ibuf_108[shift_4] = 0;
      G_ibuf_112[shift_4] = 0;
      G_ibuf_116[shift_4] = 0;
      G_ibuf_120[shift_4] = EMPTY_VALUE;
      G_ibuf_124[shift_4] = EMPTY_VALUE;
   }
   for (shift_4 = Nbars - Length - 1; shift_4 >= 0; shift_4--) {
      Lda_12[shift_4] = iBands(NULL, 0, Length, Deviation, 0, PRICE_CLOSE, MODE_UPPER, shift_4);
      Lda_16[shift_4] = iBands(NULL, 0, Length, Deviation, 0, PRICE_CLOSE, MODE_LOWER, shift_4);
      if (Close[shift_4] > Lda_12[shift_4 + 1]) Li_8 = 1;
      if (Close[shift_4] < Lda_16[shift_4 + 1]) Li_8 = -1;
      if (Li_8 > 0 && Lda_16[shift_4] < Lda_16[shift_4 + 1]) Lda_16[shift_4] = Lda_16[shift_4 + 1];
      if (Li_8 < 0 && Lda_12[shift_4] > Lda_12[shift_4 + 1]) Lda_12[shift_4] = Lda_12[shift_4 + 1];
      Lda_20[shift_4] = Lda_12[shift_4] + (MoneyRisk - 1.0) / 2.0 * (Lda_12[shift_4] - Lda_16[shift_4]);
      Lda_24[shift_4] = Lda_16[shift_4] - (MoneyRisk - 1.0) / 2.0 * (Lda_12[shift_4] - Lda_16[shift_4]);
      if (Li_8 > 0 && Lda_24[shift_4] < Lda_24[shift_4 + 1]) Lda_24[shift_4] = Lda_24[shift_4 + 1];
      if (Li_8 < 0 && Lda_20[shift_4] > Lda_20[shift_4 + 1]) Lda_20[shift_4] = Lda_20[shift_4 + 1];
      if (Li_8 > 0) {
         if (Signal > 0 && G_ibuf_104[shift_4 + 1] == -1.0) {
            G_ibuf_112[shift_4] = Lda_24[shift_4];
            G_ibuf_104[shift_4] = Lda_24[shift_4];
            if (Line > 0) G_ibuf_120[shift_4] = Lda_24[shift_4];
            if (SoundON == TRUE && shift_4 == 0 && (!Gi_132)) {
               Alert("BBands Stop Alert Buy --> ", Symbol(), "@TF", Period());
               Gi_132 = TRUE;
               Gi_136 = FALSE;
            }
         } else {
            G_ibuf_104[shift_4] = Lda_24[shift_4];
            if (Line > 0) G_ibuf_120[shift_4] = Lda_24[shift_4];
            G_ibuf_112[shift_4] = -1;
         }
         if (Signal == 2) G_ibuf_104[shift_4] = 0;
         G_ibuf_116[shift_4] = -1;
         G_ibuf_108[shift_4] = -1.0;
         G_ibuf_124[shift_4] = EMPTY_VALUE;
      }
      if (Li_8 < 0) {
         if (Signal > 0 && G_ibuf_108[shift_4 + 1] == -1.0) {
            G_ibuf_116[shift_4] = Lda_20[shift_4];
            G_ibuf_108[shift_4] = Lda_20[shift_4];
            if (Line > 0) G_ibuf_124[shift_4] = Lda_20[shift_4];
            if (SoundON == TRUE && shift_4 == 0 && (!Gi_136)) {
               Alert("Bbands Stop Alert Sell --> ", Symbol(), "@TF", Period());
               Gi_136 = TRUE;
               Gi_132 = FALSE;
            }
         } else {
            G_ibuf_108[shift_4] = Lda_20[shift_4];
            if (Line > 0) G_ibuf_124[shift_4] = Lda_20[shift_4];
            G_ibuf_116[shift_4] = -1;
         }
         if (Signal == 2) G_ibuf_108[shift_4] = 0;
         G_ibuf_112[shift_4] = -1;
         G_ibuf_104[shift_4] = -1.0;
         G_ibuf_120[shift_4] = EMPTY_VALUE;
      }
   }
   return (0);
}