编写免费的EA

Iurii Tokman 2021.04.18 18:14 #81

Игорь Владимирович:

请为MT4编写一个非常简短的EA

1.货币和时间框架（活动图表）

2) 交易开始（通过蜡烛的收盘）。

3.手数（可在设置中或在专家顾问中改变）。

4.采取停止措施不是必须的，但如果你能在设置中加入它，将非常有用。

交易开盘条件（买入）

1.低点和收盘烛台是相同的（例如：低点-58754收盘-58754）。

开启交易的条件（卖出）

1.高点和收盘烛台相同（例如：高点-97564收盘-97564）。

注意：该专家顾问（交易系统的补充）不能在真实账户上进行交易。

//+------------------------------------------------------------------+
//|                                           Игорь Владимирович.mq4 |
//|                                               Yuriy Tokman (YTG) |
//|                       https://www.mql5.com/ru/users/satop/seller |
//+------------------------------------------------------------------+
#property copyright "Yuriy Tokman (YTG)"
#property link      "https://www.mql5.com/ru/users/satop/seller"
#property version   "1.00"
#property strict

input double Lot = 0.1;
input int TP = 0;
input int SL = 0;

//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
  {
//---
//---
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
//---
  }
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
  {
   double sl = 0, tp = 0, ll = Lot;
   bool op = 0;
//---
   if(New())
     {
      if(MathAbs(NormalizeDouble(Low[1] - Close[1], Digits())) < Point())
        {
         if(TP > 0)
            tp = NormalizeDouble(Ask + TP * Point(), Digits());
         else
            tp = 0;
         if(SL > 0)
            sl = NormalizeDouble(Ask - SL * Point(), Digits());
         else
            sl = 0;
         op = OrderSend(Symbol(), OP_BUY, ll, NormalizeDouble(Ask, Digits()), 100, sl, tp);
        }
      if(MathAbs(NormalizeDouble(High[1] - Close[1], Digits())) < Point())
        {
         if(TP > 0)
            tp = NormalizeDouble(Bid - TP * Point(), Digits());
         else
            tp = 0;
         if(SL > 0)
            sl = NormalizeDouble(Bid + SL * Point(), Digits());
         else
            sl = 0;
         op = OrderSend(Symbol(), OP_SELL, ll, NormalizeDouble(Bid, Digits()), 100, sl, tp);
        }
     }
  }
//+------------------------------------------------------------------+
bool New(int TF = 0)
  {
   static datetime NewTime = 0;
   if(NewTime != iTime(Symbol(), TF, 0))
     {
      NewTime = iTime(Symbol(), TF, 0);
      return(true);
     }
   return(false);
  }
//+------------------------------------------------------------------+