İDEAL veri terminalinde /Sistem/İndikatör/Robot

[Bear_Bull]

VİOP için olan tek satırlık robot hisse için de var mıydı acaba?

çok satır olsa

var LotSize = 1; //işlem adedi
var Sembol = "IMKBH'GARAN";
var Periyot = "60"; //60 dklık grafik
var SistemAdi = "EMA_5_10"; //sistemizim adını buraya girin çift tırnak içinde 

var MySistem = Sistem.SistemGetir(SistemAdi, Sembol, Periyot); //sistemin adı, grafik sembolü, grafiğin periyodu
if (MySistem == null) 
{
   Sistem.Mesaj(Sistem.Name + "Hatalı Çalışıyor !");
}
else
{
   var EmirSembol = Sembol;
   var SonFiyat = Sistem.SonFiyat(EmirSembol);
   var Anahtar = Sistem.Name + "," + EmirSembol;
   double IslemFiyat = 0;
   DateTime IslemTarih;
   var Miktar = 0.0;
   var Rezerv = "";
   var Pozisyon = Sistem.PozisyonKontrolOku(Anahtar, out IslemFiyat, out IslemTarih);
   var SonYon = Sistem.SonYonGetir(SistemAdi, Sembol, Periyot);
   if (Sistem.Saat.CompareTo("10:00:00") <= 0 || Sistem.Saat.CompareTo("18:04:59") >= 0)  // seans yok işlem yapma
   {
   }
   if (Sistem.Saat.CompareTo("14:00:00") <= 0 && Sistem.Saat.CompareTo("13:00:00") >= 0)  // seans yok işlem yapma
   {
   }
   else if (SonYon == "F" && Pozisyon != 0)  // Flata Geç
      Miktar = -Pozisyon;
   else if (SonYon == "A" && Pozisyon != LotSize)  // Al
      Miktar = LotSize - Pozisyon;
   else if (SonYon == "S" && Pozisyon != -LotSize)  // Sat
      Miktar = -LotSize - Pozisyon;
    // Emir Gönder
    var Islem = "";
    if (Miktar > 0) {Islem = "ALIS"; Rezerv = "ALIŞ YAPILDI";}
    if (Miktar < 0) {Islem = "SATIS"; Rezerv = "SATIŞ YAPILDI";}
    if (Islem != "")
    {
        Sistem.PozisyonKontrolGuncelle(Anahtar, Miktar + Pozisyon, SonFiyat, Rezerv);
        Sistem.EmirSembol = EmirSembol ;
        Sistem.EmirIslem = Islem;
        Sistem.EmirSuresi = "KIE"; // GUN, KIE, IKG
        Sistem.EmirTipi = "Piyasa"; // Piyasa, Limitli, Piyasadan Limite
        Sistem.EmirMiktari = Math.Abs(Miktar);
        Sistem.EmirGonder();
    }
} 

[saruhan]

çok satır olsa




[/php]

Niye olmasın abi..Canın sağolsun...