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

[yuji]

yuji abi tespit doðru sistem flata geçmiyor ama þartlar gerçekleþiyor. belki fikir verir diye yazdým.
sizin kodu bunu aþaðýdaki þekilde yaptým bu hiç alýþ yapmýyor.
Yapmak istediðim alýþ 1 þartýysa aldýysa sistem flat 1 þartýyla flat olsun. bu böyle 4-5 kalem avi

þartlar gerçekleþiyor abi.

var V = Sistem.GrafikVerileri;
var C = Sistem.GrafikFiyatOku(V, "Kapanis") ;
var h = Sistem.GrafikFiyatOku(V, "Yuksek")  ;
var l = Sistem.GrafikFiyatOku(V, "Dusuk")   ;
var o = Sistem.GrafikFiyatOku(V, "Acilis")  ;

var rsý =Sistem.RSI(100)      ;
var toma= Sistem.TOMA(3,2)    ;
var mom = Sistem.Momentum(100);
 var Fiyat = 0.00             ;
var Sinyal =""                ; 
var sonfiyat = 0.00f          ; 
int flatbar=0                 ;
 
 
var SonYon = "";	
 
for(int i=1 ; i< Sistem.BarSayisi; i++)
{ 
   if(rsý[i-1] <= 60 && rsý[i] > 60)
      Sistem.DikeyCizgiEkle(i, Color.Cyan, 2, 2);
     // Sistem.YaziEkle("P1", 1, i, V[i].Low, Color.Cyan, "Tahoma", 10);
   if(rsý[i-1] >= 65 && rsý[i] < 65)
      Sistem.DikeyCizgiEkle(i, Color.Red, 2, 2);
}
// 
	
    for (int i = 1; i < Sistem.BarSayisi; i++)	
    {

    var alýþ1 = rsý[i] > 60 && rsý[i]   <= 60 ;
    var alýþ2 = mom[i] > 94 && mom[i-1] <= 94 ;
    var alýþ3 = C[i]   > toma[i]              ;	

    var flat1 = rsý[i]   > 65 && rsý[i]   <= 65 ;              
    var flat2 = mom[i]   > 98 && mom[i-1] <= 98 ;
    var flat3 = toma[i]  >    C[i]              ;

    if( SonYon != "A" && (alýþ1)) { Sinyal = "A";}
    // if( SonYon != "A" && (alýþ2)) { Sinyal = "A";}
    // if( SonYon != "A" && (alýþ3)) { Sinyal = "A";}

   if( SonYon != "F" && (flat1)) { Sinyal = "F";}            // kod çalýþþada hocam buraya alýþý alýþ1 þartý yaptýðýný belirtmek lazým diye düþünüyorum.
   // if( SonYon != "F" && (flat2)) { Sinyal = "F";}
   // if( SonYon != "F" && (flat3)) { Sinyal = "F";}
	
  if (SonYon != Sinyal && Sinyal != "")	
         {	
	
            SonYon = Sinyal;	
            Sistem.Yon[i] = SonYon;	
            Fiyat = C[i];	
	
          }	
	
}	

Sistem.Cizgiler[0].Deger =rsý ;
Sistem.Cizgiler[1].Deger =toma ;
Sistem.Cizgiler[2].Deger =mom ;

Benim attýðým kod alýþ da yapýyor flata de geçiyor


Alýs1 koþulu ile alýþ yaparsa sadece Flat1 koþulunda flat olsun aksi durumda long devam
Alýs2 koþulu ile alýþ yaparsa sadece Flat2 koþulunda flat olsun aksi durumda long devam
vs....
gibi birþey mi yapmak istiyorsunuz?

[engin.kilic.73]

Benim attýðým kod alýþ da yapýyor flata de geçiyor


Alýs1 koþulu ile alýþ yaparsa sadece Flat1 koþulunda flat olsun aksi durumda long devam
Alýs2 koþulu ile alýþ yaparsa sadece Flat2 koþulunda flat olsun aksi durumda long devam
vs....
gibi birþey mi yapmak istiyorsunuz?

Aynen abi. tam ifadesi bu.

[yuji]

Aynen abi. tam ifadesi bu.

Þöyle biþey yaptým hýzlýca, detaylý incelemedim

Not:robot kodu için farklý bi atraksiyon gerekir
Not:Denemedim ama alis koþullarýndan hangisine öncelik verileceðine göre olay baya deðiþtirir muhtemelen

var V = Sistem.GrafikVerileri;
var C = Sistem.GrafikFiyatOku(V, "Kapanis"); 
var MAVW =Sistem.RSI(100);
var MA2= Sistem.TOMA(3,2);
var M4 = Sistem.Momentum(100);
var Fiyat = 0.00;
var Sinyal ="";   
var SonYon = "";	
var RSI = Sistem.RSI(14); 

var SonSinyalNo=0;

for (int i = 1; i < Sistem.BarSayisi; i++)	
{
	if (SonYon != "A")
	{
		var Alis1=MAVW[i] > 60 && MAVW[i-1] <= 60;
		var Alis2=C[i] > MA2[i];
		var Alis3=M4[i] > 98 && M4[i-1] <=98;
	
		if	(Alis1){ 	 Sinyal = "A"; SonSinyalNo=1; Sistem.DikeyCizgiEkle(i, Color.Aqua, 2, 2);} 
		else if (Alis2){ Sinyal = "A"; SonSinyalNo=2; Sistem.DikeyCizgiEkle(i, Color.Chartreuse, 2, 2);} 
		else if (Alis3){ Sinyal = "A"; SonSinyalNo=3; Sistem.DikeyCizgiEkle(i, Color.DarkCyan, 2, 2);} 		
		
	}
	if ( SonYon != "F")
	{
		var Flat1=MAVW[i] < 70 && MAVW[i-1] >= 70;
		var Flat2=C[i] < MA2[i];
		var Flat3=M4[i] < 102 && M4[i-1] <=102;

		if      (Flat1 && SonSinyalNo == 1 ){ Sinyal = "F"; SonSinyalNo=0; Sistem.DikeyCizgiEkle(i, Color.Red, 2, 2);} 
		else if (Flat2 && SonSinyalNo == 2 ){ Sinyal = "F"; SonSinyalNo=0; Sistem.DikeyCizgiEkle(i, Color.OrangeRed, 2, 2);} 
		else if (Flat3 && SonSinyalNo == 3 ){ Sinyal = "F"; SonSinyalNo=0; Sistem.DikeyCizgiEkle(i, Color.DarkRed, 2, 2);} 		
	}
	if (SonYon != Sinyal && Sinyal != "")	
	{		
		SonYon = Sinyal;	
		Sistem.Yon[i] = SonYon;	
		Fiyat = C[i];		
	}		
}	

Sistem.Cizgiler[0].Deger =MAVW;
Sistem.Cizgiler[1].Deger =MA2;
Sistem.Cizgiler[2].Deger =M4;

[yuji]

Aynen abi. tam ifadesi bu.

Þöyle biþey yaptým hýzlýca, detaylý incelemedim

Not:Flat3 koþulu var Flat3=M4[i] < 102 && M4[i-1] >=102; olmasý lazým sanýrým
Not:robot kodu için farklý bi atraksiyon gerekir
Not:Denemedim ama alis koþullarýndan hangisine öncelik verileceði olayý baya deðiþtirir muhtemelen

var V = Sistem.GrafikVerileri;
var C = Sistem.GrafikFiyatOku(V, "Kapanis"); 
var MAVW =Sistem.RSI(100);
var MA2= Sistem.TOMA(3,2);
var M4 = Sistem.Momentum(100);
var Fiyat = 0.00;
var Sinyal ="";   
var SonYon = "";	
var RSI = Sistem.RSI(14); 

var SonSinyalNo=0;

for (int i = 1; i < Sistem.BarSayisi; i++)	
{
	if (SonYon != "A")
	{
		var Alis1=MAVW[i] > 60 && MAVW[i-1] <= 60;
		var Alis2=C[i] > MA2[i];
		var Alis3=M4[i] > 98 && M4[i-1] <=98;
	
		if	(Alis1){ 	 Sinyal = "A"; SonSinyalNo=1; Sistem.DikeyCizgiEkle(i, Color.Aqua, 2, 2);      Sistem.YaziEkle("1", 1, i, V[i].High+2, Color.Aqua, "Tahoma", 10);} 
		else if (Alis2){ Sinyal = "A"; SonSinyalNo=2; Sistem.DikeyCizgiEkle(i, Color.Chartreuse, 2, 2);Sistem.YaziEkle("2", 1, i, V[i].High+2, Color.Chartreuse, "Tahoma", 10);}  
		else if (Alis3){ Sinyal = "A"; SonSinyalNo=3; Sistem.DikeyCizgiEkle(i, Color.DarkCyan, 2, 2);  Sistem.YaziEkle("3", 1, i, V[i].High+2, Color.DarkCyan, "Tahoma", 10);}  		
		
	}
	if ( SonYon != "F")
	{
		var Flat1=MAVW[i] < 70 && MAVW[i-1] >= 70;
		var Flat2=C[i] < MA2[i];
		var Flat3=M4[i] < 102 && M4[i-1] >=102;

		if      (Flat1 && SonSinyalNo == 1 ){ Sinyal = "F"; SonSinyalNo=0; Sistem.DikeyCizgiEkle(i, Color.Red, 2, 2);Sistem.YaziEkle("1", 1, i, V[i].Low-2, Color.Red, "Tahoma", 10);} 
		else if (Flat2 && SonSinyalNo == 2 ){ Sinyal = "F"; SonSinyalNo=0; Sistem.DikeyCizgiEkle(i, Color.OrangeRed, 2, 2);Sistem.YaziEkle("2", 1, i, V[i].Low-2, Color.OrangeRed, "Tahoma", 10);} 
		else if (Flat3 && SonSinyalNo == 3 ){ Sinyal = "F"; SonSinyalNo=0; Sistem.DikeyCizgiEkle(i, Color.DarkRed, 2, 2);Sistem.YaziEkle("3", 1, i, V[i].Low-2, Color.DarkRed, "Tahoma", 10);}  		
	}
	if (SonYon != Sinyal && Sinyal != "")	
	{		
		SonYon = Sinyal;	
		Sistem.Yon[i] = SonYon;	
		Fiyat = C[i];		
	}		
}	

Sistem.Cizgiler[0].Deger =MAVW;
Sistem.Cizgiler[1].Deger =MA2;
Sistem.Cizgiler[2].Deger =M4;

[engin.kilic.73]

[QUOTE=yuji;6484055]Þöyle biþey yaptým hýzlýca, detaylý incelemedim

Not:Flat3 koþulu var Flat3=M4[i] < 102 && M4[i-1] >=102; olmasý lazým sanýrým
Not:robot kodu için farklý bi atraksiyon gerekir
Not:Denemedim ama alis koþullarýndan hangisine öncelik verileceði olayý baya deðiþtirir muhtemelen

var V = Sistem.GrafikVerileri;
var C = Sistem.GrafikFiyatOku(V, "Kapanis");
var h = Sistem.GrafikFiyatOku(V, "Yuksek");
var l = Sistem.GrafikFiyatOku(V, "Dusuk");
var o = Sistem.GrafikFiyatOku(V, "Acilis");

var MAVW =Sistem.RSI(14);
var MA2= Sistem.TOMA(1,1);
var M4 = Sistem.Momentum(2000);
var Fiyat = 0.00;
var Sinyal ="";
var sonfiyat = 0.00f;
int flatbar=0;

var alýþ1 = "";
var alýþ2 = "";
var alýþ3 = "";
var SonYon = "";


for (int i = 1; i < Sistem.BarSayisi; i++)
{
if( MAVW[i] > 60 && MAVW[i-1] <= 60 )
Sistem.DikeyCizgiEkle(i, Color.Cyan, 2, 4);
if(MAVW[i] <63 && MAVW[i-1] >= 63 )
Sistem.DikeyCizgiEkle(i, Color.Cyan, 2, 2);
if( M4[i] > 2000 && M4[i-1] <= 2000 )
Sistem.DikeyCizgiEkle(i, Color.Red, 2, 4);
if(M4[i] < 2300 && M4[i-1] >= 2300 )
Sistem.DikeyCizgiEkle(i, Color.Red, 2, 2);
}

for (int i = 1; i < Sistem.BarSayisi; i++)
{
{
if ( SonYon != "A" && MAVW[i] > 60 && MAVW[i-1] <= 60 ) { alýþ1 = "1"; Sinyal = "A"; }
// if ( SonYon != "A" && C[i] > MA2[i] && C[i-1] < MA2[i-1] ) { alýþ2 = "2"; Sinyal = "A"; }
if ( SonYon != "A" && M4[i] > 2100 && M4[i-1] <=2100 ) { alýþ3 = "3"; Sinyal = "A"; }

if ( SonYon == "A" && alýþ1 == "1" && MAVW[i] < 63 && MAVW[i-1] >= 63 ) {Sinyal = "F"; }
// if ( SonYon == "A" && alýþ2 == "2" && C[i] < MA2[i] && C[i-1] > MA2[i-1] ) {Sinyal = "F"; }
if ( SonYon == "A" && alýþ3 == "3" && M4[i] < 2300 && M4[i-1] >=2300 ) {Sinyal = "F"; }
}

if (SonYon != Sinyal && Sinyal != "")
{
SonYon = Sinyal;
Sistem.Yon[i] = SonYon;
Fiyat = C[i];
}
}


Sistem.Cizgiler[0].Deger =MAVW;
Sistem.Cizgiler[1].Deger =MA2;
Sistem.Cizgiler[2].Deger =M4;

Abi çok teþekkür ederim. Sizin ailenizin ayaðýna taþ deðmesin.
Twitterdan bir kiþi yardýmcý oldu çok saðolsun. Onuda aþaðý býraktým sizin kod yapýsýndan farklý geldi bana.
Baþkalarý için örnek olur düþüncesiyle.
Bu arada bugun birisi telegram botu sordu. Ona yardýmcý oldum. Güzeldi ya.
Sinyal çakýþmasý olmaz hocam sistem al-flat olmadýðý zamanlarda düþüþ trendinde al yapacak.
Çok saðolun. Bir sorum olacak. Siz buraya yazmýþýnýz. ben 2 gün önce tiberius un sayfasýnda sormuþtum. Sizin vasýtanýzla buradan herkese sormuþ olayým.

[engin.kilic.73]

Abi sizin vasýtanýzla foruma sorayým.

Hocam düþüncem þuydu. Açýða satýþ olsa bunu düþünmeyecektim büyük ihtimalle. Açýða satýþ olmayýnca sistemin getirisi nasýl artar diye düþündüm.
Bir trend takip sistemi: trend olmadýðý yerlerde(alýþta olmadýðý yer)
burada ayný indikatörün 2 farklý deðerleri ile al yapacaðým. Ancak bu sistemlerden biri oyakc hissesinde 2 ayda %100 kazandýrsada %20 gibi düþüþlerdeki alýþlardan ek kazancý olacak gibi. %50 kazandýran sitemde daha faklý. Ama her %kazanç baþýmýn üstüne diye düþünüyorum.
Bu halloldu.

2.sebep ; Abcd yapýsýný bulabiliyorum. Bunun üstüne ekleme yapmak istedim. Para.daki sistem gibi. Üyeyim ama hiç kullanmaya fýrsatým olmadý. Kullanmaycaðým büyük ihtimalle. Duruyor kenarda.
Deðiþik paternler oluþurarak bir sistem oluþturmak. burada benim sizin sayenizde farkettiðim problem çýktý. Bu siyaller ayný barda sinyal gellirse
Bu yapmak istediðim diðer sistemdi.
Sorum 1 :

Örnek verdiðimiz sistemden gidersek :
Paternerden bir sistem yaptým diyelim. Bu paternerden 3.ü ayný anda al verirse;
vememesi için bu sistemi nasýl düzenleriz. Öncelik sýralamasý alýþ1-alýþ2-alýþ3 sýrasýyla.

Diðer bir sorum:
3 farklý sistemim var. Dolayýsýyla 3 farklý robot çalýþtýrýyorum. 1 ana ayrýlan bütçe 2 ve 3 sistemler krediye giriyor.
Alýþ1 =100 lot
Alýþ2 = 50 lot
Alýþ3 = 40 lot
3 sistem yerine tek sistem kullanmak istiyorum. Bazen bu oran diðer sistemlerin flat olma koþulunda ½ mislinde oluyor. Tek bir sistemde birleþtirmek istiyorum.
sizinde örnek verdiðiniz gibi 3 sistem ayný barda al verebilir. Fakat flat olma koþullarý(alýþ1-flata/alýþ2-flat2/alýþ3-flat3) flat olma koþullarý farklý olduðundan problem yok.
Panel 2.de alýþ1 sisteminin getiri eðrisini
Panel 3.de alýþ2 sisteminin getiri eðrisi
Panel 4.de alýþ3 sisteminin getiri eðrisi
Panel 5. De kümülatif getiri eðrisi þeklinde nasýl gösteririz.

BU sistem için nasýl bir robot kodu kullanmamýz lazým.

Sistemin zor olduðunu düþünürsek insanlarýn buna vakit ayýrmamak istememeside çok normal olsada Güzel ve zor soru olduðunu düþünüyorum. Cevabýda bir çok kiþiye örnek cevap olacaktýr bence.

[engin.kilic.73]

Bir ekleme yapmak istedim.
Çok sinyal üreten bir sistemim var. bu yön alýþ iken resimde görüleceði üzere; 6 kere daha sinyal üretiyor.
o yüzden yukarýdaki (sistem farklýda olsa) sorum 1 kýsmýnda 100lot/50lot/40 lot olan sisteme sayac ekleme yapmak mümkünmüdür. sayaca göre misal 3 kere veya 4 kere daha alýþ yapacak. Sanýrsam 3 senelik forum kotamý doldurdum. Hayýrlý akþamlar dilerim.

[mkaanyesilgul]

Herkese selam, alýþ yaparken 24 parçada alýþ yapan bir kod var elimde bunun sat tarafýný da ayný þekilde aldýklarýný 24 parçada satabilecek bir kod nasýl yazabilirim? Al-sat emri geldikten sonra her 10 saniyede bir emir gitsin þeklinde.

var bakiye = 1000; // 1000 TL tutar kadar her alýþta al 
            var SistemAdi = "Sistemim_1"; //sistemizin adý 
            var GrafikPeriyodu = "1";  //grafiðin priyodu 
            var ToplamPozisyon = 24; //Kaç defa alým yapýlacak 
 
            var Sozluk = new List<string>(); 
            Sozluk.Add("IMKBH'PETKM"); 
            Sozluk.Add("IMKBH'KRDMD"); 
            Sozluk.Add("IMKBH'KCHOL"); 
            Sozluk.Add("IMKBH'AKBNK"); 
            Sozluk.Add("IMKBH'EREGL"); 
            Sozluk.Add("IMKBH'EKGYO"); 
    
 
 
            for (var No = 0; No < Sozluk.Count; No++) 
            { 
                var Sembol = Sozluk[No]; //sistemin sinyal ürettiði grafik sembolü 
                var SonFiyat = (decimal)Sistem.SonFiyat(Sembol); 
                var SonYon = Sistem.SonYonGetir(SistemAdi, Sembol, GrafikPeriyodu); 
                var Anahtar = Sistem.Name + ", " + Sembol + ", " + GrafikPeriyodu; 
                var Anahtar2 = Sistem.Name + "::" + Sembol + "::" + GrafikPeriyodu; 
 
                double IslemFiyat = 0; 
                DateTime IslemTarih; 
                var Islem = ""; 
                var Pozisyon = Sistem.PozisyonKontrolOku(Anahtar, out IslemFiyat, out IslemTarih); 
                var EmirTekrari = Sistem.PozisyonKontrolOku(Anahtar2); 
                var LotSize = (double)Math.Round(Sistem.SayiTablosunuOku(Anahtar2), 0); 
 
                var Basla = Sistem.SayiTablosunuOku(Anahtar); 
                if (Basla == 0) 
                { 
                    Sistem.SayiTablosunuGuncelle(Anahtar, 1); 
                    LotSize = (double)Math.Round((bakiye / SonFiyat), 0); 
                    Sistem.SayiTablosunuGuncelle(Anahtar2, LotSize); 
                } 
 
                if (SonYon == "A" && Pozisyon == 0)  // Al 
                    Islem = "ALIS"; 
                if (SonYon == "A" && Sistem.ZamanKontrolSaniye(Anahtar2) >= 10 && EmirTekrari <= ToplamPozisyon) 
                { 
                    Sistem.ZamanKontrolGuncelle(Anahtar2); 
                    Islem = "ALIS"; 
                } 
                if (SonYon == "F" && Pozisyon > 0)  // Sat 
                    Islem = "SATIS"; 
 
                if (Islem != "" && EmirTekrari <= ToplamPozisyon) 
                { 
                    if (Islem == "ALIS") 
                    { 
                        EmirTekrari++; 
                        Sistem.PozisyonKontrolGuncelle(Anahtar2, EmirTekrari); 
                        Sistem.PozisyonKontrolGuncelle(Anahtar, Pozisyon + LotSize, (double)SonFiyat); 
                    } 
 
                    else if (Islem == "SATIS") 
                    { 
                        Sistem.PozisyonKontrolGuncelle(Anahtar2, 0); 
                        Sistem.PozisyonKontrolGuncelle(Anahtar, 0, (double)SonFiyat); 
                    } 
 
                    Sistem.EmirSembol = Sembol; 
                    Sistem.EmirIslem = Islem; 
                    Sistem.EmirSuresi = "GUN"; 
                    Sistem.EmirTipi = "Piyasa"; 
                    Sistem.EmirMiktari = (double)Math.Abs(LotSize); 
                    Sistem.EmirGonder(); 
 
                } 
            }