[ВНИМАНИЕ, ТЕМА ЗАКРЫТА!] Любой вопрос новичка, чтоб не захламлять форум. Профи, не проходите мимо. Без вас никуда. - страница 934

 

Проблемка. Подскажите кто может.

в OrderSelect(0,SELECT_BY_POS,MODE_HISTORY)

в OrderProfit() возвращает первую прибыль в списке истории,

как сделать чтобы возвращала именно последнюю прибыль в списке истории?

я пробовал так:

A=OrdersHistoriTotal();

OrderSelect(A,SELECT_BY_POS,MODE_HISTORY);

OrderProfit() вообще ничё не возвращает)

)) но не пашет

 

Профи, подскажите, как надо поправить скрипт. Для экспорта данных пользуюсь скриптом

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);

На выходе получаю 5 файлов с данными. Хочу получить 1 файл, в котором будут записаны данные по первому инструменту, затем по второму и т.д. Чего-то не получается все слить в один файл... Пасиб.

 
kon12:

Профи, подскажите, как надо поправить скрипт. Для экспорта данных пользуюсь скриптом

На выходе получаю 5 файлов с данными. Хочу получить 1 файл, в котором будут записаны данные по первому инструменту, затем по второму и т.д. Чего-то не получается все слить в один файл... Пасиб.


Использовать открытие файла для чтения и записи, перемещаться в конец файла и дописывать

FileOpen(fname,FILE_WRITE|FILE_READ);

FileSeek()

вам помогут

 
gheka:

Проблемка. Подскажите кто может.

в OrderSelect(0,SELECT_BY_POS,MODE_HISTORY)

в OrderProfit() возвращает первую прибыль в списке истории,

как сделать чтобы возвращала именно последнюю прибыль в списке истории?

я пробовал так:

A=OrdersHistoriTotal();

OrderSelect(A,SELECT_BY_POS,MODE_HISTORY);

OrderProfit() вообще ничё не возвращает)

)) но не пашет


Так последний ордер еще найти надо. И какой последний. По времени открытия или по времени закрытия. Ну и конечно не забыть по какому инструменту искать.
 
подскажите что надо написать в советнике чтоб жестко ограничить максимальный обьем сделки?просто он сам решает каким обьемом открыватся но бывает что открывает большой обьем и тогда происходит слив,надо ограничить чтоб не больше 0.5
 
ilmur:
подскажите что надо написать в советнике чтоб жестко ограничить максимальный обьем сделки?просто он сам решает каким обьемом открыватся но бывает что открывает большой обьем и тогда происходит слив,надо ограничить чтоб не больше 0.5
extern double MyMaxVolume=0.5;

...

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

Если бы человек знал, то сам б сделал. А тут нужно похоже изменения в чужой код вносить
 

спасибо

 
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];}
}


Советник, открывающий позиции при пересечении OsMA нулевой линии. Непонятно где открывает и непонятно почему. Посмотрить, может ошибка в iOsMA(NULL,0,13,34,8,0,0)?
 
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);
}

чё то не пашет, возможно мне надо что менять здесь или ставить после старта.

я ваш код пытался перевести на бумаге на русский мне понятный язык, но не доходит,

слишком уж сложно,особенно когда условия в каждом последующим,и одно условии из восьми условий

конечно я не спорю тот кто создал такой код просто чудо,но для меня это полное извращение(в хорошем смысле)

кому не лень дописать коментарии к каждой операции и условии,кроме станд.функции.