多币种顾问问题

Rid 2007.08.27 12:43 #21

谢谢你，KOMPOST。开始做了!

但是，另一个问题来了!我的专家顾问有单独的开仓块和尾随条。

int start()
  {
// ЗАДАЕМ ПЕРЕМЕННЫЕ ДЛЯ ВСЕХ ПАР
 
 
 // ОТКРЫВАЕМ ПОЗИЦИИ ПО ВСЕМ ПАРАМ
 
//----------------------------------------------
// -------- ТРЕЙЛИНГ СТОПЫ -----------------------
if (UseTrailing_ == True)                                             {                  
for (int r=0; r<OrdersTotal(); r++)                                    {
    if (OrderSelect(r, SELECT_BY_POS, MODE_TRADES))                     {
//--------------------------------------------------
     if (OrderSymbol()=="GBPUSD" && OrderMagicNumber()==MagicGBPUSD)     
      {  Трейлинг по фунту }
//--------------------------------------------------
     if (OrderSymbol()=="EURUSD" && OrderMagicNumber()==MagicEURUSD)     
      {  Трейлинг по евро }
//--------------------------------------------------------------------
                                                                       }
                                                                      }
                                                                     }
//----------------------------------------------------------------------
   } 
  return(0);

HOWEVER，我把一段代码（例如为磅数）放入拖网中--

double bid_GBP = MarketInfo("GBPUSD", MODE_BID);
 double ask_GBP = MarketInfo("GBPUSD", MODE_ASK);
 double point_GBP =MarketInfo("GBPUSD",MODE_POINT);

但我在英镑上建仓时已经使用了这一点。现在我可以再次使用同样的跟踪止损吗？或者，我是否需要为英镑重新输入同样的尾部切片，但数值的名称略有不同？

Andrey Khatimlianskii 2007.08.27 19:01 #22

rid:
但是，我把一段代码（例如为英镑）放到了尾部的--

double bid_GBP = MarketInfo("GBPUSD", MODE_BID);
 double ask_GBP = MarketInfo("GBPUSD", MODE_ASK);
 double point_GBP =MarketInfo("GBPUSD",MODE_POINT);

但我之前在英镑上建仓时已经用过这一片了。现在我可以再次在拖网中使用同一件作品吗？还是说我必须在拖网中重新输入同一块的这些数值的名称略有不同的英镑？

你可以在start()函数的最开始插入 "this bit"，并在所有块中使用变量值。

Rid 2007.08.27 19:17 #23

非常感谢您的回答!小册子!

最后一个重要问题。(我怕听起来太打扰，但......) --

对于第三对，我（由于各种原因）调用了尾随库。例如，从librares文件夹中。

如何在这种情况下？是否有必要在库内指定相同的东西来进行这对

//RefreshRates();
 double bid = MarketInfo("USDCHF", MODE_BID);
 double ask = MarketInfo("USDCHF", MODE_ASK);
 double point =MarketInfo("USDCHF",MODE_POINT);

并相应地改变符号和魔法。

... .... .....
if (OrderSymbol()==Symbol() && OrderMagicNumber()==MAGIC) {
        if (OrderType()==OP_BUY) {
          if (!ProfitTrailing || (Bid-OrderOpenPrice())>TrailingStop*Point) {
            if (OrderStopLoss()<Bid-(TrailingStop+TrailingStep-1)*Point) {
              ModifyStopLoss(Bid-TrailingStop*Point, clModifyBuy); 
 .... ... ...

Andrey Khatimlianskii 2007.08.27 20:18 #24

rid:

对于第三对，我（出于各种原因）称之为尾随库。例如，从libraris文件夹中。
如何在这种情况下？我需要在库内设置类似的东西吗？

这取决于图书馆的情况。如果它知道如何处理非本地字符顺序，就不会有问题。如果不这样做，就会很糟糕;)

Rid 2007.08.27 21:12 #25

这是金的三级输出库。现在我已经进入了代码。我没有在各处设置符号，而是设置了对子的名称，也没有设置魔力，而是设置了我对子的魔力。

//+------------------------------------------------------------------+
//|                                                  a-TLE_v.1.6.mqh |
//|                                           Ким Игорь В. aka KimIV |
//|                                              http://www.kimiv.ru |
//|                                                                  |
//|  v.1.6  Три уровня переноса стопа.                               |
//| 23.11.2005 v.a1.6  Реализация в виде универсального модуля.      |
//|                                                                  |
//|   Для использования добавить строку в модуле start               |
//|   if (UseTrailing) TrailingPositions();                          |
//+------------------------------------------------------------------+
 
//------- Внешние параметры модуля - уровни переноса--------------------
... ... ... ...
 
//+------------------------------------------------------------------+
//| Сопровождение позиций                                            |
//+------------------------------------------------------------------+
void TrailingPositions()                                  {
  for (int i=0; i<OrdersTotal(); i++)                       {
    if (OrderSelect(i, SELECT_BY_POS, MODE_TRADES))           {
      if (OrderSymbol()==Symbol() && OrderMagicNumber()==MAGIC) {
        ThreeLevelSystemOfOutput();
      }
    }
  }
}
 
//+------------------------------------------------------------------+
//| Трёхуровневая система выходов                                    |
//+------------------------------------------------------------------+
void ThreeLevelSystemOfOutput()                      {
   int sp=MarketInfo(OrderSymbol(), MODE_SPREAD);
  if ( бла-бла-бла)                                  {
    SimpleTrailingPositions();
                                                      }
                                                      }
 
//+------------------------------------------------------------------+
//| Сопровождение позиции простым тралом                             |
//+------------------------------------------------------------------+
void SimpleTrailingPositions() {
  double pBid, pAsk, pp=MarketInfo(OrderSymbol(), MODE_POINT);
... ... ...
   
//+------------------------------------------------------------------+
//| Перенос уровня StopLoss                                          |
//| Параметры:                                                       |
//|   ldStopLoss - уровень StopLoss                                  |
//+------------------------------------------------------------------+
... ... ...
//+------------------------------------------------------------------+
//| Перенос уровня StopLoss                                          |
//| Параметры:                                                       |
//|   ldStopLoss - уровень StopLoss                                  |
//+------------------------------------------------------------------+
void ModifyStopLossInPoint(int pp) {
    double ldSL=0, mp=MarketInfo(OrderSymbol(), MODE_POINT);  
 ... ... ...  
//+------------------------------------------------------------------+
//| Возвращает профит позиции в пунктах                              |
//+------------------------------------------------------------------+
int ProfitPosition() {
  double pBid, pAsk, pp=MarketInfo(OrderSymbol(), MODE_POINT);
  double pr=0;
 
  if (OrderType()==OP_BUY) {
    pBid=MarketInfo(OrderSymbol(), MODE_BID);
    pr=(pBid-OrderOpenPrice())/pp;
  }
  if (OrderType()==OP_SELL) {
    pAsk=MarketInfo(OrderSymbol(), MODE_ASK);
    pr=(OrderOpenPrice()-pAsk)/pp;
  }
  return(MathRound(pr));
}
 
//+------------------------------------------------------------------+
//| Возвращает StopLoss позиции в пунктах                            |
//+------------------------------------------------------------------+
int StopLossInPoint() {
  double pp=MarketInfo(OrderSymbol(), MODE_POINT);
  double sp=0;
 
  if (OrderType()==OP_BUY) {
    sp=(OrderStopLoss()-OrderOpenPrice())/pp;
  }
  if (OrderType()==OP_SELL) {
    sp=(OrderOpenPrice()-OrderStopLoss())/pp;
  }
  if (OrderStopLoss()==0) sp=-OrderOpenPrice()/pp;
  return(MathRound(sp));
}
//+------------------------------------------------------------------+

你可以看到它有点模糊，所有不同的

MarketInfo(OrderSymbol(), MODE_POINT);
MarketInfo(OrderSymbol(), MODE_BID);
MarketInfo(OrderSymbol(), MODE_ASK);

而这几乎是在每一次行动中都是如此!

但我只改变了符号（我已经指定了一对）和最开始的魔术师！这是不可能的。我已经开始在1分钟的时间框架内在线使用专家顾问。我一直在等待获利，并停止了该货币对的价格波动。一切似乎都在正常工作。我是按照这个图书馆的算法来的。

但我还没有在另外两对组合上获利（用自己的拖网）。

我明天将在网上观看。

Andrey Khatimlianskii 2007.08.27 21:23 #26

rid:

这是金的三级输出库。现在我已经进入了代码。我没有在各处设置符号，而是设置了对子的名称，也没有设置魔力，而是设置了我对子的魔力。

...

你可以看到它有点模糊，所有不同的

MarketInfo(OrderSymbol(), MODE_POINT);
MarketInfo(OrderSymbol(), MODE_BID);
MarketInfo(OrderSymbol(), MODE_ASK);

该库的编写能力很强--没有与图表工具的联系。
因此，它可以不加修改地使用。

Rid 2007.08.27 21:42 #27

再次感谢你，Komposter，感谢你的回答。

现在我在网上等待我的专家顾问的所有三对的利润。看来，每一对都是根据其拖网模式工作的!包括与图书馆通话的那一对!

vassav 2007.08.27 21:52 #28

komposter:

摆脱。

这是金的三级输出库。现在我已经进入了代码。我没有在各处设置符号，而是设置了对子的名称，也没有设置魔力，而是设置了我对子的魔力。

...

你可以看到它有点模糊，所有不同的

MarketInfo(OrderSymbol(), MODE_POINT);
MarketInfo(OrderSymbol(), MODE_BID);
MarketInfo(OrderSymbol(), MODE_ASK);

该库的编写能力很强--没有与图表工具的联系。
因此，它可以不加修改地使用。

我将抛出我自己的版本......削减代码。

extern int    MagicNum = 400400, Stop = 33;
extern double Lot1 = 0.3;
int LotStop [8] = {28,33,43,33,33,33,33,33}; //можно юзать просто Stop
 
//| Start function                                                   |
//+------------------------------------------------------------------+
void start()
{ 
 int i, SymPermitted = 3;
 string Symbols[8] = {"EURUSD","GBPUSD","USDJPY","EURJPY","USDCHF","Reserved","Reserved","Reserved"};
 
  // Ma defence
  if (Bars<100)
    return(0);  
  
  for (i=0; i < SymPermitted; i++)
  {
    // Compile/reload/crash config defence
    if      (Symbols[i] == "EURUSD") { Stop = 28; Lot1 = 0.6; }
    else if (Symbols[i] == "GBPUSD") { Stop = 33; Lot1 = 0.2; }
    else if (Symbols[i] == "USDJPY") { Stop = 43; Lot1 = 0.6; }
    Sleep (1000); // Просто так
    Checking (Symbols[i], i);
  }
  return (0);
}
 
void Checking (string Sym, int LotStopIndex)
{
 int Total, LotStop = LotStop[LotStopIndex], i, j, Tic = 0;
 double VPoint, VAsk, VBid;
 
   Total = OrdersTotal();
 
   // Check opened
   for (i=0; i<Total; i++)
   {
     if (OrderSelect (i, SELECT_BY_POS, MODE_TRADES) == true)
     {  
       if (OrderSymbol() == Sym && OrderMagicNumber() == MagicNum)
         return (0);
     }
   }
   
   VPoint = MarketInfo(Sym, MODE_POINT);
   //... кучка кода расчётов
   Total = HistoryTotal();
   
   if (Total == 0)
   { // Reset to default
     LotSize = Lot1;
     LotStop[LotStopIndex] = Stop;
   }
   
   for (i=0; i<Total; i++)
   {
     if (OrderSelect (Total-i-1, SELECT_BY_POS, MODE_HISTORY) == true)
     { 
       if (OrderSymbol() == Sym && OrderMagicNumber() == MagicNum)
       { // Was loss (Alpari иногда выбивает положительные лосы и отрицательные профиты... мистика
         if (((OrderProfit ()) < 0) || (OrderClosePrice() == OrderStopLoss()))
         { ..код
         }
           
         else
         { // Reset to default
           LotSize = Lot1;
           LotStop[LotStopIndex] = Stop;
         }
         break;
       }
     }
 
     else
     {
       Print("Ошибка <", GetLastError(), "> при выборе хистори - ордера");
       return (1);
     }
  }
 
  if(AccountFreeMarginCheck(Sym, OP_BUY, LotSize) <= 0) 
  {  return (0); }
 
  
  VAsk = MarketInfo (Sym, MODE_ASK);
  VBid = MarketInfo (Sym, MODE_BID);
  // bay|sell...
  
  if (условие 1)
    Tic = OrderSend (Sym, OP_BUY, LotSize, VAsk, 3, VAsk-LotStop[LotStopIndex]*VPoint, VAsk+LotStop*VPoint, "CMATest5m", MagicNum, 0, Lime);
    
  else if (условие 2)
    Tic = OrderSend (Sym, OP_SELL, LotSize, VBid, 3, VBid+LotStop[LotStopIndex]*VPoint, VBid-LotStop*VPoint, "CMATest5m", MagicNum, 0, Red);
  
  if (Tic <= 0)
  {
    Print("Ошибка <", GetLastError(), "> при запросе ордера");
    Sleep (60000); // Ждём минуту... рынок никуда не убежит :-)...
  }
}

Rid 2007.08.27 22:18 #29

VassaV，告诉我们更多关于你在这里发布的内容和如何使用它。

削减代码 "这一表述是什么意思？

为什么在第三行没有评论。//你能用......吗？

vassav 2007.08.28 07:41 #30

rid:

VassaV，告诉我们更多关于你在这里发布的内容和如何使用它。

削减代码 "这一表述是什么意思？

为什么在第三行没有评论。//你能用......吗？

切开的意思是把它切下来，只留下底座。如何使用它取决于你，这里只是一个例子。

相应地。

//...一堆计算代码 - 这里是它自己的信号/指示器处理代码。

// ...代码--在这里我们有自己的代码来处理损失

条件1--这里有我们自己的买入/卖出条件守则

// 你能用......吗？- 它是一个评论，只是以这种方式显示。

这意味着你可以使用数组来存储每种货币的参数，或者你可以在代码中存储这些参数

(节 // 编译/重新加载/崩溃配置）。

多币种顾问问题 - 页 3