ForumBölümler

[ARŞİV!] Forumu kirletmemek için herhangi bir acemi sorusu. Profesyonel, kaçırmayın. Sensiz hiçbir yerde - 4. - sayfa 557

Yeni yorum

Daha. Aslında henüz script kullanmadım. Günlükte 2012.11.30 13:05:56 Komut Dosyası EURUSD Satın Al,Haftalık: başarıyla yüklendi ve 2012.11.30 13:06:47 Komut Dosyası EURUSD Satın Al,Haftalık: kaldırıldı

Ve daha fazlası değil... Neye ihtiyacı var???

Köpek!!! Üçüncü gün çalışmıyor..

Dimka-novitsek :

Daha. Aslında henüz script kullanmadım. Günlükte 2012.11.30 13:05:56 Komut Dosyası EURUSD Satın Al,Haftalık: başarıyla yüklendi ve 2012.11.30 13:06:47 Komut Dosyası EURUSD Satın Al,Haftalık: kaldırıldı

Ve daha fazlası değil... Neye ihtiyacı var???

Köpek!!! Üçüncü gün çalışmıyor..


Bana kodu ver. Bir bakacağım. Doğru olanı yayınlayacağım.

//+------------------------------------------------------------------+
//|                                                      Покупка.mq4 |
//|                        Copyright 2012, MetaQuotes Software Corp. |
//|                                        http://www.metaquotes.net |
//+------------------------------------------------------------------+
#property copyright "Copyright 2012, MetaQuotes Software Corp."
#property link       "http://www.metaquotes.net"

//+------------------------------------------------------------------+
//| script program start function                                    |
//+------------------------------------------------------------------+
int start()
  {
//----
for ( int i= 0 ;i<= OrdersTotal ();i++){
   if ( OrderSelect (i, SELECT_BY_POS, MODE_TRADES) == true )
 { if (OrderSymbol() != Symbol ()) continue ; 
   if (OrderType()==OP_SELL) 
  OrderClose(OrderTicket(),OrderLots(),Ask, 6 ,Red); 
   if (OrderType()==OP_BUY)
  OrderClose(OrderTicket(),OrderLots(),Bid, 6 ,Red);  
   if (OrderType()>= 2 )
  OrderDelete(OrderTicket());  }} 
//----
   for (i= 0 ;i< 23 ;i++){
   Sleep ( 2000 );RefreshRates(); if (!IsTradeAllowed()) continue ;
   int tiket= OrderSend ( Symbol (),OP_BUY, 0.1 ,Ask, 6 , 0 , 0 , "Skript" , 98600 , 0 ,Blue);
   if ( tiket!=- 1 ) break ;}
     
          
//----
   return ( 0 );
  }
//+------------------------------------------------------------------+
Tabii ki, hemen şimdi! Evet, kod hiçbir şey gibi görünmüyor ... Ne olduğunu bilmiyorum.. Ancak, elbette hemen yayınlayacağım!
Dimka-novitsek :
Tabii ki, hemen şimdi! Evet, kod hiçbir şey gibi görünmüyor ... Ne olduğunu bilmiyorum.. Ancak, elbette hemen yayınlayacağım!

Şu şekilde çalışabilir:

 //+------------------------------------------------------------------+
//| script program start function                                    |
//+------------------------------------------------------------------+
#include     <stderror.mqh>                         // Библиотека кодов ошибок
int start()
{
     double ld_Price;
//----
     for ( int i = OrdersTotal () - 1 ; i >= 0 ; i--)
    {
         if (! OrderSelect (i, SELECT_BY_POS, MODE_TRADES)) continue ;
         if (OrderSymbol() != Symbol ()) continue ; 
         if (OrderType() >= 2 )
        {OrderDelete (OrderTicket());   continue ;}
         if (OrderType() == OP_SELL) ld_Price = Ask;
         else if (OrderType() == OP_BUY) ld_Price = Bid;
        OrderClose (OrderTicket(), OrderLots(), NormalizeDouble (ld_Price, Digits ), 6 , Red);
    }
//----
     for (i = 0 ; i < 23 ; i++)
    {
         Sleep ( 2000 );
         if (!IsTradeAllowed()) continue ;
        RefreshRates();
         if ( OrderSend ( Symbol (), OP_BUY, 0.1 , NormalizeDouble (Ask, Digits ), 6 , 0.0 , 0.0 , "Skript" , 98600 , 0 , Blue) > 0) break ;
         else Print ( "Error: " , ErrorDescription ( GetLastError ()));
    }
//----
     return ( 0 );
}
//+------------------------------------------------------------------+
Şimdi deneyeceğim! Teşekkür ederim!

' OrderSend ' - beklenen karşılaştırma ifadesi C:\TeleTRADE\experts\scripts\Purchaseforum.mq4 (33, 13)

düşünüp düzelteceğim..



Ve robotumun güzel bir kodu var, değil mi?

Dimka-novitsek :

'OrderSend' - beklenen karşılaştırma ifadesi C:\TeleTRADE\experts\scripts\Purchaseforum.mq4 (33, 13)

düşünüp düzelteceğim..

Düzeltildi (orijinal metin).

TarasBY :

Şu şekilde çalışabilir:


Teşekkürler Tarasby .
Söyle bana, gerçekten de el el ile mi yazılmış?
 Print ( "Error: " , ErrorDescription ( GetLastError ()));
Önemli değil, artık de elel'de değil.
1...550551552553554555556557558559560561562563564...633
Yeni yorum