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

[engin.kilic.73]

Abiler selamlar
alýþ 1 þartýna göre flat olma þartý yazýldý ama alýyor flat olmuyor)
aslýnda flat olma koþullarý alýþ 1 ise þudur
alýþ 2 ise þudur yazmak istedim. Bir arkadaþýn yardýmýyla olmadý. size sormadan önce böyle bir konu varmý diye baktým-araþtýrdým ama bulamadým.

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(100);
var MA2= Sistem.TOMA(3,2);
var M4 = Sistem.Momentum(100);
 var Fiyat = 0.00;
var Sinyal =""; 
var sonfiyat = 0.00f; 
int flatbar=0;
 
var alýþ1 = "";	
var alýþ2 = "";	 
var alýþ3 = "";	
var SonYon = "";	
var RSI = Sistem.RSI(14);
for(int i=1 ; i< Sistem.BarSayisi; i++)
{ 
   if(MAVW[i-1] < 60 && MAVW[i] >= 60)
      Sistem.DikeyCizgiEkle(i, Color.Cyan, 2, 2);
     // Sistem.YaziEkle("P1", 1, i, V[i].Low, Color.Cyan, "Tahoma", 10);
}
// 
	
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]                              )   { alýþ1 = "2"; 	Sinyal = "A";}
   if ( SonYon != "A" && M4[i] > 98 && M4[i-1] <=98                 )   { alýþ1 = "3"; 	Sinyal = "A";}
  	
   if (   alýþ1 == "1" && MAVW[i] < 70   && MAVW[i-1] >= 70           ) Sinyal = "F";	
// if (   alýþ2 == "2" && C[i] < MA2[i]                               ) Sinyal = "F";	
   if (   alýþ3 == "3" && M4[i] < 102 && M4[i-1] <=102                ) 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 ;

[Bear_Bull]

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


kýrmýzý renkli yerleri gözden geçirebilirsiniz.

[Bear_Bull]

Formül yapýsý tehlikeli Repainte çok müsait.

Alýþ1 flat oldu sistem sattý.
sonraki turda Alýþ3 Al a devam ediyorsa tekrar alacaktýr.
yada tam tersi
Alýþ3 flat oldu
sonraki turda Alýþ1 Al a devam ediyorsa ayný durum tekerrür edecektir.

// alýþ2 kapalý o da açýlýrsa bir seçenek flat olsa diðer 2 seçenek tekrar al yapabilecektir.

[yuji]

Abiler selamlar
alýþ 1 þartýna göre flat olma þartý yazýldý ama alýyor flat olmuyor)
aslýnda flat olma koþullarý alýþ 1 ise þudur
alýþ 2 ise þudur yazmak istedim. Bir arkadaþýn yardýmýyla olmadý. size sormadan önce böyle bir konu varmý diye baktým-araþtýrdým ama bulamadým.

Ýdealin dilinden pek anlamam ama kod mantýksýz olmuþ onu söyleyebilirim

if ( SonYon != "A" && MAVW[i] > 60 && MAVW[i-1] <= 60 ) { alýþ1 = "1"; Sinyal = "A";}

alis1 =1 olma þartýný aþaðýdaki ife eklersek:

if ( SonYon != "A" && MAVW[i] > 60 && MAVW[i-1] <= 60 && MAVW[i] < 70 && MAVW[i-1] >= 70 ) Sinyal = "F";

Ýf'in içindeki koþullar birbirinin tam tersi yani hiç bir zaman doðrulanamaz sonuçta F sinyali de üretmez

Yazdýklarýnýz tam anlaþýlmýyor ama belki de þöyle biþey istiyorsunuzdur:

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); 

for (int i = 1; i < Sistem.BarSayisi; i++)	
{
	var Alis1=MAVW[i] > 60    && MAVW[i-1] <= 60;
	var Alis2=C[i] > MA2[i];
	var Alis3=M4[i] > 98 && M4[i-1] <=98;

	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 ( SonYon != "A" && (Alis1 || Alis2 || Alis3))   { Sinyal = "A";}
	if ( SonYon != "F" && (Flat1 || Flat2 || Flat3))   { 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;

[yuji]

Ýdealde kendi wav dosyamýzý nasýl oynatabiliriz bilgisi olan var mý
Farklý koþullarda farklý seslerle bildirimde bulunmasýný istiyorum

[KýsaVade]

Yanlýþ hatýrlamýyorsam ve deðiþmedi ise... Þöyle idi:








Link: http://www.directfn.com.tr/idealsistem/

[engin.kilic.73]

bearbull abi teþekkür ederim. yuji abinin yazdýðý gibi flatý görmüyor. kod bilgisi kýsýtlý olduðunda evirdim çevirdim. olmuyor.

[engin.kilic.73]

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 ;