[WARNUNG GESCHLOSSEN!] Alle Fragen von Neulingen, um das Forum nicht zu überladen. Fachleute, gehen Sie nicht vorbei. Ohne dich kann ich nirgendwo hingehen.

Dimitry 2010.02.03 11:50 #4131

costy_ >>:

Ich danke Ihnen! Ich habe hier noch mehr gefunden, vielleicht braucht es jemand. Ich werde den Gral fertigstellen:)

Oleksandr 2010.02.03 11:54 #4132

costy_ >>:

Если массив double а нужен int? Я правильно понял?

Nein. Ich schreibe den MT4-Link zu anderen Anwendungen über Sockets. Die Funktion Socket gibt ein int-Array zurück:

extern "C" __declspec ( dllexport ) int* CALLBACK SendInfoBySocket(int* MessageStr, int MessageLength,int PORT);

Ich importiere diese dll in EA. Um diese Funktion aufzurufen, muss sie jedoch im Expert Advisor deklariert werden:

int SendInfoBySocket(int str[], int len,int port);

Die obige Deklaration ist höchstwahrscheinlich nicht korrekt - eine dll-Option gibt ein Array zurück, während eine in einem Expert Advisor deklarierte Funktion einen einzelnen int zurückgibt.

Wie kann man ihn in einem Expert Advisor deklarieren, so dass er ein Array und nicht eine einzelne Zahl zurückgibt?

Wie prüfe ich, ob Nützliche Funktionen von KimIV gibt die Ausführungsrichtlinie zurück.

Oleksandr 2010.02.03 12:06 #4133

Vielen Dank an alle, das Problem wurde durch die Verwendung von char* (c++) und string(mql4) anstelle von int* gelöst

[Gelöscht] 2010.02.03 12:59 #4134

Wer weiß?

Wie kann man eine Variable im angegebenen Genauigkeitsformat verdoppeln, ohne die Zahl zu runden, zum Beispiel Bid=1.3988 als Bid=1.398 angeben?

Michael 2010.02.03 13:09 #4135

admin86 >>:

Кто знает?

Как указать переменную double в указаном формате точности без округление числа, к примеру Bid=1.3988 указать как Bid=1.398 ???

wie hier?

[Gelöscht] 2010.02.03 13:43 #4136

Die Antwort auf diese Frage finden Sie hier: https://forum.mql4.com/ru/25945

Dimitry 2010.02.03 14:10 #4137

Bitte helfen Sie...

\Programmende' - unausgewogene linke Klammer

 extern double Lots = 0.1;
extern int TrailingStop=0;
extern string symbol="GBPUSD";
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
int start()
  {
   double ma_close,ma_close_pr,ma_open,ma_open_pr;
   double spread,sl_buy,sl_sell,high,high_n,low,low_n;
   int cnt, ticket, total;


   if(Bars<55)
     {
      Print("bars less than 55");
      return(0);  
     }

// to simplify the coding and speed up access
// data are put into internal variables
         ma_close=iMA(NULL,0,5,0,MODE_EMA,PRICE_CLOSE,1);
         ma_close_pr=iMA(NULL,0,5,0,MODE_EMA,PRICE_CLOSE,2);      
         ma_open=iMA(NULL,0,5,0,MODE_EMA,PRICE_OPEN,1);
         ma_open_pr=iMA(NULL,0,5,0,MODE_EMA,PRICE_OPEN,2);
         spread=MarketInfo(symbol,MODE_SPREAD);
         sl_buy=iLow(NULL,0,1)-spread*Point;
         sl_sell=iHigh(NULL,0,1)+spread*Point;
         high=iHigh(NULL,0,1);
         high_n=iHigh(NULL,0,0);
         low=iLow(NULL,0,1);
         low_n=iLow(NULL,0,0);
        
   

//----
    
   total=OrdersTotal();
   if(total<1) 
     {
      // no opened orders identified
      if(AccountFreeMargin()<(1000*Lots))
        {
         Print("We have no money. Free Margin = ", AccountFreeMargin());
         return(0);  
        }
      // check for long position (BUY) possibility
      if(ma_close>ma_open && ma_close_pr<ma_open_pr && high_n>high)
        {
        ticket=OrderSend(Symbol(),OP_BUY,Lots,Ask,3,sl_buy,0,"FXJEDDI_MTF:Buy",16384,0,Lime);

         if(ticket>0)
           {
            if(OrderSelect(ticket,SELECT_BY_TICKET,MODE_TRADES)) Print("BUY order opened : ",OrderOpenPrice());
           }
         else Print("Error opening BUY order : ",GetLastError()); 
         return(0); 
        }
      // check for short position (SELL) possibility
      if(ma_close<ma_open && ma_close_pr>ma_open_pr && low_n<low)
        {
            ticket=OrderSend(Symbol(),OP_SELL,Lots,Bid,3,sl_sell,0,"FXJEDDI_MTF:Sell",16384,0,Red);
         if(ticket>0)
           {
            if(OrderSelect(ticket,SELECT_BY_TICKET,MODE_TRADES)) Print("SELL order opened : ",OrderOpenPrice());
           }
         else Print("Error opening SELL order : ",GetLastError()); 
         return(0); 
        }
       
       
        for(int i = 0; i < OrdersTotal(); i++)
   {
      // выбор одера
      if(OrderSelect(i, SELECT_BY_POS) == false) continue;
      // not current symbol
      if(OrderSymbol() != Symbol()) continue;
  }
if(OrderType() == OP_SELL)
{
//при профите >20 pips добавится или докупится ... 
 if(OrderProfit()>20)
 OrderSend(Symbol(),OP_SELL,Lots,Bid,3,sl_sell,0,"FXJEDDI:Sell",16384,0,Red);
}
if(OrderType() == OP_BUY)
{
//при профите >20 pips добавится или докупится ... 
 if(OrderProfit()>20)
 OrderSend( (Symbol(),OP_BUY,Lots,Ask,3,sl_buy,0,"FXJEDDI:Buy",16384,0,Lime);
}
      return(0);
     }

Was ist los?

techno 2010.02.03 14:22 #4138

Necron hat die Klammer nicht irgendwo geschlossen, suchen Sie danach...

Dimitry 2010.02.03 14:23 #4139

Teil 2.

 // it is important to enter the market correctly, 
   // but it is more important to exit it correctly...   
   for( cnt=0; cnt< total; cnt++)
     {
      OrderSelect( cnt, SELECT_BY_POS, MODE_TRADES);
      if(OrderType()<=OP_SELL &&   // check for opened position 
         OrderSymbol()==Symbol())  // check for symbol
        {
 OrderSend( 
         if(OrderType()==OP_BUY)   // long position is opened
           {
            // should it be closed?
            if( ma_close< ma_open && ma_close_pr> ma_open_pr && low_n< low)
                {
                 OrderClose(OrderTicket(),OrderLots(),Bid,3,Violet); // close position
                 return(0); // exit
                }
            // check for trailing stop
            if( TrailingStop>0)  
              {                 
               if(Bid-OrderOpenPrice()>Point* TrailingStop)
                 {
                  if(OrderStopLoss()<Bid-Point* TrailingStop)
                    {
                     OrderModify(OrderTicket(),OrderOpenPrice(),Bid-Point* TrailingStop,OrderTakeProfit(),0,Green);
                     return(0);
                    }
                 }
              }
           }
         else // go to short position
           {
            // should it be closed?
            if( ma_close> ma_open && ma_close_pr< ma_open_pr && high_n> high)
              {
               OrderClose(OrderTicket(),OrderLots(),Ask,3,Violet); // close position
               return(0); // exit
              }
            // check for trailing stop
            if( TrailingStop>0)  
              {                 
               if((OrderOpenPrice()-Ask)>(Point* TrailingStop))
                 {
                  if((OrderStopLoss()>(Ask+Point* TrailingStop)) || (OrderStopLoss()==0))
                    {
                     OrderModify(OrderTicket(),OrderOpenPrice(),Ask+Point* TrailingStop,OrderTakeProfit(),0,Red);
                     return(0);
                    }
                 }
              }
           }
        }
     }
   return(0);
   
  }
// the end.

Dimitry 2010.02.03 14:25 #4140

Techno >>:
Necron скобку где то не закрыл, ищи...

Haben Sie die Zusätze in den richtigen Code eingefügt?

[WARNUNG GESCHLOSSEN!] Alle Fragen von Neulingen, um das Forum nicht zu überladen. Fachleute, gehen Sie nicht vorbei. Ohne dich kann ich nirgendwo hingehen. - Seite 414