Izgara oluşturucu 1.1 - sayfa 4
Ticaret fırsatlarını kaçırıyorsunuz:
- Ücretsiz ticaret uygulamaları
- İşlem kopyalama için 8.000'den fazla sinyal
- Finansal piyasaları keşfetmek için ekonomik haberler
Kayıt
Giriş yap
Gizlilik ve Veri Koruma Politikasını ve MQL5.com Kullanım Şartlarını kabul edersiniz
Hesabınız yoksa, lütfen kaydolun
MT4 arkadaşlarımız üzülmesin diye ara sıra tüm açık siparişleri siliyorum.
Bu sorunu geri testte alacaksınız ama bu bir komut dosyası sorunu değil .. MT4 geriye dönük test sorunu.
Devam ederse, lütfen bana bildirin veya sorunu gösteren bazı raporlar gönderin...
teşekkürler ve saygılar,
sarılmak
Danışman, verdiğim yorum "GridEURUSD" ile ızgarayı oluşturuyor. Bu yorum, sipariş beklediği sürece Yorum Alanında kalır. Sipariş etkinleştirilirse, yorum "etkinleştir/otomatik" olarak değişir. Sonuçta, bu davranışın açıklanan soruna yol açtığı açıktır.
Alpari ile ticaret yapıyorum. Demo hesaplarda MT4'ü destekliyorlar
Bu davranışı, yani sıranın büyüsünü ızgara için tanımlayıcı olarak kullanıp kullanamayacağımı kontrol edeceğim ve sonuçları size bildireceğim.
Bunu test ederken, ızgara için temizleme komut dosyasında da değişiklikler yaptım. Açık siparişleri kapatmak için de işlevsellik ekledim. Ne yazık ki, açık bir siparişi kapatmaya çalışırsam, Sipariş kilitli anlamına gelen 129 hatası alıyorum. Ancak verilen ızgara için bekleyen tüm siparişleri siler.
//+------------------------------------------- -------------------+ //| RemoveGrid.mq4 | //| Telif hakkı © 2005, hdb | //| http://www.dubois1.net/hdb | //+------------------------------------------- -------------------+ #property telif hakkı "Telif hakkı © 2005, hdb" #özellik bağlantısı "http://www.dubois1.net/hdb" harici string GridName = "Izgara"; extern bool closeOpen = false; //+------------------------------------------- -------------------+ //| komut dosyası programı başlatma işlevi | //+------------------------------------------- -------------------+ int başlangıç() { #property show_inputs // parametreleri gösterir - teşekkürler Slawa... //---- int toplam = SiparişlerToplam(); int ; for(i=toplam-1; i>=0;i--) { OrderSelect(i, SELECT_BY_POS); int türü = OrderType(); if ( OrderSymbol()==Symbol() && OrderComment() == GridName ) { bool sonucu = yanlış; anahtar (tip) { durum OP_BUY : if (kapatAç) { sonuç = OrderClose( OrderTicket(), OrderLots(), Ask, 0, Blue ); } kırmak; durum OP_SELL : if (kapatAç) { sonuç = OrderClose( OrderTicket(), OrderLots(), Bid, 0, Blue ); } kırmak; //Bekleyen siparişleri kapat durum OP_BUYLIMIT : sonuç = OrderDelete( OrderTicket() ); kırmak; durum OP_BUYSTOP : sonuç = OrderDelete( OrderTicket() ); kırmak; durum OP_SELLLIMIT : sonuç = OrderDelete(OrderTicket()); kırmak; durum OP_SELLSTOP : sonuç = OrderDelete(OrderTicket()); kırmak; } if(sonuç == yanlış) { Print("Order " , OrderTicket() , " kapatılamadı. Hata:" , GetLastError() ); // Uyku(3000); } } } //---- dönüş(0); } //+------------------------------------------- -------------------+kori
işe yararsa bana haber ver ve sihri kullanacağım.. çünkü komisyoncunun böyle garip şeyler yaptığının farkında değildim!!
teşekkürler ve saygılar,
sarılmak
gridMaker'ı yorum yerine OrderMagicNumber kullanacak şekilde değiştirdim. Ayrıca yorumu oluşturma konusunda bazı küçük değişiklikler yaptım.
İşte sonuç.
//+------------------------------------------- -------------------+ //| MakeGrid.mq4 | //| Telif hakkı © 2005, hdb | //| http://www.dubois1.net/hdb | //+------------------------------------------- -------------------+ #property telif hakkı "Telif hakkı © 2005, hdb" #özellik bağlantısı "http://www.dubois1.net/hdb" //#özellik sürümü "1.4beta" // cori tarafından değiştirildi. Şebekenin işlemlerini belirlemek için OrderMagicNumber'ı kullanma harici int uniqueGridMagic = 11111; // İşlemlerin sihirli numarası. tanımlamak için benzersiz olmalıdır // bir ızgaranın işlemleri dış çift Lot = 0.1; // dış çift GridSize = 6; // siparişler arasındaki pip - ızgara veya ağ boyutu harici çift GridSteps = 12; // verilecek toplam sipariş sayısı harici çift TakeProfit = 6 ; // kar elde etmek için tik sayısı. normalde = ızgara boyutudur, ancak geçersiz kılabilirsiniz harici çift StopLoss = 0; // eğer bir stoploss eklemek istiyorsanız. normal şebekeler durdurma kayıplarını kullanmaz harici çift UpdateInterval = 1; // siparişleri her x dakikada bir güncelle extern bool wantLongs = true; // uzun pozisyonlar istiyor muyuz extern bool wantShorts = true; // kısa pozisyonlar istiyor muyuz extern bool istiyorBreakout = true; // uzunları fiyatın üstünde, şortları fiyatın altında mı istiyoruz extern bool requestCounter = true; // uzunları fiyatın altında, şortları fiyatın üstünde mi istiyoruz harici bool limitiEMA34 = yanlış; // uzunları sadece ema'nın üstünde, şortları sadece ema'nın altında mı istiyoruz // cori tarafından değiştirildi. sadece dahili değişkenler çift LastUpdate = 0; // son güncellemenin zamanını not etmek için kullanılan sayaç çift GridMaxOpen = 0; // maksimum açık pozisyon sayısı string GridName = "Izgara"; // ızgarayı tanımlar. birlikte var olan birkaç ızgaraya izin verir //+------------------------------------------- -------------------+ //| uzman başlatma işlevi | //+------------------------------------------- -------------------+ int init() { //---- #property show_inputs // parametreleri gösterir - teşekkürler Slawa... if ( TakeProfit <= 0 ) // { TakeProfit = GridSize; } //---- GridName = StringConcatenate("Izgara", Symbol()); dönüş(0); } //+------------------------------------------- -------------------------+ //| atRate | bölgesinde açık bir pozisyon veya emir olup olmadığını test eder. //| checkLongs doğruysa uzunları kontrol eder, aksi takdirde kontrol eder | //| şortlar için | //+------------------------------------------- -------------------------+ bool IsPosition(double atRate, double inRange, bool checkLongs ) { int toplam siparişler = SiparişlerToplam(); for(int j=0;j<totalorders;j++) // tüm emirleri ve pozisyonları tara... { OrderSelect(j, SELECT_BY_POS); // cori tarafından değiştirildi. Şebekenin işlemlerini belirlemek için OrderMagicNumber'ı kullanma if ( OrderSymbol()==Symbol() && OrderMagicNumber() == uniqueGridMagic ) // sadece mygrid ve sembolün olup olmadığına bakın... { int type = OrderType(); if (MathAbs( OrderOpenPrice() - atRate ) < inRange) // tam fiyatı değil fiyat yakınlığını arayın (ızgara boyutundan küçük) { if ( ( checkLongs && ( type == OP_BUY || type == OP_BUYLIMIT || type == OP_BUYSTOP ) ) || (!checkLongs && ( type == OP_SELL || type == OP_SELLLIMIT || type == OP_SELLSTOP ) ) ) { dönüş(doğru); } } } } dönüş(yanlış); } //+------------------------------------------- -------------------+ //| komut dosyası programı başlatma işlevi | //+------------------------------------------- -------------------+ int başlangıç() { //---- int i, j,k, bilet, entermode, toplam siparişler; bool doit; çift nokta, başlangıç oranı, ticaret oranı; //---- if (MathAbs(CurTime()-LastUpdate)> UpdateInterval*60) // ilk çağrıldığında ve her UpdateInterval dakikasında güncelliyoruz { LastUpdate = CurTime(); Print("Güncelleniyor"); nokta = MarketInfo(Symbol(),MODE_POINT); başlangıç hızı = ( Sor + nokta*GridSize/2 ) / nokta / GridSize; // GridSize tarafından bölünebilen bir dizi onay işaretine yuvarlama k = başlangıç hızı; k = k * IzgaraBoyutu ; başlangıç hızı = k * nokta - GridSize*GridSteps/2*point ; // en düşük giriş noktasını hesapla double EMA34=iMA(NULL,0,34,0,MODE_EMA,PRICE_CLOSE,0); for( i=0;i<GridSteps;i++) { ticaret oranı = başlangıç hızı + i*nokta*GridSize; if ( wantLongs && (!limitEMA34 || ticari işlem > EMA34)) { if ( IsPosition(traderate,point*GridSize,true) == false ) // fiyatıma yakın açık emrim olup olmadığını test edin: öyleyse, bir tane koyun { çift myStopLoss = 0; if (StopLoss > 0 ) { myStopLoss = ticaret oranı noktası*StopLoss ; } if ( takas > Sor ) { entermode = OP_BUYSTOP; } başka { entermode = OP_BUYLIMIT; } if ( ((traderate > Sor ) && (wantBreakout)) || ((traderate <= Ask ) && (wantCounter)) ) { // cori tarafından değiştirildi. Şebekenin işlemlerini belirlemek için OrderMagicNumber'ı kullanma bilet=OrderSend(Symbol(),entermode,Lots,traderate,0,myStopLoss,traderate+point*TakeProfit,GridName,uniqueGridMagic,0,Green); } } } if ( wantShorts && (!limitEMA34 || ticaret oranı < EMA34)) { if (IsPosition(traderate,point*GridSize,false)== false ) // fiyatıma yakın açık siparişim olup olmadığını test edin: öyleyse, bir tane koyun { myStopLoss = 0; if (StopLoss > 0 ) { myStopLoss = ticaret oranı+puan*StopLoss ; } if ( ticaret > Teklif ) { entermode = OP_SELLLIMIT; } başka { entermode = OP_SELLSTOP ; } if ( ((traderate < Bid ) && (wantBreakout)) || ((traderate >= Bid ) && (wantCounter)) ) { // cori tarafından değiştirildi. Şebekenin işlemlerini belirlemek için OrderMagicNumber'ı kullanma bilet=OrderSend(Symbol(),entermode,Lots,traderate,0,myStopLoss,traderate-point*TakeProfit,GridName,uniqueGridMagic,0,Red); } } } } } dönüş(0); } //+------------------------------------------- -------------------+saygılarımla, cori
Kendimde birkaç değişiklik yaptığım için, değişikliklerinizi daha yeni sürüme entegre ettim.
1 küçük değişiklik yaptım: mevcut ızgaralarımı aktif tutmak için büyü VEYA ızgara adı üzerinde bir test yaptım ...
doğru yapıp yapmadığımı kontrol edebilir misin?
//+------------------------------------------- -------------------+ //| MakeGrid.mq4 | //| Telif hakkı © 2005, hdb | //| http://www.dubois1.net/hdb | //+------------------------------------------- -------------------+ #property telif hakkı "Telif hakkı © 2005, hdb" #özellik bağlantısı "http://www.dubois1.net/hdb" //#özellik sürümü "1.6beta" // cori tarafından değiştirildi. Şebekenin işlemlerini belirlemek için OrderMagicNumber'ı kullanma harici int uniqueGridMagic = 11111; // İşlemlerin sihirli numarası. tanımlamak için benzersiz olmalıdır // bir ızgaranın işlemleri harici çift Lot = 0.1; // dış çift GridSize = 6; // siparişler arasındaki pip - ızgara veya ağ boyutu harici çift GridSteps = 12; // verilecek toplam sipariş sayısı harici çift TakeProfit = 12 ; // kar elde etmek için tik sayısı. normalde = ızgara boyutudur, ancak geçersiz kılabilirsiniz harici çift StopLoss = 0; // eğer bir stoploss eklemek istiyorsanız. normal şebekeler durdurma kayıplarını kullanmaz harici çift UpdateInterval = 1; // siparişleri her x dakikada bir güncelle extern bool wantLongs = true; // uzun pozisyonlar istiyor muyuz extern bool WantShorts = false; // kısa pozisyonlar istiyor muyuz extern bool istiyorBreakout = true; // uzunları fiyatın üstünde, şortları fiyatın altında mı istiyoruz extern bool requestCounter = true; // uzunları fiyatın altında, şortları fiyatın üstünde mi istiyoruz harici bool limitiEMA34 = true; // uzunları sadece ema'nın üstünde, şortları sadece ema'nın altında mı istiyoruz harici çift GridMaxOpen = 0; // maksimum açık pozisyon sayısı : henüz uygulanmadı.. harici bool UseMACD = true; // true ise, yalnızca uzunlar için macd >0, yalnızca şortlar için macd >0 kullanılır // geçişte, bekleyen tüm siparişleri iptal edecek. Bu, herhangi bir // wantLongs ve wantShort ayarları - en azından şimdilik. extern bool CloseOpenPositions = false;// UseMACD ise, açık pozisyonları da kayıpla kapatıyor muyuz? // cori tarafından değiştirildi. sadece dahili değişkenler string GridName = "Izgara"; // ızgarayı tanımlar. birlikte var olan birkaç ızgaraya izin verir çift LastUpdate = 0; // son güncellemenin zamanını not etmek için kullanılan sayaç //+------------------------------------------- -------------------+ //| uzman başlatma işlevi | //+------------------------------------------- -------------------+ int init() { //---- #property show_inputs // parametreleri gösterir - teşekkürler Slawa... if ( TakeProfit <= 0 ) // { TakeProfit = GridSize; } //---- // corri'mi ekledim ve hdb tarafından kaldırıldı!! lol .. sadece açık ızgaralarla uyumlu kalmak için ... // GridName = StringConcatenate( "Izgara", Symbol() ); dönüş(0); } //+------------------------------------------- -------------------------+ //| atRate | bölgesinde açık bir pozisyon veya emir olup olmadığını test eder. //| checkLongs doğruysa uzunları kontrol eder, aksi takdirde kontrol eder | //| şortlar için | //+------------------------------------------- -------------------------+ bool IsPosition(double atRate, double inRange, bool checkLongs ) { int toplam siparişler = SiparişlerToplam(); for(int j=0;j<totalorders;j++) // tüm emirleri ve pozisyonları tara... { OrderSelect(j, SELECT_BY_POS); // cori tarafından değiştirildi. Uyumluluk için ızgara // hdb eklenmiş veya ızgara adının işlemlerini tanımlamak için OrderMagicNumber'ı kullanma if ( OrderSymbol()==Symbol() && ( (OrderMagicNumber() == uniqueGridMagic) || (OrderComment() == GridName)) ) // sadece mygrid ve sembolün olup olmadığına bakın... { int type = OrderType(); if (MathAbs( OrderOpenPrice() - atRate ) < inRange) // tam fiyatı değil fiyat yakınlığını arayın (ızgara boyutundan daha az) { if ( ( checkLongs && ( type == OP_BUY || type == OP_BUYLIMIT || type == OP_BUYSTOP ) ) || (!checkLongs && ( type == OP_SELL || type == OP_SELLLIMIT || type == OP_SELLSTOP ) ) ) { dönüş(doğru); } } } } dönüş(yanlış); } //+------------------------------------------- -------------------------+ //| bekleyen tüm siparişleri iptal eder | //+------------------------------------------- -------------------------+ void CloseAllPendingOrders() { int toplam siparişler = SiparişlerToplam(); for(int j=totalorders-1;j>=0;j--) // tüm emirleri ve pozisyonları tara... { OrderSelect(j, SELECT_BY_POS); // cori'ye göre değiştirildi. Uyumluluk için ızgara // hdb eklenmiş veya ızgara adının işlemlerini tanımlamak için OrderMagicNumber'ı kullanma if ( OrderSymbol()==Symbol() && ( (OrderMagicNumber() == uniqueGridMagic) || (OrderComment() == GridName)) ) // sadece mygrid ve sembolün olup olmadığına bakın... { int türü = OrderType(); bool sonucu = yanlış; anahtar (tip) { durum OP_BUY : sonuç = doğru ; durum OP_SELL : sonuç = doğru ; //Bekleyen siparişleri kapat durum OP_BUYLIMIT : sonuç = OrderDelete( OrderTicket() ); durum OP_BUYSTOP : sonuç = OrderDelete( OrderTicket() ); durum OP_SELLLIMIT : sonuç = OrderDelete(OrderTicket()); durum OP_SELLSTOP : sonuç = OrderDelete(OrderTicket()); } } } dönüş; } //+------------------------------------------- -------------------------+ //| bekleyen tüm emirleri iptal eder ve açık pozisyonları kapatır | //+------------------------------------------- -------------------------+ geçersiz CloseOpenOrders() { int toplam = SiparişlerToplam(); for(int i=toplam-1;i>=0;i--) { OrderSelect(i, SELECT_BY_POS); int türü = OrderType(); bool sonucu = yanlış; // cori tarafından değiştirildi. Uyumluluk için ızgara // hdb eklenmiş veya ızgara adının işlemlerini tanımlamak için OrderMagicNumber'ı kullanma if ( OrderSymbol()==Symbol() && ( (OrderMagicNumber() == uniqueGridMagic) || (OrderComment() == GridName)) ) // sadece mygrid ve sembolün olup olmadığına bakın... { // Print("2 Kapanış",type); anahtar (tip) { //Açılan uzun pozisyonları kapat durum OP_BUY : sonuç = OrderClose( OrderTicket(), OrderLots(), MarketInfo(OrderSymbol(), MODE_BID), 5, Red ); kırmak; //Açılan kısa pozisyonları kapat durum OP_SELL : sonuç = OrderClose( OrderTicket(), OrderLots(), MarketInfo(OrderSymbol(), MODE_ASK), 5, Red ); kırmak; //Bekleyen siparişleri kapat durum OP_BUYLIMIT : durum OP_BUYSTOP : durum OP_SELLLIMIT : durum OP_SELLSTOP : sonuç = OrderDelete(OrderTicket()); } } if(sonuç == yanlış) { // Alert("Order " , OrderTicket() , " kapatılamadı. Hata:" , GetLastError() ); // Uyku(3000); } } dönüş; } //+------------------------------------------- -------------------+ //| komut dosyası programı başlatma işlevi | //+------------------------------------------- -------------------+ int başlangıç() { //---- int i, j,k, bilet, entermode, toplam siparişler; bool doit; çift nokta, başlangıç oranı, ticaret oranı; //---- if (MathAbs(CurTime()-LastUpdate)> UpdateInterval*60) // ilk çağrıldığında ve her UpdateInterval dakikasında güncelliyoruz { LastUpdate = CurTime(); nokta = MarketInfo(Symbol(),MODE_POINT); başlangıç hızı = ( Sor + nokta*GridSize/2 ) / nokta / GridSize; // GridSize tarafından bölünebilen bir dizi onay işaretine yuvarlama k = başlangıç hızı; k = k * IzgaraBoyutu ; başlangıç hızı = k * nokta - GridSize*GridSteps/2*point ; // en düşük giriş noktasını hesapla double EMA34=iMA(NULL,0,34,0,MODE_EMA,PRICE_CLOSE,0); if ( UseMACD ) { double Macd0=iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_MAIN,0); double Macd1=iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_MAIN,1); double Macd2=iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_MAIN,2); if( Macd0>0 && Macd1>0 && Macd2<0) // çapraz { CloseAllPendingOrders(); if ( CloseOpenPositions == true ) { CloseOpenOrders(); } } if( Macd0<0 && Macd1<0 && Macd2>0) // çapraz { CloseAllPendingOrders(); if ( CloseOpenPositions == true ) { CloseOpenOrders(); } } WantLongs = yanlış; WantShorts = yanlış; if( Macd0>0 && Macd1>0 && Macd2>0) // sıfırın çok üzerinde { WantLongs = doğru; } if( Macd0<0 && Macd1<0 && Macd2<0) // sıfırın çok altında { WantShorts = doğru; } } for( i=0;i<GridSteps;i++) { ticaret oranı = başlangıç hızı + i*nokta*GridSize; if ( wantLongs && (!limitEMA34 || ticari işlem > EMA34)) { if ( IsPosition(traderate,point*GridSize,true) == false ) // fiyatıma yakın açık siparişim olup olmadığını test edin: öyleyse, bir tane koyun { çift myStopLoss = 0; if (StopLoss > 0 ) { myStopLoss = ticaret oranı noktası*StopLoss ; } if ( takas > Sor ) { entermode = OP_BUYSTOP; } başka { entermode = OP_BUYLIMIT; } if ( ((traderate > Sor ) && (wantBreakout)) || ((traderate <= Ask ) && (wantCounter)) ) { // cori tarafından değiştirildi. Şebekenin işlemlerini belirlemek için OrderMagicNumber'ı kullanma bilet=OrderSend(Symbol(),entermode,Lots,traderate,0,myStopLoss,traderate+point*TakeProfit,GridName,uniqueGridMagic,0,Green); } } } if ( wantShorts && (!limitEMA34 || ticaret oranı < EMA34)) { if (IsPosition(traderate,point*GridSize,false)== false ) // fiyatıma yakın açık siparişim olup olmadığını test edin: öyleyse, bir tane koyun { myStopLoss = 0; if (StopLoss > 0 ) { myStopLoss = ticaret oranı+puan*StopLoss ; } if ( ticaret > Teklif ) { entermode = OP_SELLLIMIT; } başka { entermode = OP_SELLSTOP; } if ( ((traderate < Bid ) && (wantBreakout)) || ((traderate >= Bid ) && (wantCounter)) ) { // cori tarafından değiştirildi. Şebekenin işlemlerini belirlemek için OrderMagicNumber'ı kullanma bilet=OrderSend(Symbol(),entermode,Lots,traderate,0,myStopLoss,traderate-point*TakeProfit,GridName,uniqueGridMagic,0,Red); } } } } } dönüş(0); } //+------------------------------------------- -------------------+Iyi gorunuyor. Ancak GridName'i extern olarak tanımlamanız gerekir, ki bunu değiştirmiştim, çünkü buna parametre olarak ihtiyacım yoktu.
selamlar, cori
Satırı değiştirebilirsiniz:
if (MathAbs( OrderOpenPrice() - atRate ) < inRange) // tam fiyatı değil fiyat yakınlığını arayın (ızgara boyutundan küçük)
ile
if (MathAbs( OrderOpenPrice() - atRate ) < (inRange*0.9)) // tam fiyatı değil fiyat yakınlığını arayın (ızgara boyutundan daha az) - kayan nokta hataları nedeniyle 0.9 eklendi
ve bu sorunu düzeltir.
Rahatsızlık için özür dilerim...
sarılmak
Bu Sorun zaten orada mı?
Eski MQL2'de benzer bir şey buldum.
Bu sorunu aşmanın gerçekten kesin yolu şöyle bir şey yapmaktır:
int intOOP = MathRound( OrdeOpenPrice() / Nokta);
tüm çift değişkenleriniz için. O zaman hatasız karşılaştırılabilir tüm düz int değişkenleriniz var.
Açık ve anlaşılır olması için yazması biraz daha fazla ama daha az hatalı.
saygılarımla,
kori
Saygılarımızla,
sarılmak
1) UseMACD, wantLongs, wantShorts mantığını değiştirdi. Daha önce, useMACD ayarlanmışsa, EA, wnatLongs ve wantShorts bayraklarından bağımsız olarak uzunları ve kısaları alıyordu. Şimdi, useMACD bu bayrakları geçersiz kılmaz, böylece yalnızca useMACD ile uzun veya yalnızca kısa olabilirsiniz.
2) EMA34 limiti ayarlanmışsa, EMA'nın yanlış tarafında açık sipariş olmadığından emin olmak için ek bir kontrol ekledim. Eskiden siparişler EMA'nın çok üstüne veya altına yerleştirildi, ancak birkaç saat sonra EMA taşındı.. yani EMA'nın her iki tarafında da siparişler vardı.
3) OrderType() üzerindeki switch ifadesinde bir hata var gibi görünüyor. Ne olduğundan emin değilim ama gerçekten komik davranıyor. Sadece switch deyimlerini kaldırdım ve yerine "if" koydum... hoşuma gitmedi ama işe yarıyor!
4) EMA periyodu değişkenini yaptım... geriye dönük test için güzel ..
Birisi isterse birkaç eşlik eden komut dosyam da var:
1) bir çift için doldurulmamış açık siparişleri kaldırmak için
2) tek seferde tüm çiftler için tüm açık siparişleri kaldırmak için
3) tüm pozisyonları kapatmak ve açık emirleri kaldırmak.
4) açık pozisyonlardan ve geçmişten şebeke davranışı hakkında bazı basit istatistikler elde etmek.
İşte V1.08'in kodu:
//+------------------------------------------- -------------------+ //| MakeGrid.mq4 | //| Telif hakkı © 2005, hdb | //| http://www.dubois1.net/hdb | //+------------------------------------------- -------------------+ #property telif hakkı "Telif hakkı © 2005, hdb" #özellik bağlantısı "http://www.dubois1.net/hdb" //#özellik sürümü "1.8" // SORUMLULUK REDDİ ***** ÖNEMLİ NOT ***** KULLANMADAN ÖNCE OKUYUN ***** // Bu uzman danışman, gerçek pozisyonları açıp kapatabilir ve dolayısıyla gerçek işlemler yapabilir ve gerçek para kaybedebilir. // Bu bir 'ticaret sistemi' değil, işlemleri sabit kurallara göre yerleştiren basit bir robottur. // Yazarın bu sistemin karlılığı konusunda hiçbir iddiası yoktur ve kullanımını önermez. // bu EA'nın demo hesaplarındaki test amaçları dışında. // Bu sistemin kullanımı ücretsizdir - ancak yeniden satamazsınız - ve herhangi bir garantisi yoktur. // herhangi bir amaç için uygunluk. // Bu programı kullanarak, programın ne yaptığını anladığınızı ve // yazar herhangi bir kayıptan sorumlu değildir. // Kullanmadan önce, lütfen brokerinizle, sistemlerinin sık yapılan işlemler için uyarlandığını kontrol edin. // bu uzmanla ilişkili. // 1.8 değişiklik // requestLongs ve wantShorts'u yerel değişkenlere dönüştürdük. Önceden, UseMACD'yi true olarak ayarlarsanız, // uzunlar ve kısalar yaptı ve sadece wantLongs ve wantShorts bayraklarını görmezden geldi. // Şimdi, bu bayraklar göz ardı edilmez. // EMA34 limiti aşıldığında EMA'nın üstünde veya altında 'yasadışı' açık emirler olup olmadığını kontrol etmek için bir döngü eklendi // bayrak kullanılır. Bunlar zamanla birikir ve asla kaldırılmaz ve EMA'nın hareket etmesinden kaynaklanır. // çalışmadığı için switch talimatı kaldırıldı - if ifadeleri ile değiştirildi // EMA dönem değişkenini yaptı // // // cori tarafından değiştirildi. Şebekenin işlemlerini belirlemek için OrderMagicNumber'ı kullanma harici int uniqueGridMagic = 11111; // İşlemlerin sihirli numarası. tanımlamak için benzersiz olmalıdır // bir ızgaranın işlemleri dış çift Lot = 0.1; // dış çift GridSize = 6; // siparişler arasındaki pip - ızgara veya ağ boyutu harici çift GridSteps = 12; // verilecek toplam sipariş sayısı harici çift TakeProfit = 12 ; // kar elde etmek için tik sayısı. normalde = ızgara boyutudur, ancak geçersiz kılabilirsiniz harici çift StopLoss = 0; // eğer bir stoploss eklemek istiyorsanız. normal şebekeler durdurma kayıplarını kullanmaz harici çift UpdateInterval = 1; // siparişleri her x dakikada bir güncelle extern bool wantLongs = true; // uzun pozisyonlar istiyor muyuz extern bool wantShorts = true; // kısa pozisyonlar istiyor muyuz extern bool istiyorBreakout = true; // uzunları fiyatın üstünde, şortları fiyatın altında mı istiyoruz extern bool requestCounter = true; // uzunları fiyatın altında, şortları fiyatın üstünde mi istiyoruz harici bool limitiEMA = true; // uzunları sadece ema'nın üstünde, şortları sadece ema'nın altında mı istiyoruz extern int EMAperiod = 34; // EMA'nın uzunluğu daha önce 34 olarak sabitlenmişti. harici çift GridMaxOpen = 0; // maksimum açık pozisyon sayısı : henüz uygulanmadı.. harici bool UseMACD = true; // true ise, yalnızca uzunlar için macd >0, yalnızca şortlar için macd >0 kullanılır // geçişte, bekleyen tüm siparişleri iptal edecek. Bu, herhangi bir // wantLongs ve wantShort ayarları - en azından şimdilik. extern bool CloseOpenPositions = false;// UseMACD ise, açık pozisyonları da kayıpla kapatıyor muyuz? extern bool doHouseKeeping = true; // sadece bir test // cori tarafından değiştirildi. sadece dahili değişkenler string GridName = "Izgara"; // ızgarayı tanımlar. birlikte var olan birkaç ızgaraya izin verir çift LastUpdate = 0; // son güncellemenin zamanını not etmek için kullanılan sayaç //+------------------------------------------- -------------------+ //| uzman başlatma işlevi | //+------------------------------------------- -------------------+ int init() { //---- #property show_inputs // parametreleri gösterir - teşekkürler Slawa... //---- // corri'mi ekledim ve hdb tarafından kaldırıldı!! lol .. sadece açık ızgaralarla uyumlu kalmak için ... // GridName = StringConcatenate( "Izgara", Symbol() ); dönüş(0); } //+------------------------------------------- -------------------------+ //| atRate | bölgesinde açık bir pozisyon veya emir olup olmadığını test eder. //| checkLongs doğruysa uzunları kontrol eder, aksi takdirde kontrol eder | //| şortlar için | //+------------------------------------------- -------------------------+ bool IsPosition(double atRate, double inRange, bool checkLongs ) { int toplam siparişler = SiparişlerToplam(); for(int j=0;j<totalorders;j++) // tüm emirleri ve pozisyonları tara... { OrderSelect(j, SELECT_BY_POS); // cori tarafından değiştirildi. Uyumluluk için ızgara // hdb eklenmiş veya ızgara adının işlemlerini tanımlamak için OrderMagicNumber'ı kullanma if ( OrderSymbol()==Symbol() && ( (OrderMagicNumber() == uniqueGridMagic) || (OrderComment() == GridName)) ) // sadece mygrid ve sembol olup olmadığına bakın... { int type = OrderType(); if (MathAbs( OrderOpenPrice() - atRate ) < (inRange*0.9)) // tam fiyatı değil fiyat yakınlığını arayın (ızgara boyutundan daha az) - kayan nokta hataları nedeniyle 0.9 eklendi { if ( ( checkLongs && ( type == OP_BUY || type == OP_BUYLIMIT || type == OP_BUYSTOP ) ) || (!checkLongs && ( type == OP_SELL || type == OP_SELLLIMIT || type == OP_SELLSTOP ) ) ) { dönüş(doğru); } } } } dönüş(yanlış); } //+------------------------------------------- -------------------------+ //| bekleyen tüm siparişleri iptal eder | //+------------------------------------------- -------------------------+ void CloseAllPendingOrders() { int toplam siparişler = SiparişlerToplam(); for(int j=totalorders-1;j>=0;j--) // tüm emirleri ve pozisyonları tara... { OrderSelect(j, SELECT_BY_POS); // cori'ye göre değiştirildi. Uyumluluk için ızgara // hdb eklenmiş veya ızgara adının işlemlerini tanımlamak için OrderMagicNumber'ı kullanma if ( OrderSymbol()==Symbol() && ( (OrderMagicNumber() == uniqueGridMagic) || (OrderComment() == GridName)) ) // sadece mygrid ve sembol olup olmadığına bakın... { int türü = OrderType(); if ( yazın > 1 ) bool sonuç = OrderDelete( OrderTicket() ); } } dönüş; } //+------------------------------------------- -------------------------+ //| bekleyen tüm emirleri iptal eder ve açık pozisyonları kapatır | //+------------------------------------------- -------------------------+ geçersiz CloseOpenOrders() { int toplam = SiparişlerToplam(); for(int i=toplam-1;i>=0;i--) { OrderSelect(i, SELECT_BY_POS); int türü = OrderType(); bool sonucu = yanlış; // cori tarafından değiştirildi. Uyumluluk için ızgara // hdb eklenmiş veya ızgara adının işlemlerini tanımlamak için OrderMagicNumber'ı kullanma if ( OrderSymbol()==Symbol() && ( (OrderMagicNumber() == uniqueGridMagic) || (OrderComment() == GridName)) ) // sadece mygrid ve sembol olup olmadığına bakın... { //Açılan uzun pozisyonları kapat if ( type == OP_BUY ) sonuç = OrderClose( OrderTicket(), OrderLots(), MarketInfo(OrderSymbol(), MODE_BID), 5, Red ); //Açılan kısa pozisyonları kapat if ( type == OP_SELL ) sonuç = OrderClose( OrderTicket(), OrderLots(), MarketInfo(OrderSymbol(), MODE_ASK), 5, Red ); //Bekleyen siparişleri kapat if ( yazın > 1 ) sonuç = OrderDelete( OrderTicket() ); } } dönüş; } //+------------------------------------------- -------------------------+ //| EMA'nın yanlış tarafına düşen tüm açık siparişleri iptal eder | //+------------------------------------------- -------------------------+ EMA'dan CloseOrders'ı geçersiz kılar (EMAValue'yu ikiye katlayın) { int toplam siparişler = SiparişlerToplam(); for(int j=totalorders-1;j>=0;j--) // tüm emirleri ve pozisyonları tara... { OrderSelect(j, SELECT_BY_POS); if ( OrderSymbol()==Symbol() && ( (OrderMagicNumber() == uniqueGridMagic) || (OrderComment() == GridName)) ) // sadece mygrid ve sembol olup olmadığına bakın... { int türü = OrderType(); bool sonucu = yanlış; //if (tür > 1) Print(type," ",theEMAValue," ",OrderOpenPrice()); if ( type == OP_BUYLIMIT && OrderOpenPrice() <= theEMAValue ) sonuç = OrderDelete( OrderTicket() ); if ( type == OP_BUYSTOP && OrderOpenPrice() <= theEMAValue ) sonuç = OrderDelete( OrderTicket() ); if ( type == OP_SELLLIMIT && OrderOpenPrice() >= theEMAValue ) sonuç = OrderDelete( OrderTicket() ); if ( type == OP_SELLSTOP && OrderOpenPrice() >= theEMAValue ) sonuç = OrderDelete( OrderTicket() ); } } dönüş; } //+------------------------------------------- -------------------+ //| komut dosyası programı başlatma işlevi | //+------------------------------------------- -------------------+ int başlangıç() { //---- int i, j,k, bilet, entermode, toplam siparişler; bool doit; çift nokta, başlangıç oranı, ticaret oranı; //---- kurulum parametreleri if ( TakeProfit <= 0 ) // { TakeProfit = GridSize; } bool myWantLongs = wantLongs; bool myWantShorts = wantShorts; //---- if (MathAbs(CurTime()-LastUpdate)> UpdateInterval*60) // ilk çağrıldığında ve her UpdateInterval dakikasında güncelliyoruz { LastUpdate = CurTime(); nokta = MarketInfo(Symbol(),MODE_POINT); başlangıç hızı = ( Sor + nokta*GridSize/2 ) / nokta / GridSize; // GridSize tarafından bölünebilen bir dizi onay işaretine yuvarlama k = başlangıç hızı; k = k * IzgaraBoyutu ; başlangıç hızı = k * nokta - GridSize*GridSteps/2*point ; // en düşük giriş noktasını hesapla double myEMA=iMA(NULL,0,EMAperiod,0,MODE_EMA,PRICE_CLOSE,0); if (limitEMA) { if (doHouseKeeping) EMA'dan(myEMA) Siparişleri Kapat; } eğer (UseMACD ) { double Macd0=iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_MAIN,0); double Macd1=iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_MAIN,1); double Macd2=iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_MAIN,2); if( Macd0>0 && Macd1>0 && Macd2<0) // çapraz { CloseAllPendingOrders(); if ( CloseOpenPositions == true ) { CloseOpenOrders(); } } if( Macd0<0 && Macd1<0 && Macd2>0) // çapraz { CloseAllPendingOrders(); if ( CloseOpenPositions == true ) { CloseOpenOrders(); } } myWantLongs = yanlış; myWantShorts = yanlış; if( Macd0>0 && Macd1>0 && Macd2>0 && wantLongs ) // sıfırın oldukça üzerinde { myWantLongs = doğru; } if( Macd0<0 && Macd1<0 && Macd2<0 && wantShorts ) // sıfırın oldukça altında { myWantShorts = doğru; } } for( i=0;i<GridSteps;i++) { ticaret oranı = başlangıç hızı + i*nokta*GridSize; if ( myWantLongs && (!limitEMA || traderate > myEMA)) { if ( IsPosition(traderate,point*GridSize,true) == false ) // fiyatıma yakın açık siparişim olup olmadığını test edin: öyleyse, bir tane koyun { çift myStopLoss = 0; if (StopLoss > 0 ) { myStopLoss = ticaret oranı noktası*StopLoss ; } if ( takas > Sor ) { entermode = OP_BUYSTOP; } başka { entermode = OP_BUYLIMIT; } if ( ((traderate > Sor ) && (wantBreakout)) || ((traderate <= Ask ) && (wantCounter)) ) { // cori tarafından değiştirildi. Şebekenin işlemlerini belirlemek için OrderMagicNumber'ı kullanma bilet=OrderSend(Symbol(),entermode,Lots,traderate,0,myStopLoss,traderate+point*TakeProfit,GridName,uniqueGridMagic,0,Green); } } } if ( myWantShorts && (!limitEMA || traderate < myEMA)) { if (IsPosition(traderate,point*GridSize,false)== false ) // fiyatıma yakın açık siparişim olup olmadığını test edin: öyleyse, bir tane koyun { myStopLoss = 0; if (StopLoss > 0 ) { myStopLoss = ticaret oranı+puan*StopLoss ; } if ( ticaret > Teklif ) { entermode = OP_SELLLIMIT; } başka { entermode = OP_SELLSTOP ; } if ( ((traderate < Bid ) && (wantBreakout)) || ((traderate >= Bid ) && (wantCounter)) ) { // cori tarafından değiştirildi. Şebekenin işlemlerini belirlemek için OrderMagicNumber'ı kullanma bilet=OrderSend(Symbol(),entermode,Lots,traderate,0,myStopLoss,traderate-point*TakeProfit,GridName,uniqueGridMagic,0,Red); } } } } } dönüş(0); } //+------------------------------------------- -------------------+