新人对MQL4和MQL5的任何问题,对算法和代码的帮助和讨论 - 页 121

 
var58:
你好。请告知如何在MQL4 EA的代码中规定开单的规则:市场上应该有一个具有一定魔力数字的订单;如果没有这样的订单,根据EA的主要算法,EA不会开任何东西。

这大概就是它的范围。

void OnTick()
{
  Comment( IsCount(ORDER_TYPE_BUY_STOP, 5) ); // type - тип, mg - magic
}

//------- Вернёт количество
int IsCount(int type, int mg) {
int p=0;
  for(int i=0; i<OrdersTotal(); i++) {
   if(OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) {
    if(OrderSymbol()==Symbol() && OrderMagicNumber()==mg) {
     if(OrderType()==type) {
      p++;
  }}}}
  return(p);
}
 

如何使用户能够填充一个数组

 
-Aleks-:

如何使用户能够填充一个数组

除了用户,还有谁可以填补?
 

问候,有一个指标可以在图表上画出订单的历史记录,代码是。

//+------------------------------------------------------------------+
//|                                                      history.mq4 |
//|                        Copyright 2017, MetaQuotes Software Corp. |
//|                                             https://www.mql5.com |
//+------------------------------------------------------------------+
#property copyright "Copyright 2017, MetaQuotes Software Corp."
#property link      "https://www.mql5.com"
#property version   "1.00"
#property strict
#property indicator_chart_window

extern int        MagicNumber                = 1110;
extern datetime   HistoryOrdersFromDateTime  = 0;
extern color      SellColor                  = clrRed;
extern color      BuyColor                   = clrBlue;
extern color      ProfitColor                = clrWhite;
extern bool       DeleteHistoryOrders        = false;


//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int OnInit()
  {
//--- indicator buffers mapping
  
//---
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+

void start()
{
   for(int i=OrdersHistoryTotal()-1; i>=0; i--)
   {
      if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY) && OrderMagicNumber()==MagicNumber && OrderSymbol()==Symbol() && OrderType()<=1)
      {
         if(HistoryOrdersFromDateTime<OrderCloseTime())
         {
            if((TimeCurrent()-OrderCloseTime())>60)
               HistoryOrders();
         }
      }
   }
}

void HistoryOrders()
{
   int CountOrders=0;
   double b=OrderOpenPrice(), d=OrderClosePrice(), lots=OrderLots(), Profit=0;
   datetime a=OrderOpenTime(), c=OrderCloseTime(), close_time;
   string Ticket=(string)OrderTicket(), type="Sell", symbol=OrderSymbol(), comment=OrderComment(), Background;
   color col=SellColor;
   if(OrderType()==0) {col=BuyColor; type="Buy";}

   //Расчет профита
   for(int i=OrdersHistoryTotal()-1; i>=0; i--)
   {
      if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY) && OrderMagicNumber()==MagicNumber && OrderSymbol()==Symbol() && OrderType()<=1)
      {
         close_time=OrderCloseTime();
         if(c<=close_time+60 && c>=close_time-60)
         {
            Profit+=OrderProfit()+OrderCommission()+OrderSwap();
            Ticket=(string)OrderTicket();
         }  
      }      
   }
  
   //Размер фона  
   for(int i=2; i<StringLen(DoubleToString(Profit,2)); i++)
      StringAdd(Background,"g");

   if(DeleteHistoryOrders==false)
   {
      //Начальная точка
      ObjectCreate("#"+Ticket+" "+type+" "+DoubleToString(lots,2)+" "+symbol+" at "+DoubleToString(b,Digits)+"\n"+comment,OBJ_ARROW,0,a,b);
      ObjectSet("#"+Ticket+" "+type+" "+DoubleToString(lots,2)+" "+symbol+" at "+DoubleToString(b,Digits)+"\n"+comment,OBJPROP_COLOR,col);
      ObjectSet("#"+Ticket+" "+type+" "+DoubleToString(lots,2)+" "+symbol+" at "+DoubleToString(b,Digits)+"\n"+comment,OBJPROP_ARROWCODE,1);
      
      //Линия  
      ObjectCreate("#"+Ticket+" "+DoubleToString(b,Digits)+" -> "+DoubleToString(d,Digits),OBJ_TREND,0,a,b,c,d);
      ObjectSet("#"+Ticket+" "+DoubleToString(b,Digits)+" -> "+DoubleToString(d,Digits),OBJPROP_COLOR,col);
      ObjectSet("#"+Ticket+" "+DoubleToString(b,Digits)+" -> "+DoubleToString(d,Digits),OBJPROP_WIDTH,1);
      ObjectSet("#"+Ticket+" "+DoubleToString(b,Digits)+" -> "+DoubleToString(d,Digits),OBJPROP_STYLE,STYLE_DOT);
      ObjectSet("#"+Ticket+" "+DoubleToString(b,Digits)+" -> "+DoubleToString(d,Digits),OBJPROP_RAY,0);
  
      //Конечная точка
      ObjectCreate("#"+Ticket+" "+type+" "+DoubleToString(lots,2)+" "+symbol+" at "+DoubleToString(b,Digits)+" close at "+DoubleToString(d,Digits),OBJ_ARROW,0,c,d);
      ObjectSet("#"+Ticket+" "+type+" "+DoubleToString(lots,2)+" "+symbol+" at "+DoubleToString(b,Digits)+" close at "+DoubleToString(d,Digits),OBJPROP_COLOR,col);
      ObjectSet("#"+Ticket+" "+type+" "+DoubleToString(lots,2)+" "+symbol+" at "+DoubleToString(b,Digits)+" close at "+DoubleToString(d,Digits),OBJPROP_ARROWCODE,3);

      //Фон профита
      ObjectCreate("#"+Ticket+" Background",OBJ_TEXT,0,c,d);
      ObjectSet("#"+Ticket+" Background",OBJPROP_ANCHOR,ANCHOR_LOWER);
      ObjectSetText("#"+Ticket+" Background",Background,10,"Webdings",col);
      ObjectSet("#"+Ticket+" Background",OBJPROP_PRICE1,d);
      ObjectSet("#"+Ticket+" Background",OBJPROP_TIME1,c+Period());

      //Профит
      ObjectCreate("#"+Ticket+" Profit: "+DoubleToString(Profit,2),OBJ_TEXT,0,c,d);
      ObjectSet("#"+Ticket+" Profit: "+DoubleToString(Profit,2),OBJPROP_ANCHOR,ANCHOR_LOWER);
      ObjectSetText("#"+Ticket+" Profit: "+DoubleToString(Profit,2),DoubleToString(Profit,2),10,"Arial",ProfitColor);
      ObjectSet("#"+Ticket+" Profit: "+DoubleToString(Profit,2),OBJPROP_PRICE1,d);
      ObjectSet("#"+Ticket+" Profit: "+DoubleToString(Profit,2),OBJPROP_TIME1,c+Period());
   } else ObjectsDeleteAll(0, "#"+Ticket+" ");  
}

void OnDeinit(const int reason)
{
   for(int i=0; i<OrdersHistoryTotal(); i++)
   {
      DeleteHistoryOrders=true;
      if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY) && OrderMagicNumber()==MagicNumber && OrderSymbol()==Symbol())
         HistoryOrders();
   }
}

单一交易的指标绘制正确(线>背景>利润),但在显示关闭的订单集时,有一个小的 "错误"(截图附后),线是叠加在背景和利润上(线(1)>背景>利润>线(2)>线(3)>线(4) . .).

它应该是这样的:(行(1)>行(2)>行(3)>行(4) . .>fon>profit)。各种篡改都没有成功,请帮助我解决这个问题。

附加的文件:
 
Vitaly Muzichenko:
除了用户,还有谁可以填写呢?

我是说如何通过设置来填写。比方说,通过一个字符串,然后把它的值塞到一个数组中......

 
-Aleks-:

我是说如何通过设置来填写。比方说通过一个字符串,然后把它的值放到一个数组中...

这样
StringToCharArray - Преобразование данных - Справочник MQL4
StringToCharArray - Преобразование данных - Справочник MQL4
  • docs.mql4.com
StringToCharArray - Преобразование данных - Справочник MQL4
 
Vitaly Muzichenko:

这大概就是它的范围。

void OnTick()
{
  Comment( IsCount(ORDER_TYPE_BUY_STOP, 5) ); // type - тип, mg - magic
}

//------- Вернёт количество
int IsCount(int type, int mg) {
int p=0;
  for(int i=0; i<OrdersTotal(); i++) {
   if(OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) {
    if(OrderSymbol()==Symbol() && OrderMagicNumber()==mg) {
     if(OrderType()==type) {
      p++;
  }}}}
  return(p);
}
ORDER_TYPE_BUY_STOP 在MQL4编辑器中被突出显示,在MQL4帮助中没有。问题:它在MQL4中是否有效,它是否对应于OP_BUYSTOP类型?我只是还没有时间去检查它。
 
Vitaly Muzichenko:

这大概就是它的范围。

void OnTick()
{
  Comment( IsCount(ORDER_TYPE_BUY_STOP, 5) ); // type - тип, mg - magic
}

//------- Вернёт количество
int IsCount(int type, int mg) {
int p=0;
  for(int i=0; i<OrdersTotal(); i++) {
   if(OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) {
    if(OrderSymbol()==Symbol() && OrderMagicNumber()==mg) {
     if(OrderType()==type) {
      p++;
  }}}}
  return(p);
}

Vitaly Muzichenko:

Примерно так можно:

void OnTick()
{
  Comment( IsCount(ORDER_TYPE_BUY_STOP, 5) ); // type - тип, mg - magic
}

//------- Вернёт количество
int IsCount(int type, int mg) {
int p=0;
  for(int i=0; i<OrdersTotal(); i++) {
   if(OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) {
    if(OrderSymbol()==Symbol() && OrderMagicNumber()==mg) {
     if(OrderType()==type) {
      p++;
  }}}}
  return(p);
}

Спасибо большое, попробую. 

 
Vitaly Muzichenko:
它看起来像这样

谢谢你!

 
Artyom Trishkin:
ORDER_TYPE_BUY_STOP 在MQL4编辑器中被突出显示,但在MQL4帮助中没有。问题:它在MQL4中是否有效,它对应于OP_BUYSTOP类型?我只是还没有时间去检查它。

是的,它100%有效,这是我现在唯一的写作方式。现在,很多事情都从 "五 "迁移到了 "四"。

甚至这个也可以,尽管编译器曾经发誓说这是一条趋势线

    ObjectSetInteger(chart_ID,nm,OBJPROP_TIME,t1);
    ObjectSetDouble(chart_ID,nm,OBJPROP_PRICE,p1);
    ObjectSetInteger(chart_ID,nm,OBJPROP_TIME,1,t2);
    ObjectSetDouble(chart_ID,nm,OBJPROP_PRICE,1,p2);
原因: