节点 › EA入门学院 › braintrading(智慧趋势)标系统(H1相当准确)

紫竹青荷 发表于 2013-8-19 16:47:33

茉莉花开 发表于 2013-8-26 16:35:20

latitude43 发表于 2013-9-11 02:14:19

？？？？？？？？？

大侠是我 发表于 2013-9-15 21:11:15

//+------------------------------------------------------------------+
//|                                                Combo_Right.mq4 |
//||                              Copyright 2010,fx68com@gmail.com||
//||                                              http://www.fx68.com ||
//+------------------------------------------------------------------+
#property copyright "Copyright 2010,fx68com@gmail.com"
#property link      "http://www.fx68.com"
//---- input parameters
extern double       tp1 = 50;
extern double       sl1 = 50;
extern int          p1 = 10;
extern int          x12 = 100;
extern int          x22 = 100;
extern int          x32 = 100;
extern int          x42 = 100;
extern double       tp2 = 50;
extern double       sl2 = 50;
extern int          p2 = 20;
extern int          x13 = 100;
extern int          x23 = 100;
extern int          x33 = 100;
extern int          x43 = 100;
extern double       tp3 = 50;
extern double       sl3 = 50;
extern int          p3 = 20;
extern int          x14 = 100;
extern int          x24 = 100;
extern int          x34 = 100;
extern int          x44 = 100;
extern int          p4 = 20;
extern int          pass = 1;
extern double       lots = 0.1;
extern int          mn = 888;
static int          prevtime = 0;
static double       sl = 10;
static double       tp = 10;
//+------------------------------------------------------------------+
//| expert start function                                          |
//+------------------------------------------------------------------+
int start()
{
   if (Time == prevtime) return(0);
   prevtime = Time;
   
   if (! IsTradEAllowed()) {
      again();
      return(0);
   }
//----
   int total = OrdersTotal();
   for (int i = 0; i < total; i++) {
      OrderSelect(i, SELECT_BY_POS, MODE_TRADES);
      if (OrderSymbol() == Symbol() && OrderMagicNumber() == mn) {
         return(0);
      }
   }
   
   sl = sl1;
   tp = tp1;
   
   int ticket = -1;
   
   RefreshRates();
   
   if (Supervisor() > 0) {
      ticket = OrderSend(Symbol(), OP_BUY, lots, NormalizeDouble(Ask,Digits), 1, NormalizeDouble(Bid - sl * Point,Digits), NormalizeDouble(Bid + tp * Point,Digits), WindowExpertName(), mn, 0, Blue);
      if (ticket < 0) {
         again();      
      }
   } else {
      ticket = OrderSend(Symbol(), OP_SELL, lots, NormalizeDouble(Bid,Digits), 1, NormalizeDouble(Ask + sl * Point,Digits),NormalizeDouble(Ask - tp * Point,Digits), WindowExpertName(), mn, 0, Red);
      if (ticket < 0) {
         again();
      }
   }
//-- Exit --
   return(0);
}
//+--------------------------- getLots ----------------------------------+

double Supervisor() {
   if (pass == 4) {
      if (perceptron3() > 0) {
         if (perceptron2() > 0) {
            sl = sl3;
            tp = tp3;
            return(1);
         }
       } else {
         if (perceptron1() < 0) {
            sl = sl2;
            tp = tp2;
            return(-1);
         }
      }
      return(basicTradingSystem());
   }
   if (pass == 3) {
      if (perceptron2() > 0) {
         sl = sl3;
         tp = tp3;
         return(1);
       } else {
         return(basicTradingSystem());
       }
   }
   if (pass == 2) {
      if (perceptron1() < 0) {
         sl = sl2;
         tp = tp2;
         return(-1);
       } else {
         return(basicTradingSystem());
       }
   }
   return(basicTradingSystem());
}
double perceptron1()   {
   double       w1 = x12 - 100;
   double       w2 = x22 - 100;
   double       w3 = x32 - 100;
   double       w4 = x42 - 100;
   double a1 = Close - Open;
   double a2 = Open - Open;
   double a3 = Open - Open;
   double a4 = Open - Open;
   return(w1 * a1 + w2 * a2 + w3 * a3 + w4 * a4);
}
double perceptron2()   {
   double       w1 = x13 - 100;
   double       w2 = x23 - 100;
   double       w3 = x33 - 100;
   double       w4 = x43 - 100;
   double a1 = Close - Open;
   double a2 = Open - Open;
   double a3 = Open - Open;
   double a4 = Open - Open;
   return(w1 * a1 + w2 * a2 + w3 * a3 + w4 * a4);
}
double perceptron3()   {
   double       w1 = x14 - 100;
   double       w2 = x24 - 100;
   double       w3 = x34 - 100;
   double       w4 = x44 - 100;
   double a1 = Close - Open;
   double a2 = Open - Open;
   double a3 = Open - Open;
   double a4 = Open - Open;
   return(w1 * a1 + w2 * a2 + w3 * a3 + w4 * a4);
}
double basicTradingSystem() {
   return(iCCI(Symbol(), 0, p1, PRICE_OPEN, 0));
}
void again() {
   prevtime = Time;
   Sleep(30000);
}

竹乐居士 发表于 2013-9-25 13:01:07

红红火火红红火火好

苹果风 发表于 2013-9-29 19:36:29

为网络下载所得，不敢独享

宝隆利昌 发表于 2013-9-29 22:19:16

没指标没内容啊

追火车 发表于 2013-10-13 17:52:14

真是好东西啊，顶顶顶。

我行我素 发表于 2013-11-16 00:57:17

谢谢分享！{:soso_e100:}

净心参悟 发表于 2013-12-3 22:22:29

在哪里，是不是删除了么

查看完整版本: braintrading(智慧趋势)标系统(H1相当准确)