[Qualsiasi domanda da principiante, per non ingombrare il forum. Professionisti, non passate. Non posso andare da nessuna parte senza di te.

evgens 2010.10.28 10:52 #9331

Problema. Si prega di avvisare.

In OrderSelect(0,SELECT_BY_POS,MODE_HISTORY)

OrderProfit() restituisce il primo profitto nella lista della storia,

come posso fare in modo che restituisca l'ultimo profitto nella lista della storia?

Ho provato in questo modo:

A=OrdiniHistoriTotale();

OrderSelect(A,SELECT_BY_POS,MODE_HISTORY);

OrderProfit() non restituisce nulla)

)) ma non funziona

[ARCHIVIO] Qualsiasi domanda da Chiedete! [Qualsiasi domanda da principiante,

Константин 2010.10.28 10:54 #9332

Professionisti, per favore consigliate come risolvere lo script. Uso uno script per esportare i dati

int start()
  {
  out_hist("EURUSD",1440);
  out_hist("GBPUSD",1440);
  out_hist("USDJPY",1440);
  out_hist("USDCAD",1440);
  out_hist("AUDUSD",1440);
//

  
  return(0);
  }
//  
int out_hist(string ccy, int tf)
{
  string fname = ccy + tf + ".txt";
  int handle = FileOpen(fname, FILE_CSV|FILE_WRITE, ",");
  if(handle>0)
    {
     FileWrite(handle,"<TICKER>,<DTYYYYMMDD>,<TIME>,<OPEN>,<HIGH>,<LOW>,<CLOSE>,<VOL>");    // header
     for(int i=iBars(ccy,tf)-1; i>=0; i--)
       {
       string P =ccy + tf;
       string date1 = TimeToStr(iTime(ccy,tf,i),TIME_DATE);
       date1 = StringSubstr(date1,0,4) + StringSubstr(date1,5,2) + StringSubstr(date1,8,2);
       string time1 = TimeToStr(iTime(ccy,tf,i),TIME_MINUTES);
       FileWrite(handle, P, date1, time1, iOpen(ccy,tf,i), iHigh(ccy,tf,i), iLow(ccy,tf,i), iClose(ccy,tf,i), iVolume(ccy,tf,i));
       }
     FileClose(handle);
     }
//----
   return(0);

Ottengo 5 file con dati nell'output. Voglio ottenere 1 file, che conterrà i dati del primo strumento, poi il secondo, ecc. Non riesco a mettere tutto in un file... Grazie.

Domande dai principianti MQL5 Qualsiasi domanda da principiante, Tutte le domande dei

Victor Nikolaev 2010.10.28 11:11 #9333

kon12:

Professionisti, per favore consigliate come risolvere lo script. Uso uno script per esportare i dati

Ottengo 5 file con dati nell'output. Voglio ottenere 1 file, che conterrà i dati del primo strumento, poi il secondo, ecc. Non riesco a mettere tutto in un unico file... Grazie.

Utilizzare l'apertura del file per leggere e scrivere, spostarsi alla fine del file e aggiungere

FileOpen(fname,FILE_WRITE|FILE_READ);

FileSeek()

aiutarvi

Victor Nikolaev 2010.10.28 11:20 #9334

gheka:

Problema. Si prega di avvisare.

In OrderSelect(0,SELECT_BY_POS,MODE_HISTORY)

OrderProfit() restituisce il primo profitto nella lista della storia,

come posso fare in modo che restituisca l'ultimo profitto nella lista della storia?

Ho provato in questo modo:

A=OrdiniHistoriTotale();

OrderSelect(A,SELECT_BY_POS,MODE_HISTORY);

OrderProfit() non restituisce nulla)

)) ma non funziona

Quindi l'ultimo mandato deve ancora essere trovato. E qual è l'ultimo. Per l'orario di apertura o di chiusura. E, naturalmente, non dimenticare quale strumento cercare.

4pok 2010.10.28 11:49 #9335

consigliare cosa scrivere in un EA per un limite duro il volume massimo della transazione? decide solo quale volume per aprire ma a volte apre un grande volume e poi andare al verde, ho bisogno di limitare il massimo 0,5

[ARCHIVIO] Qualsiasi domanda da Come codificare? FORTS: Per aiutare i

Dimitry 2010.10.28 12:04 #9336

ilmur:
consigliare cosa scrivere in un EA per un limite duro il volume massimo della transazione? decide solo quale volume per aprire ma a volte apre un grande volume e poi andare al verde, ho bisogno di limitare il massimo 0,5

extern double MyMaxVolume=0.5;

...

if(рассчитанный_объем > MyMaxVolume) рассчитанный_объем=MyMaxVolume;

Victor Nikolaev 2010.10.28 12:19 #9337

Necron:

Se una persona lo sapesse, l'avrebbe fatto lui stesso. Ma qui sembra che tu debba apportare modifiche al codice di qualcun altro

4pok 2010.10.28 12:20 #9338

Grazie

[Eliminato] 2010.10.28 13:06 #9339

extern double SL=20; // SL для открываемого ордера
extern double TP=20; // ТР для открываемого ордера
extern double Lot=0.01; // Жестко заданное колич. лотов
datetime time;
//--------------------------------------------------------------- 2 --
int start()
{
int Total;

double
M_0,
M_1;

bool
Ans =false, // Ответ сервера после закрытия
Cls_B=false, // Критерий для закрытия Buy
Cls_S=false, // Критерий для закрытия Sell
Opn_B=false, // Критерий для открытия Buy
Opn_S=false; // Критерий для открытия Sell

//--------------------------------------------------------------- 3 --
// Учёт ордеров

for(int i=OrdersTotal()-1;i>=0;i--)
if (OrderSelect(i,SELECT_BY_POS)&&OrderSymbol()==Symbol()&&OrderType()>1)Total++;

if(Total!=0 || time==Time[1])return;

// Торговые критерии

M_0=iOsMA(NULL,0,13,34,8,0,0); // 0 бар
M_1=iOsMA(NULL,0,13,34,8,0,1); // 1 бар

if (M_1<0 && M_0>0)
Opn_B=true;

if (M_1>0 && M_0<0)
Opn_S=true;

//--------------------------------------------------------------- 7 --

if (Opn_B)
{OrderSend(Symbol(),OP_BUY,Lot,Ask,0,Bid-SL*Point,Bid+TP*Point);time=Time[1];}

if (Opn_S)
{OrderSend(Symbol(),OP_SELL,Lot,Bid,0,Ask+SL*Point,Ask-TP*Point);time=Time[1];}
}

Un EA che apre una posizione quando l'OsMA incrocia la linea dello zero. Non è chiaro dove si apre e non è chiaro perché. Vedere se iOsMA(NULL,0,13,34,8,0,0) ha un errore?

[WARNING CLOSED!] Any newbie Scrivere EAs gratis su Writing free EAs

evgens 2010.10.28 14:41 #9340

bool isCloseLastPosByStop(string sy="", int op=-1, int mn=-1) {
  datetime t;
  double   ocp, osl;
  int      dg, i, j=-1, k=OrdersHistoryTotal();

  if (sy=="0") sy=Symbol();
  for (i=0; i<k; i++) {
    if (OrderSelect(i, SELECT_BY_POS, MODE_HISTORY)) {
      if (OrderSymbol()==sy || sy=="") {
        if (OrderType()==OP_BUY || OrderType()==OP_SELL) {
          if (op<0 || OrderType()==op) {
            if (mn<0 || OrderMagicNumber()==mn) {
              if (t<OrderCloseTime()) {
                t=OrderCloseTime();
                j=i;
              }
            }
          }
        }
      }
    }
  }
  if (OrderSelect(j, SELECT_BY_POS, MODE_HISTORY)) {
    dg=MarketInfo(sy, MODE_DIGITS);
    if (dg==0) if (StringFind(OrderSymbol(), "JPY")<0) dg=4; else dg=2;
    ocp=NormalizeDouble(OrderClosePrice(), dg);
    osl=NormalizeDouble(OrderStopLoss(), dg);
    if (ocp==osl) return(True);
  }
  return(False);
}

Non funziona, forse devo cambiare qualcosa qui o metterlo dopo l'inizio.

Ho provato a tradurre il tuo codice su carta in russo che capisco, ma non funziona,

è troppo complicato, soprattutto quando le condizioni di ogni condizione si susseguono, e una condizione su otto condizioni.

Naturalmente non discuto che chi ha creato questo codice sia un miracolo, ma per me è una perversione completa (in senso buono)

Non sono pigro per aggiungere commenti ad ogni operazione e condizione, tranne che per la funzione standard.

[Qualsiasi domanda da principiante, Tutte le domande dei Una libreria rapida e

[Qualsiasi domanda da principiante, per non ingombrare il forum. Professionisti, non passate. Non posso andare da nessuna parte senza di te. - pagina 934