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

[engin.kilic.73]

Hocam tekrardan çok teşekkür ederim. Buda oldu. Sonunda güzel bir robot kalıbı olduğunu düşünüyorum Kendim için.

Bunun Parasal değil lot olarak emir göndermek istersek nereyi düzeltmemiz lazım hocam.

[yuji]

Hocam tekrardan çok teşekkür ederim. Buda oldu. Sonunda güzel bir robot kalıbı olduğunu düşünüyorum Kendim için.

Bunun Parasal değil lot olarak emir göndermek istersek nereyi düzeltmemiz lazım hocam.

Lotlu hali daha sade:

var SistemAdi = "Sistemim_1"; //sistemizin adı 
var GrafikPeriyodu = "1";  //grafiğin priyodu 
var ToplamPozisyon = 24; //Kaç defa alım yapılacak 

var hisseLot = new Dictionary<string, int>();
hisseLot["IMKBH'PETKM"] = 10;
hisseLot["IMKBH'KRDMD"] = 20;
hisseLot["IMKBH'KCHOL"] = 30;
hisseLot["IMKBH'AKBNK"] = 10;
hisseLot["IMKBH'EREGL"] = 20;
hisseLot["IMKBH'EKGYO"] = 30;


for (var No = 0; No < hisseLot.Count; No++) 
{ 
    var item    = hisseLot.ElementAt(No);
    var Sembol  = item.Key;//sistemin sinyal ürettiği grafik sembolü 
    var LotSize = item.Value;//sistemin sinyal ürettiği hisse için yukarıda tanımlanan lot
    
    var SonFiyat = (decimal)Sistem.SonFiyat(Sembol); 
    var SonYon   = Sistem.SonYonGetir(SistemAdi, Sembol, GrafikPeriyodu); 
    var PozisyonAnahtari = Sistem.Name + ", " + Sembol + ", " + GrafikPeriyodu; 
    var EmirAnahtari     = Sistem.Name + "::" + Sembol + "::" + GrafikPeriyodu; 

    double IslemFiyat = 0; 
    DateTime IslemTarih;     
    var Pozisyon = Sistem.PozisyonKontrolOku(PozisyonAnahtari, out IslemFiyat, out IslemTarih); 
    
    var EmirTekrari = Sistem.PozisyonKontrolOku(EmirAnahtari);  
        
    var Islem = ""; 
    if (SonYon == "A" && (Pozisyon == 0 || Sistem.ZamanKontrolSaniye(EmirAnahtari) >= 10) && EmirTekrari <= ToplamPozisyon) 
    { 
        Islem = "ALIS"; 
    } 
    if (SonYon == "F" && Pozisyon > 0 && Sistem.ZamanKontrolSaniye(EmirAnahtari) >= 10)  // Sat 
    {    
        Islem = "SATIS"; 
    }
    
    if (Islem != "") 
    {     
        Sistem.ZamanKontrolGuncelle(EmirAnahtari);
        
        if (Islem == "ALIS") 
        { 
            EmirTekrari++; 
            Sistem.PozisyonKontrolGuncelle(EmirAnahtari, EmirTekrari); 
            Sistem.PozisyonKontrolGuncelle(PozisyonAnahtari, Pozisyon + LotSize, (double)SonFiyat); 
        } 

        else if (Islem == "SATIS") 
        { 
            EmirTekrari--; 
            Sistem.PozisyonKontrolGuncelle(EmirAnahtari, EmirTekrari); 
            Sistem.PozisyonKontrolGuncelle(PozisyonAnahtari, Pozisyon - LotSize, (double)SonFiyat); 
        } 

        Sistem.EmirSembol = Sembol; 
        Sistem.EmirIslem = Islem; 
        Sistem.EmirSuresi = "GUN"; 
        Sistem.EmirTipi = "Piyasa"; 
        Sistem.EmirMiktari = (double)Math.Abs(LotSize); 
        Sistem.EmirGonder(); 

    } 
} 

[engin.kilic.73]

Lotlu hali daha sade:

var SistemAdi = "Sistemim_1"; //sistemizin adı 
var GrafikPeriyodu = "1";  //grafiğin priyodu 
var ToplamPozisyon = 24; //Kaç defa alım yapılacak 

var hisseLot = new Dictionary<string, int>();
hisseLot["IMKBH'PETKM"] = 10;
hisseLot["IMKBH'KRDMD"] = 20;
hisseLot["IMKBH'KCHOL"] = 30;
hisseLot["IMKBH'AKBNK"] = 10;
hisseLot["IMKBH'EREGL"] = 20;
hisseLot["IMKBH'EKGYO"] = 30;


for (var No = 0; No < hisseLot.Count; No++) 
{ 
    var item    = hisseLot.ElementAt(No);
    var Sembol  = item.Key;//sistemin sinyal ürettiği grafik sembolü 
    var LotSize = item.Value;//sistemin sinyal ürettiği hisse için yukarıda tanımlanan lot
    
    var SonFiyat = (decimal)Sistem.SonFiyat(Sembol); 
    var SonYon   = Sistem.SonYonGetir(SistemAdi, Sembol, GrafikPeriyodu); 
    var PozisyonAnahtari = Sistem.Name + ", " + Sembol + ", " + GrafikPeriyodu; 
    var EmirAnahtari     = Sistem.Name + "::" + Sembol + "::" + GrafikPeriyodu; 

    double IslemFiyat = 0; 
    DateTime IslemTarih;     
    var Pozisyon = Sistem.PozisyonKontrolOku(PozisyonAnahtari, out IslemFiyat, out IslemTarih); 
    
    var EmirTekrari = Sistem.PozisyonKontrolOku(EmirAnahtari);  
        
    var Islem = ""; 
    if (SonYon == "A" && (Pozisyon == 0 || Sistem.ZamanKontrolSaniye(EmirAnahtari) >= 10) && EmirTekrari <= ToplamPozisyon) 
    { 
        Islem = "ALIS"; 
    } 
    if (SonYon == "F" && Pozisyon > 0 && Sistem.ZamanKontrolSaniye(EmirAnahtari) >= 10)  // Sat 
    {    
        Islem = "SATIS"; 
    }
    
    if (Islem != "") 
    {     
        Sistem.ZamanKontrolGuncelle(EmirAnahtari);
        
        if (Islem == "ALIS") 
        { 
            EmirTekrari++; 
            Sistem.PozisyonKontrolGuncelle(EmirAnahtari, EmirTekrari); 
            Sistem.PozisyonKontrolGuncelle(PozisyonAnahtari, Pozisyon + LotSize, (double)SonFiyat); 
        } 

        else if (Islem == "SATIS") 
        { 
            EmirTekrari--; 
            Sistem.PozisyonKontrolGuncelle(EmirAnahtari, EmirTekrari); 
            Sistem.PozisyonKontrolGuncelle(PozisyonAnahtari, Pozisyon - LotSize, (double)SonFiyat); 
        } 

        Sistem.EmirSembol = Sembol; 
        Sistem.EmirIslem = Islem; 
        Sistem.EmirSuresi = "GUN"; 
        Sistem.EmirTipi = "Piyasa"; 
        Sistem.EmirMiktari = (double)Math.Abs(LotSize); 
        Sistem.EmirGonder(); 

    } 
} 

Hocam ayağınıza taş değmesin çok teşekkür ederim. SOnunda güzel 2 robota kavuştuk. Sayenizde plaka atıyoruz tahtalara))

[rimedo]

Lotlu hali daha sade:

var SistemAdi = "Sistemim_1"; //sistemizin adı 
var GrafikPeriyodu = "1";  //grafiğin priyodu 
var ToplamPozisyon = 24; //Kaç defa alım yapılacak 

var hisseLot = new Dictionary<string, int>();
hisseLot["IMKBH'PETKM"] = 10;
hisseLot["IMKBH'KRDMD"] = 20;
hisseLot["IMKBH'KCHOL"] = 30;
hisseLot["IMKBH'AKBNK"] = 10;
hisseLot["IMKBH'EREGL"] = 20;
hisseLot["IMKBH'EKGYO"] = 30;


for (var No = 0; No < hisseLot.Count; No++) 
{ 
    var item    = hisseLot.ElementAt(No);
    var Sembol  = item.Key;//sistemin sinyal ürettiği grafik sembolü 
    var LotSize = item.Value;//sistemin sinyal ürettiği hisse için yukarıda tanımlanan lot
    
    var SonFiyat = (decimal)Sistem.SonFiyat(Sembol); 
    var SonYon   = Sistem.SonYonGetir(SistemAdi, Sembol, GrafikPeriyodu); 
    var PozisyonAnahtari = Sistem.Name + ", " + Sembol + ", " + GrafikPeriyodu; 
    var EmirAnahtari     = Sistem.Name + "::" + Sembol + "::" + GrafikPeriyodu; 

    double IslemFiyat = 0; 
    DateTime IslemTarih;     
    var Pozisyon = Sistem.PozisyonKontrolOku(PozisyonAnahtari, out IslemFiyat, out IslemTarih); 
    
    var EmirTekrari = Sistem.PozisyonKontrolOku(EmirAnahtari);  
        
    var Islem = ""; 
    if (SonYon == "A" && (Pozisyon == 0 || Sistem.ZamanKontrolSaniye(EmirAnahtari) >= 10) && EmirTekrari <= ToplamPozisyon) 
    { 
        Islem = "ALIS"; 
    } 
    if (SonYon == "F" && Pozisyon > 0 && Sistem.ZamanKontrolSaniye(EmirAnahtari) >= 10)  // Sat 
    {    
        Islem = "SATIS"; 
    }
    
    if (Islem != "") 
    {     
        Sistem.ZamanKontrolGuncelle(EmirAnahtari);
        
        if (Islem == "ALIS") 
        { 
            EmirTekrari++; 
            Sistem.PozisyonKontrolGuncelle(EmirAnahtari, EmirTekrari); 
            Sistem.PozisyonKontrolGuncelle(PozisyonAnahtari, Pozisyon + LotSize, (double)SonFiyat); 
        } 

        else if (Islem == "SATIS") 
        { 
            EmirTekrari--; 
            Sistem.PozisyonKontrolGuncelle(EmirAnahtari, EmirTekrari); 
            Sistem.PozisyonKontrolGuncelle(PozisyonAnahtari, Pozisyon - LotSize, (double)SonFiyat); 
        } 

        Sistem.EmirSembol = Sembol; 
        Sistem.EmirIslem = Islem; 
        Sistem.EmirSuresi = "GUN"; 
        Sistem.EmirTipi = "Piyasa"; 
        Sistem.EmirMiktari = (double)Math.Abs(LotSize); 
        Sistem.EmirGonder(); 

    } 
} 

Merhabalar ,

Tekrarlı alım şartı olmadan bir seferde alıp satacak şekilde de paylaşmanız mümkün mü acaba ?

[yuji]

Merhabalar ,

Tekrarlı alım şartı olmadan bir seferde alıp satacak şekilde de paylaşmanız mümkün mü acaba ?

Burayı 1 yaparsanız olur heralde

var ToplamPozisyon = 24; //Kaç defa alım yapılacak

[rimedo]

Burayı 1 yaparsanız olur heralde

var ToplamPozisyon = 24; //Kaç defa alım yapılacak

1 yapınca liste isimlerini iki kere yazıp bir kere emir atıyor hocam , pozisyonlar karışıyor ikili isim yazdığı için