KV Akademi

[obblomovv]

h-h4 ve günlük tarama yapıp, ortak olanları bir de sizin tarama filtresinden geçirirsek...
daha güzel bir şeyler çıkabilir.....

ayrıca psar değerlerini özelleştirerek, elde edilecek döngü ile kısa-orta ve uzun vade belirleyebiliriz gibi....

en önemlisi ise her metada tarama yapabilen....genel bir strateji kurulmuş olur...

çok sağolun....

bunu TW de yazıp...sizin yaptığınız gibi tarama imkanı yok sanırım....

TW' de bunu alarma dönüştürüp, tek tek eklemeniz gerekiyor her enstrümana...

[obblomovv]

diğerlerini hesaplamadaki amaç ;

örneğin saatlik grafikte h4 ve gün aynı değer gösterince diyelim ki yüzde 30 getiri sağlıyorsa haftalıkta
h4 ve gün aynı değeri gösterince daha fazla getiri sağlıyor....

Bunu renklendirme veya tarama açıklaması, belki de puan ile çözeriz.
Sıkıntı değil.

[@yörük@]

Tavsiye etmem...
Yukarıdaki veriyi aşağıya dönüştürüp, tersini yapamadığımıza göre...
Siz de saatlik, 4 saatlik vb üzeri taramak istediğinize göre...
Saatlik, 4 Saatlik, Günlük, Haftalık, Aylık vb... verilerin içinde çok sayıda 5 dk.lık veri olduğuna göre...
Ve bunları dönüştürebildiğimize göre...
İner 5 dk.lıktan tararız. Ne gerek var yukarıya gitme çabasına.
Ki mümkün değil sağlıklı biçimde.

psar değerlerinde oynama yaparsak...

thayo 15 dakka eşit olan bir yer mavi 28 ekim 14.52...https://www.tradingview.com/x/J8jnH41Z/

saatlik sarı çizgi 28 ekim fiyat 14.64....https://www.tradingview.com/x/QlUcyzZa/

eğer periyot yükseltirsek.... günlük kırmızı https://www.tradingview.com/x/xrTbbZ4N/ fiyat 14.75 iken
sarlar fiyatın altında 13.65 te eşit haldeler....

oysa yakalamaya çalıştığımız....alt periyota indiğimizde...
örneğin saatlikte...kırmızı günlüktü...ama o çizginin olduğu yerde psarla eşit değil...
saatlik bakınca görülen böyle....
https://www.tradingview.com/x/VcPPGAUA/

[obblomovv]

Sistem performans testi şu anki haliyle, XU100 için(çift yönlü) şöyle:



Max DD yüksek görünüyor...

[obblomovv]

psar değerlerinde oynama yaparsak...

thayo 15 dakka eşit olan bir yer mavi 28 ekim 14.52...https://www.tradingview.com/x/J8jnH41Z/

saatlik sarı çizgi 28 ekim fiyat 14.64....https://www.tradingview.com/x/QlUcyzZa/

eğer periyot yükseltirsek.... günlük kırmızı https://www.tradingview.com/x/xrTbbZ4N/ fiyat 14.75 iken
sarlar fiyatın altında 13.65 te eşit haldeler....

Sonuçtan nedene doğru gitmenizi önermem.
Hele tek bir veri üzerinden...
Yine de sistem sizin, para sizin.

[@yörük@]

Sonuçtan nedene doğru gitmenizi önermem.
Hele tek bir veri üzerinden...
Yine de sistem sizin, para sizin.

emeğin için gerçekten çok teşekkür ederim....
kodun ıdeal halini yayınlarsanız....demo ıdealde(kuracağım) denemek isterim....
selamlar...

[obblomovv]

emeğin için gerçekten çok teşekkür ederim....
kodun ıdeal halini yayınlarsanız....demo ıdealde(kuracağım) denemek isterim....
selamlar...

Bitireyim yayımlıyorum...

[obblomovv]

Gösterge(indikatör) kodu:

var fi=Sistem.GrafikFiyatSec("Kapanis");
var v=Sistem.GrafikVerileri;
var saat=Sistem.Saat;
var tarih=Sistem.Tarih;


var vy=Sistem.YuzeyselVeriOku(Sistem.Sembol);
string gn=vy.Grup;
var time=Sistem.Saat;
var date=Sistem.Tarih;
var son=Sistem.BarSayisi-1;


var vY=Sistem.GrafikVerileriniOku(Sistem.Sembol, "Y");
var vU=Sistem.GrafikVerileriniOku(Sistem.Sembol, "U");
var vA=Sistem.GrafikVerileriniOku(Sistem.Sembol, "A");
var vH=Sistem.GrafikVerileriniOku(Sistem.Sembol, "H");
var vG=Sistem.GrafikVerileriniOku(Sistem.Sembol, "G");
var vI=Sistem.GrafikVerileriniOku(Sistem.Sembol, "240");
var vL=Sistem.GrafikVerileriniOku(Sistem.Sembol, "60");




var psY=Sistem.Parabolic(vY, 0.01, 0.1);
psY=Sistem.DonemCevir(v, vY, psY);
var psU=Sistem.Parabolic(vU, 0.01, 0.1);
psU=Sistem.DonemCevir(v, vU, psU);
var psA=Sistem.Parabolic(vA, 0.01, 0.1);
psA=Sistem.DonemCevir(v, vA, psA);
var psH=Sistem.Parabolic(vH, 0.01, 0.1);
psH=Sistem.DonemCevir(v, vH, psH);
var psG=Sistem.Parabolic(vG, 0.01, 0.1);
psG=Sistem.DonemCevir(v, vG, psG);
var psI=Sistem.Parabolic(vI, 0.01, 0.1);
psI=Sistem.DonemCevir(v, vI, psI);
var psL=Sistem.Parabolic(vL, 0.01, 0.1);
psL=Sistem.DonemCevir(v, vL, psL);
var Renk3=Color.Green;


//var p=Sistem.Liste(0);


if(fi[son]>psY[son])
Sistem.ZeminYazisiEkle("fiyat>Yıllık PSAR", 1, 200, 100, Color.Green, "Tahoma", 10);
else if (fi[son]<=psY[son])
Sistem.ZeminYazisiEkle("fiyat>Yıllık PSAR", 1, 200, 100, Color.Red, "Tahoma", 10);


if(fi[son]>psU[son])
Sistem.ZeminYazisiEkle("fiyat>3 Aylık PSAR", 1, 200, 110, Color.Green, "Tahoma", 10);
else if (fi[son]<=psU[son])
Sistem.ZeminYazisiEkle("fiyat>3 Aylık PSAR", 1, 200, 110, Color.Red, "Tahoma", 10);


if(fi[son]>psA[son])
Sistem.ZeminYazisiEkle("fiyat>Aylık PSAR", 1, 200, 120, Color.Green, "Tahoma", 10);
else if (fi[son]<=psA[son])
Sistem.ZeminYazisiEkle("fiyat>Aylık PSAR", 1, 200, 120, Color.Red, "Tahoma", 10);


if(fi[son]>psH[son])
Sistem.ZeminYazisiEkle("fiyat>Haftalık PSAR", 1, 200, 130, Color.Green, "Tahoma", 10);
else if (fi[son]<=psH[son])
Sistem.ZeminYazisiEkle("fiyat>Haftalık PSAR", 1, 200, 130, Color.Red, "Tahoma", 10);


if(fi[son]>psG[son])
Sistem.ZeminYazisiEkle("fiyat>Günlük PSAR", 1, 200, 140, Color.Green, "Tahoma", 10);
else if (fi[son]<=psG[son])
Sistem.ZeminYazisiEkle("fiyat>Haftalık PSAR", 1, 200, 140, Color.Red, "Tahoma", 10);
if(fi[son]>psI[son])
Sistem.ZeminYazisiEkle("fiyat>4Saatlik PSAR", 1, 200, 150, Color.Green, "Tahoma", 10);
else if (fi[son]<=psI[son])
Sistem.ZeminYazisiEkle("fiyat>4Saatlik PSAR", 1, 200, 150, Color.Red, "Tahoma", 10);
if(fi[son]>psL[son])
Sistem.ZeminYazisiEkle("fiyat>Saatlik PSAR", 1, 200, 160, Color.Green, "Tahoma", 10);
else if (fi[son]<=psL[son])
Sistem.ZeminYazisiEkle("fiyat>Saatlik PSAR", 1, 200, 160, Color.Red, "Tahoma", 10);


//Sistem.ZeminYazisiEkle("PSAR Puan" + " - " +  p[son] , 1, 200, 170, Color.Red, "Tahoma", 10);


Sistem.Cizgiler[0].Deger = psY;
Sistem.Cizgiler[0].Aciklama = "YPSAR";
Sistem.Cizgiler[1].Deger = psU;
Sistem.Cizgiler[1].Aciklama = "UPSAR";
Sistem.Cizgiler[2].Deger = psA;
Sistem.Cizgiler[2].Aciklama = "APSAR";
Sistem.Cizgiler[3].Deger = psH;
Sistem.Cizgiler[3].Aciklama = "HPSAR";
Sistem.Cizgiler[4].Deger = psG;
Sistem.Cizgiler[4].Aciklama = "GPSAR";
Sistem.Cizgiler[5].Deger = psI;
Sistem.Cizgiler[5].Aciklama = "H4PSAR";
Sistem.Cizgiler[6].Deger = psL;
Sistem.Cizgiler[6].Aciklama = "H1PSAR";






var SonYon = "";            
for (int i = 1; i < Sistem.BarSayisi; i++)
{   
if (fi[i]>psL[i] && psL[i]>=psI[i] && SonYon != "A" )
   {
      Sistem.Yon[i] = "A"; 
      SonYon = Sistem.Yon[i];
   }
   if ( fi[i]<psI[i] &&  SonYon != "S" ) 
   {
      Sistem.Yon[i] = "S";  
      SonYon = Sistem.Yon[i];
   }
}

Tarama(sorgu) kodu:

var fi=Sistem.GrafikFiyatSec("Kapanis");
var v=Sistem.GrafikVerileri;
var saat=Sistem.Saat;
var tarih=Sistem.Tarih;


var vy=Sistem.YuzeyselVeriOku(Sistem.Sembol);
string gn=vy.Grup;
var time=Sistem.Saat;
var date=Sistem.Tarih;
var son=Sistem.BarSayisi-1;


var vY=Sistem.GrafikVerileriniOku(Sistem.Sembol, "Y");
var vU=Sistem.GrafikVerileriniOku(Sistem.Sembol, "U");
var vA=Sistem.GrafikVerileriniOku(Sistem.Sembol, "A");
var vH=Sistem.GrafikVerileriniOku(Sistem.Sembol, "H");
var vG=Sistem.GrafikVerileriniOku(Sistem.Sembol, "G");
var vI=Sistem.GrafikVerileriniOku(Sistem.Sembol, "240");
var vL=Sistem.GrafikVerileriniOku(Sistem.Sembol, "60");




var psY=Sistem.Parabolic(vY, 0.01, 0.1);
psY=Sistem.DonemCevir(v, vY, psY);
var psU=Sistem.Parabolic(vU, 0.01, 0.1);
psU=Sistem.DonemCevir(v, vU, psU);
var psA=Sistem.Parabolic(vA, 0.01, 0.1);
psA=Sistem.DonemCevir(v, vA, psA);
var psH=Sistem.Parabolic(vH, 0.01, 0.1);
psH=Sistem.DonemCevir(v, vH, psH);
var psG=Sistem.Parabolic(vG, 0.01, 0.1);
psG=Sistem.DonemCevir(v, vG, psG);
var psI=Sistem.Parabolic(vI, 0.01, 0.1);
psI=Sistem.DonemCevir(v, vI, psI);
var psL=Sistem.Parabolic(vL, 0.01, 0.1);
psL=Sistem.DonemCevir(v, vL, psL);
var Renk3=Color.Green;


Sistem.SorguAciklama = "PSAR";


if(psY[son]==psU[son] && psY[son]!=0 && psU[son]!=0  )
Sistem.SorguAciklama += " ,Y=3A";
if(psU[son]==psA[son] && psU[son]!=0 && psA[son]!=0  )
Sistem.SorguAciklama += " ,3A=A";
if(psA[son]==psH[son] && psA[son]!=0 && psH[son]!=0  )
Sistem.SorguAciklama += " ,A=H";
if(psH[son]==psG[son] && psH[son]!=0 && psG[son]!=0  )
Sistem.SorguAciklama += " ,H=G";
if(psG[son]==psI[son] && psG[son]!=0 && psI[son]!=0  )
Sistem.SorguAciklama += " ,G=240DK";
if(psI[son]==psL[son] && psI[son]!=0 && psL[son]!=0  )
Sistem.SorguAciklama += " ,240DK=60DK";




if(fi[son]>psL[son] && psL[son]>=psI[son] && psL[son-1]<psI[son-1] )


{
Sistem.SorguEkle();
}