[存档!]任何菜鸟问题,为了不使论坛变得混乱。专业人士,不要路过。没有你,哪里都不能去 - 4. - 页 427

 

下午好。关于文件指针的问题...在MQL4 书中,可在MQL4.community 找到,在 "标准函数 "部分,有一个脚本 "文件操作 "的例子,其目的是为了从文件中读取数据并在符号窗口中显示图形对象。

//--------------------------------------------------------------------
// timetablenews.mq4
// Предназначен для использования в качестве примера в учебнике MQL4.
//--------------------------------------------------------------- 1 --
int start()                            // Спец. функция start
  {
//--------------------------------------------------------------- 2 --
   int Handle,                         // Файловый описатель
       Stl;                            // Стиль вертикальной линии
   string File_Name="News.csv",        // Имя файла
          Obj_Name,                    // Bмя объекта
          Instr,                       // Название валюты
          One,Two,                     // 1я и 2я чать названия инстр.
          Text,                        // Текст описания события
          Str_DtTm;                    // Дата и время события(строка)
   datetime Dat_DtTm;                  // Дата и время события(дата)
   color Col;                          // Цвет вертикальной линии
//--------------------------------------------------------------- 3 --
   Handle=FileOpen(File_Name,FILE_CSV|FILE_READ,";");// Открытие файла
   if(Handle<0)                        // Неудача при открытии файла
     {
      if(GetLastError()==4103)         // Если файла не существует,..
         Alert("Нет файла с именем ",File_Name);//.. извещаем трейдера 
      else                             // При любой другой ошибке..
         Alert("Ошибка при открытии файла ",File_Name);//..такое сообщ
      PlaySound("Bzrrr.wav");          // Звуковое сопровождение
      return;                          // Выход из start()      
     }
//--------------------------------------------------------------- 4 --
   while(FileIsEnding(Handle)==false)// До тех пор, пока файловый ..
     {                                // ..указатель не в конце файла
      //--------------------------------------------------------- 5 --
      Str_DtTm =FileReadString(Handle);// Дата и время события(дата)
      Text     =FileReadString(Handle);// Текст описания события
      if(FileIsEnding(Handle)==true)   // Файловый указатель в конце
         break;                        // Выход из чтения и рисования
      //--------------------------------------------------------- 6 --
      Dat_DtTm =StrToTime(Str_DtTm);   // Преобразование типа данных
      Instr    =StringSubstr(Text,0,3);// Извлекаем первые 3 символа
      One=StringSubstr(Symbol(),0,3);// Извлекаем первые 3 символа
      Two=StringSubstr(Symbol(),3,3);// Извлекаем вторые 3 символа
      Stl=STYLE_DOT;                   // Для всех - стиль пунктир
      Col=DarkOrange;                  // Для всех - цвет такой
      if(Instr==One || Instr==Two)     // А для событий по нашему ..
        {                             // .. финансовому инструменту..
         Stl=STYLE_SOLID;              // .. такой стиль..
         Col=Red;                      // .. и такой цвет верт. линии
        }
      //--------------------------------------------------------- 7 --
      Obj_Name="News_Line  "+Str_DtTm;     // Имя объекта
      ObjectCreate(Obj_Name,OBJ_VLINE,0,Dat_DtTm,0);//Создаем объект..
      ObjectSet(Obj_Name,OBJPROP_COLOR, Col);       // ..и его цвет,..
      ObjectSet(Obj_Name,OBJPROP_STYLE, Stl);       // ..стиль..
      ObjectSetText(Obj_Name,Text,10);              // ..и описание 
     }
//--------------------------------------------------------------- 8 --
   FileClose( Handle );                // Закрываем файл
   PlaySound("bulk.wav");              // Звуковое сопровождение
   WindowRedraw();                     // Перерисовываем объекты
   return;                             // Выход из start()
  }
//--------------------------------------------------------------- 9 --

下面,在分析《MQL4》一书中的这个脚本时,给出了以下语句:"如果删除指定的检查(第5-6块的最后2行),在运行时将创建一个额外的对象只有在这之后,while 循环的结束条件才会触发,控制权才会被传递到8-9块"。

我的理解是否正确?文件指针不是由文本符号流入的(例如:text|其中 | 是一个文件指针),而是一个带有表达式的指针,例如:text 其中k"to"字符,k-th被文件指针突出显示。这解释了对字符串的需求(见第164页)。

      if(FileIsEnding(Handle)==true)   // Файловый указатель в конце
         break;                        // Выход из чтения и рисования
      //--------------------------------------------------------- 6 --

的确如此。在倒数第二个迭代中,在创建最后一个对象之后

2007.05.11 18:30;JPY

文件指针位于最后一个对象的位置,即

2007.05.11 18:30;日元 工业制造

(其中o 是 "o" 字符,k是文件索引)。然后当把控制权传给while 语句头时,FileIsEnding(handle) 函数显然会返回 true因为 文件指针不是在文件的末尾,而是在该文件的最后一个字符。然后当前两行被执行时,文件指针将移动到空位,如果没有行

      if(FileIsEnding(Handle)==true)   // Файловый указатель в конце
         break;                        // Выход из чтения и рисования
      //--------------------------------------------------------- 6 --

脚本将创建一个图形(即一行),其描述为空,时间坐标对应于0。这就是这句话的意思:"如果指定的检查(5-6块的最后2行)被删除,那么在运行时将创建一个额外的对象。"

问题:我的理解是否正确。

a) 文件指针的定义。

b)"如果指定的检查(5-6块中的最后2行)被删除,那么 在程序执行时将会创建一个额外的对象"这句话的含义。只有在这之后 while 循环的结束条件才会被触发,控制权才会被传递到8-9块"。

P.S. 为了不给论坛添乱,提前感谢您的回答。

 
大家好!!请给我一个打开小时条的函数(我需要确定前一根蜡烛的开盘时间),如果(TimeMinute(TimeCurrent())==m && TimeSeconds(TimeCurrent())==n)由于某些原因,把m=1 n=1放进去就不行了,但我求你了,谁在乎呢?
 
stater:
大家好!!请给我一个打开小时条的函数(我需要确定前一根蜡烛的开盘时间),如果(TimeMinute(TimeCurrent())==m && TimeSeconds(TimeCurrent())==n)由于某些原因,把m=1 n=1放进去就不行了,但我求你了,谁在乎呢?
https://docs.mql4.com/ru/series
 
谢谢你的反馈,但我不明白哪个函数是用来知道一个小时的蜡烛是否已经打开....。
 
stater:
谢谢你的回答,但我不明白是用哪个函数来知道一个小时的蜡烛是否已经打开....。

计时
 
顾问一直给出错误0,你能告诉我如何检查是什么原因造成的,如何找到这个地方?
 
FAQ:

计时
谢谢您的耐心等待!
 
Egori4:
EA一直给出错误0,建议--如何检查是什么原因造成的,如何找到这个地方?

错误0是指没有错误。

停止做打印(警报)=)

 

如果一个公式重复多次,如何缩短公式的书写时间?

 
Elektronik:

如果一个公式重复多次,如何缩短公式的书写时间?


使用函数