Belli Miktar Kar eden Orderları Kapatmak
FOREX Forumu Forex Türkiye, Parite İşlemleri, FOREX, Döviz, Metatrader, EA, Mql4 Kodları
...
Duyurular: Kayıp Uyarısı ve Kullanım Şartlarının Forumu Kullanan Üyelerce Kabulünün İlanı : http://www.fxturkiye.com/kayip_uyarisi_ve_kullanim_sartlarinin_forumu_kullanan_uyelerce_kabulunun_ilani-t156.0.html
 
*
Merhaba, Ziyaretçi. Lütfen giriş yapın veya üye olun.
Aktivasyon mailiniz gelmediyse buraya tıklayın.
Åžubat 09, 2012, 01:46


Kullanıcı adınızı, parolanızı ve aktif kalma süresini giriniz



Sayfa: [1]
  Bu Konuyu Gönder  |  Yazdır  
Gönderen Konu: Belli Miktar Kar eden Orderları Kapatmak  (Okunma Sayısı 1166 defa)
LegaL
Yeni Üye
*
Mesaj Sayısı: 31


Üyelik Bilgileri
« : AÄŸustos 16, 2008, 19:53 »

// Chart hangisind olduğu önemli değil. expert advisor olarak birine eklenemsi yeterli 350 usd kar etmiş tum emirleri kapat
extern double KarMiktari=350.00;
int start()
{
bool result;
double price;
int cmd,error;
//----


int total=OrdersTotal();
for( int cnt=0;cnt<total;cnt++ )
{
if(OrderSelect(0,SELECT_BY_POS,MODE_TRADES))
{
cmd=OrderType();
//---- first order is buy or sell
if(cmd==OP_BUY || cmd==OP_SELL)
{
while(true)
{
if(cmd==OP_BUY) price = MarketInfo(OrderSymbol(), MODE_BID);
else price = MarketInfo(OrderSymbol(), MODE_ASK);


if (OrderProfit()>KarMiktari) result=OrderClose(OrderTicket(),OrderLots(),price, 3,CLR_NONE);

if(result!=TRUE) { error=GetLastError(); Print("LastError = ",error); }
else error=0;
if(error==135) RefreshRates();
else break;
}
}
}
else Print( "Error when order select ", GetLastError());
//----
}
return(0);
}
Moderatöre Bildir   Logged
Sayfa: [1]
  Bu Konuyu Gönder  |  Yazdır  
 
Gitmek istediÄŸiniz yer:  

|Forex |Site Map | Arsiv | Wap | Wap2 | Wap Forum | XML | Rss
MySQL ile Güçlendirildi PHP ile Güçlendirildi Powered by SMF 1.1.14 | SMF © 2006-2008, Simple Machines LLC

XHTML 1.0 Geçerli! CSS Geçerli! Dilber MC Theme by HarzeM