Standart göstergeleri yeniden mi çiziyorsunuz?!

Forex Trader 2006.11.15 12:34 #41

İşte Satori göstergesinin yeni bir versiyonu.(Yalnızca Para Birimi1 ve Para Birimi1 için endekslerin çıktısı eklendi)

//+------------------------------------------------------------------+
//|                                           RedrawIndicators-2.mq4 |
//|                                                           Satori |
//|                             http://www.metaquotes.ru/forum/7790/ |
//+------------------------------------------------------------------+
#property copyright "Satori"
#property link      "http://www.metaquotes.ru/forum/7790/"

#property indicator_separate_window
#property indicator_buffers 3
#property indicator_color1 Red
#property indicator_color2 Blue
#property indicator_color3 Yellow
//---- buffers
double ExtMapBuffer1[];
double ExtMapBuffer2[];
double ExtMapBuffer3[];
extern int       BarsCount=20;   //кол-во считаемых баров, если 0 - то все
extern string    Currency1="EURUSD";
extern string    Currency2="GBPUSD";

int handle,handle2;
//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int init()
  {
//---- indicators
   SetIndexStyle(0,DRAW_LINE);
   SetIndexBuffer(0,ExtMapBuffer1);
   SetIndexLabel(0,Currency1);

   SetIndexStyle(1,DRAW_LINE);
   SetIndexBuffer(1,ExtMapBuffer2);
   SetIndexLabel(1,Currency2);

   SetIndexStyle(2,DRAW_LINE);
   SetIndexBuffer(2,ExtMapBuffer3);

   handle= FileOpen("TestFile.csv",FILE_CSV|FILE_WRITE,';');
   handle2= FileOpen("TestFile2.csv",FILE_CSV|FILE_WRITE,';');
  if(handle<1 || handle2<1 )
   {
    Print("Файл не обнаружен, последняя ошибка ", GetLastError());
    return(false);
   }
   else
   {
   FileWrite (handle,"index",Symbol(),"","index1",Currency1,"","index2",Currency2);
   FileWrite (handle2,"index",Symbol(),"  ",Currency1,"  ",Currency2);
   }

   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function                       |
//+------------------------------------------------------------------+
int deinit()
  {
//----
   FileClose(handle);
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
int start()
  {
   int    counted_bars=IndicatorCounted();
   int i;
   double test1,test2;
   datetime tt1,tt2,TimeMain;
   BarsCount=MathMin(Bars,(MathMin(iBars(Currency1,Period()),iBars(Currency2,Period()))));
   for (i=0;i<BarsCount-counted_bars;i++)
      {
       TimeMain=Time[i];
       ExtMapBuffer1[i]=iTime(Currency1,Period(),iBarShift(Currency1,Period(),TimeMain));
       ExtMapBuffer2[i]=iTime(Currency2,Period(),iBarShift(Currency2,Period(),TimeMain));
       ExtMapBuffer3[i]=(ExtMapBuffer1[i]-ExtMapBuffer2[i]);
       tt1=Time[i]-ExtMapBuffer1[i];
       tt2=Time[i]-ExtMapBuffer2[i];
       if (ExtMapBuffer3[i]!=0 || tt1!=0 || tt2!=0) 
         {
         if (FileWrite (handle,
         i,TimeToStr(Time[i]),"",iBarShift(Currency1,Period(),ExtMapBuffer1[i]),TimeToStr(ExtMapBuffer1[i]),"",iBarShift(Currency2,Period(),ExtMapBuffer2[i]),TimeToStr(ExtMapBuffer2[i])
          )<=0) Print("нифига не пишет!!");
         }
        FileFlush(handle);
        if ((iTime(Symbol(),Period(),i)!=iTime(Currency1,Period(),i) ||
           Time[i]!=iTime(Currency1,Period(),i) ||
           iTime(Currency1,Period(),i)!=iTime(Currency2,Period(),i)
           ) && i>0)
        {
         if (FileWrite (handle2,i,
         TimeToStr(Time[i])," ",TimeToStr(iTime(Currency1,Period(),i))," ",TimeToStr(iTime(Currency2,Period(),i))
       )<=0) Print("нифига не пишет!!");

        }
      }//----
   return(0);
  }
//+------------------------------------------------------------------+

Forex Trader 2006.11.15 12:36 #42

MIG'de kontrol etmek için yeni bir hesap açtı. Göstergeyi başlattım, ardından tablodan kaldırdım, oluşturulan çizelgelere baktım - tek bir hata değil (dosyalar boş). Şimdi GBPJPY H4, EURUSD H4 , GBPUSD H4 için MIG tekliflerinin arşivini kontrol edeceğim (deneyin saflığı için önceki çeklerden para birimleri kullandım)

Peki, pazardan alınan ürün ASCTrend sistemi Hatalar, hatalar, sorular

Forex Trader 2006.11.15 13:06 #43

Garip bir şey buldum, GBPJPY tarihinin boş olduğu ortaya çıktı (EURUSD H4 ve GBPUSD H4 için geçmişin yerinde olduğu ortaya çıktı), belki bu TestFile.csv ve TestFile.csv2 dosyalarındaki kayıt eksikliğini açıklıyor. Aynı zamanda, GBPJPY H4 grafiğinin kendisi de normal olarak yansıtılır. şüphelendim
1) zaman serisi önbelleğe alındı (bu yüzden grafik görüntüleniyor)
2) veri merkezinin açıkta kalan adresi etkiler (bundan önce terminal, Veri Merkezi aracılığıyla Alpari'nin demo hesabında asılı kaldı)

Bunun için veri merkezinin adresini kaldırıp Alpari demo hesabına geçtim, geçiş başarılı oldu, veri merkezi kapandı. MIG demo hesabına geri döndüm - sunucuya bağlantı başarılı oldu, ancak MarketWatch verileri değişmedi. GBPJPY H4 güncellemesini zorladım (tabloda), tarih arttı.
Ancak son teklif süresi tüm çiftler için hala 10-43'tür. 199 yap.

Şimdi Redraw2 göstergesini çalıştırmayı deneyeceğim

MarketWatch'a baktım - her yer aynı saat 10:43

Veri merkezinin çalışması nasıl Hatalar, hatalar, sorular boşta çalışma

Forex Trader 2006.11.15 13:32 #44

Hmm... Veri merkezi üzerinden hala bir bağlantı olduğu ortaya çıktı. Artık her şey yolunda ve MarketWatch doğru verileri gösteriyor. Şimdi daha derin bir hikaye elde etmeye çalışıyorum.

Forex Trader 2006.11.15 14:29 #45

Güncellendi, bazen alıntılar çok ilginç

Forex Trader 2006.11.15 15:17 #46

Bu grafik MIG'den ise böyle şakaları var. Bu yıl birkaç kez gördüm. 09/08/2004 tarihinde MIG'den EURUSD tarihinde Yüksek ~ 1.7493 ile bir dojikim var.

Forex Trader 2006.11.15 15:24 #47

Evet, bu MIG :)

Forex Trader 2006.11.15 15:54 #48

Her ihtimale karşı, göstergeyi başlatmadan önce terminali yeniden başlattım (zaman serilerini önbelleğe almayı önlemek için). 1000 indeks numarasından sonra hatalar tekrar ortaya çıktı.

Şimdi tüm noktaları noktalamak için üçüncü seçeneği yapacağım.

"Alım Satım Sinyallerine Nasıl [ARŞİV] Forumu kirletmemek için Hatalar, hatalar, sorular

Forex Trader 2006.11.15 16:53 #49

İşte üçüncü versiyon

//+------------------------------------------------------------------+
//|                                           RedrawIndicators-2.mq4 |
//|                                                           Satori |
//|                             http://www.metaquotes.ru/forum/7790/ |
//+------------------------------------------------------------------+
#property copyright "Satori"
#property link      "http://www.metaquotes.ru/forum/7790/"

#property indicator_separate_window
#property indicator_buffers 3
#property indicator_color1 Red
#property indicator_color2 Blue
#property indicator_color3 Yellow
//---- buffers
double ExtMapBuffer1[];
double ExtMapBuffer2[];
double ExtMapBuffer3[];
extern int       BarsCount=20;   //кол-во считаемых баров, если 0 - то все
extern string    Currency1="EURUSD";
extern string    Currency2="GBPUSD";

int handle,handle2;
//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int init()
  {
//---- indicators
   SetIndexStyle(0,DRAW_LINE);
   SetIndexBuffer(0,ExtMapBuffer1);
   SetIndexLabel(0,Currency1);

   SetIndexStyle(1,DRAW_LINE);
   SetIndexBuffer(1,ExtMapBuffer2);
   SetIndexLabel(1,Currency2);

   SetIndexStyle(2,DRAW_LINE);
   SetIndexBuffer(2,ExtMapBuffer3);

   handle= FileOpen("TestFile3.csv",FILE_CSV|FILE_WRITE,';');
   handle2= FileOpen("TestFile3-2.csv",FILE_CSV|FILE_WRITE,';');
  if(handle<1 || handle2<1 )
   {
    Print("Файл не обнаружен, последняя ошибка ", GetLastError());
    return(false);
   }
   else
   {
   FileWrite (handle,"index",Symbol(),"iBarShift1","index1","Time[index1-1]",Currency1,"Time[index1+1]","iBarShift2","index2","Time[index2-1]",Currency2,"Time[index2+1]");
   FileWrite (handle2,"index",Symbol(),"  ",Currency1,"  ",Currency2);
   }

   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function                       |
//+------------------------------------------------------------------+
int deinit()
  {
//----
   FileClose(handle);
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
int start()
  {
   int    counted_bars=IndicatorCounted();
   int i;
   double test1,test2;
   double Bar1,Bar2;
   int iBarShift1,iBarShift2;
   datetime tt1,tt2,TimeMain;
   BarsCount=MathMin(Bars,(MathMin(iBars(Currency1,Period()),iBars(Currency2,Period()))));
   for (i=0;i<BarsCount-counted_bars;i++)
      {
       TimeMain=Time[i];
       iBarShift1=iBarShift(Currency1,Period(),TimeMain);
       iBarShift2=iBarShift(Currency2,Period(),TimeMain);
       ExtMapBuffer1[i]=iTime(Currency1,Period(),iBarShift1);
       ExtMapBuffer2[i]=iTime(Currency2,Period(),iBarShift2);
       ExtMapBuffer3[i]=(ExtMapBuffer1[i]-ExtMapBuffer2[i]);
       tt1=Time[i]-ExtMapBuffer1[i];
       tt2=Time[i]-ExtMapBuffer2[i];
       
       if (ExtMapBuffer3[i]!=0 || tt1!=0 || tt2!=0) 
         {
         Bar1=iBarShift(Currency1,Period(),ExtMapBuffer1[i]);
         Bar2=iBarShift(Currency2,Period(),ExtMapBuffer2[i]);
         if (FileWrite (handle,
         i,TimeToStr(Time[i]),iBarShift1,Bar1,TimeToStr(iTime(Currency1,Period(),Bar1-1)),TimeToStr(ExtMapBuffer1[i]),TimeToStr(iTime(Currency1,Period(),Bar1+1)),iBarShift1,Bar2,TimeToStr(iTime(Currency2,Period(),Bar2-1)),TimeToStr(ExtMapBuffer2[i]),TimeToStr(iTime(Currency2,Period(),Bar2+1))
          )<=0) Print("нифига не пишет!!");
         }
        FileFlush(handle);
        if ((iTime(Symbol(),Period(),i)!=iTime(Currency1,Period(),i) ||
           Time[i]!=iTime(Currency1,Period(),i) ||
           iTime(Currency1,Period(),i)!=iTime(Currency2,Period(),i)
           ) && i>0)
        {
         if (FileWrite (handle2,i,
         TimeToStr(Time[i])," ",TimeToStr(iTime(Currency1,Period(),i))," ",TimeToStr(iTime(Currency2,Period(),i))
       )<=0) Print("нифига не пишет!!");

        }
      }//----
   return(0);
  }
//+------------------------------------------------------------------+

Forex Trader 2006.11.15 16:56 #50

Üçüncü versiyon nihai bir cevap vermedi, fazladan saniyeler için her sembol için 4 saatlik zaman diliminde Time[]'ı kontrol etmeniz gerekecek. Saniye bulunamazsa - o zaman bir terminal hatası.

Standart göstergeleri yeniden mi çiziyorsunuz?! - sayfa 5