[警告关闭！]任何新手问题，为了不给论坛添乱。专业人士，不要走过。没有你，哪里都不能去。

VonDo Mix 2009.12.24 22:59 #3641

sibemol >> :

谢谢你的答复，我将尝试一下，并让你知道结果。

我只是作为一个想法添加了一些东西。

//+------------------------------------------------------------------+
//| CopyBars.mq4 |
//| Copyright © 2009, Sorento |
//| http://www.metaquotes.net |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2009, Sibemol & Sorento" // :)
#property link "http://www.metaquotes.net"

#property indicator_separate_window
#property indicator_buffers 1
#property indicator_color1 White
//---- input parameters
extern int Max_Length=9;
double v1[];int pos, hFile;datetime CurentT;
string O="CB", strng, F=";", Filler="0000000000000000";
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
//---- indicators
string Name_File;
Name_File=StringConcatenate(O,Symbol(),TimeYear(Time[0]),"_",TimeMonth(
Time[0]),"_",TimeDay(Time[0]),"x",TimeHour(iTime(NULL,1,0)),"_",
TimeMinute(iTime(NULL,1,0)),".CSV");
Print ("Bars in ",Name_File," start!");
hFile=FileOpen(Name_File,FILE_CSV |FILE_WRITE,F);
SetIndexStyle(0,DRAW_LINE);
SetIndexBuffer(0,v1);
strng=StringConcatenate("<ticker>",F,"<per>",F,"<date>",F,"<time>",F,"<open>",F,"<high>");
strng=StringConcatenate(strng,F,"<low>",F,"<close>",F,"<volume>",F,"<oi>",F);
pos=pos+StringLen(strng);
FileWrite(hFile,strng);
//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
//----
FileClose(hFile);
//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start()
{
int counted_bars=IndicatorCounted(), limit;
//----- первый вызов
if (counted_bars==0)
{CurentT=Time[0];// при записи может закрыться текущий бар и появится новый
limit=Bars-1;
CurentT =FilesWR(limit,1);
//----
return(0);
}
//---- последующие
if (counted_bars>0)
if (CurentT<Time[0])
{// мог быть обрыв связи - нужно найти последний и может еще не обновлённый бар
limit=iBarShift(NULL,Period(),CurentT,false);
CurentT=Time[0];// при записи может закрыться текущий бар и появится новый
FilesWR(limit+1,0);
}
else FilesWR(1,0); //бар еще текущий
//-----
return(0);
}
//+------------------------------------------------------------------+
datetime FilesWR(int startBar,int code){

int codec=code;

for(int i=startBar; i>=0; i--)
{
v1[i]=Close[i];
int _Year=TimeYear(Time[i]),
_Month=TimeMonth(Time[i]),
_Day=TimeDay(Time[i]),
_Hour=TimeHour(Time[i]),
_Minute=TimeMinute(Time[i]);

string Y, M, D, H, Mi, Date, _Time;

if(_Month<10) M="0"+DoubleToStr(_Month, 0); else M=DoubleToStr(_Month, 0);
if(_Day<10) D="0"+DoubleToStr(_Day, 0); else D=DoubleToStr(_Day, 0);
if(_Hour<1) H="00";
else if(_Hour<10 ) H="0"+DoubleToStr(_Hour, 0);
else H=DoubleToStr(_Hour, 0);
if(_Minute<1)Mi="00";
else if(_Minute<10) Mi="0"+DoubleToStr(_Minute, 0);
else Mi=DoubleToStr(_Minute, 0);
Date=DoubleToStr(_Year, 0)+M+D;
_Time=H+Mi;

strng=StringConcatenate(Symbol(),F, Period(),F, Date,F, _Time,F,
DS(Open[i]),F,DS(High[i]),F, DS(Low[i]),F,DS( Close[i]),F,IS( Volume[i],10),F);
pos=+StringLen(strng);// можно заранее просчитать длину и использовать предопределённую константу
if (codec==0)
{//обновим предпоследний бар тоже
FileSeek(hFile,pos-StringLen(strng),SEEK_SET);
codec=+1;
}

FileWrite(hFile,strng);// при записи может закрыться текущий бар и появится новый
if ( CurentT<Time[0]) i=+1;// сместим индексы

}
CurentT=Time[0];
FileFlush(hFile);
return ;
}
//----------Быстрая коричневая сука----------
//----------12345678901234567890----------!!!
string DS(double value)
{
string strng=DoubleToStr(value,Digits);
int k=StringLen(strng);
int l=StringFind(strng,".")+Digits+1;
if (l<k)
{ strng=StringConcatenate(strng,StringSubstr(Filler,0,k-l));k=2*k-l;}
int i=Max_Length-k;// add char
return (StringConcatenate(StringSubstr(Filler,0,i+1),strng));
}
string IS(int iValue, int Max_Length)
{
string strng=DoubleToStr(iValue,0);
int k=StringLen(strng);
int i=Max_Length-k;// add 0
return (StringConcatenate(StringSubstr(Filler,0,i+1),strng));
}

[WARNING CLOSED!] Any newbie MT4测试器不提供其他时间段的信息编码帮助

Oleg 2009.12.25 00:18 #3642

优化结束后，有如下信息。

There were 60 passes done during optimization
optimization stopped, 140 cache records were used, 140 cache records rejected

在这种情况下，在设置窗口中，它是。

200 / 1 280 (200)

1.有谁能解释一下这些数字是什么意思，以及这些数字是如何获得的？(60, 140, 200, 1280)

2.如果说，两个参数被优化，可能的组合数分别为15和20--它们会在哪里被看到（在这些数字中）？

3.对优化周期的数量是否有限制？(是否会保证所有的组合都能被考虑？)。

谢谢你!

Петр 2009.12.25 11:16 #3643

如何使飞博对象的级别描述从属性中获得？如何在代码中设置它们的值是清楚的。

      ObjectSet("fibo", OBJPROP_FIBOLEVELS,8);
      ObjectSet("fibo", OBJPROP_FIRSTLEVEL+0,0.0);
      ObjectSet("fibo", OBJPROP_FIRSTLEVEL+1,0.382);
      ObjectSet("fibo", OBJPROP_FIRSTLEVEL+2,0.618);
      ObjectSet("fibo", OBJPROP_FIRSTLEVEL+3,1.0);
      ObjectSet("fibo", OBJPROP_FIRSTLEVEL+4,1.382);
      ObjectSet("fibo", OBJPROP_FIRSTLEVEL+5,1.618);
      ObjectSet("fibo", OBJPROP_FIRSTLEVEL+6,2.0);
      ObjectSet("fibo", OBJPROP_FIRSTLEVEL+7,2.618);

但描述呢？还是不能从代码中得到？

[删除] 2009.12.25 11:25 #3644

Sorento，非常感谢你!周末一过，我一定会检查你的版本和阿尔苏。

2alsu: 我对字段感到困惑，把它们算作字符串））。

VonDo Mix 2009.12.25 11:37 #3645

sibemol >> :
Sorento，非常感谢你!周末一过，我一定会检查你的变体和阿尔苏。

现在没有市场动向检查。这将使你只集中精力调试两种情况。

吧台仍然是旧的

并有一个新的。

如果有一个新的酒吧，你需要更新完全形成的酒吧。

有一些东西需要优化。

并检查算法是否跳过一个链接，人为地失去一个历史片段。

祝你一路走好。

PS。我想我需要向后移两个长度，但。想一想吧。

[删除] 2009.12.25 12:17 #3646

索伦托，检查了代码，没有改变立市场上的任何东西。这些行看起来像这样：EURUSD;15;20091224;1830;0001.43580;0001.43625;0001.43566;0001.43611;000000163;EURUSD;15;20091224;1845;0001.43612;0001.43612;0001.43536;0001.43538;000000180;而最新的两个柱子被写入（重复的）文件开头。我将不得不转移它。我将研究你的代码。谢谢你。

VonDo Mix 2009.12.25 12:31 #3647

DoubleToStr(value,Digits)后面的前导零和填充零是长度不变的需要，这就是问题所在。

你可以从末端搜索位置。;)

祝你在寻找过程中好运。

[删除] 2009.12.25 12:55 #3648

2Sorento。

在你的代码中。

int start()
{
int counted_bars=IndicatorCounted(), limit;
//----- первый вызов
if ( counted_bars==0)
{ CurentT=Time[0];// при записи может закрыться текущий бар и появится новый
limit=Bars-1;
CurentT = FilesWR( limit,1);
//----
//return(0);

我已经删除了return(0)，然后文件被写成了它应该有的样子，只是最后一个<oi>字段没有值，它在所有记录中都含有0，但这是小事，我会想办法解决的。现在我们需要在运动中检查。再次感谢。

是否没有办法去除价格字段中的前导零？似乎长度并不影响。

Петр 2009.12.25 12:58 #3649

Svinozavr >> :

如何使飞博对象的级别描述从属性中获得？如何在代码中设置它们的值是清楚的。

和描述？或者它不能从代码中访问？

感谢Sorento - 建议的ObjectSetFiboDescription。

问题删除。

VonDo Mix 2009.12.25 13:41 #3650

sibemol >> :

2Sorento。

在你的代码中。

删除了return(0)，然后文件被写成了它应该有的样子，只是最后一个<oi>字段没有值，所有记录中都含有0，但这是小事，我会想办法解决。现在我们需要在运动中检查。再次感谢。

ZS 是否没有办法去除价格字段中的铅字？似乎并不影响长度。

淘金之旅。1140 и 980

记录长度的变化。

和<i>我已经删除了它，因为缺乏使用；)

[警告关闭！]任何新手问题，为了不给论坛添乱。专业人士，不要走过。没有你，哪里都不能去。 - 页 365