Sistem Karşılaştırma 2

[Caglar]

bir sistemimin çalışması uzun zaman aldığından robot olarak kullanamıyorum. lib.cs kullanmak çalışmayı hangi oranda hızlandırır?

Lib.cs'ye olduğu gibi koymanız performansını değiştirmez. Gereksiz for döngüsü kullanımından kaçınmanız gerek öncelikle. Daha sonra gereksiz index kullanımı, gereksiz değişken tanımı vb birçok şeye bakılabilir. Kodu görmeden bir şey söylemek zor.

[Celal Can]

Merhaba, detay tabloyu oluşturmak zor değil. user ve lib.cs olmadan da yapabilirsiniz.
aşağıdaki kod biraz karışık olduğu için işinize yaramayacaktı, resim olarak ekledim ilgili kısmı.
nasıl yapılacağı çok net anlaşılıyor ama.
idealde Sistem.Tablo var, kullanımını forumda bulursunuz.
siz hesaplanmış değerleri idealin tablosuna ekleyip, tabloyu ekranda görebilirsiniz.
aşağıdaki örnek de hesaplamada kayma ve komisyonda var. çıkarabilirsiniz bunları.kolonlara indikatör değeri vb. eklenebilir kolayca.

Bilgi için çok teşekkür ederim. Denedikçe denedikçe yeni yeni şeyler öğreniyorum sayenizde.

[Celal Can]

siz neden ihtiyaç duydunuz buna?

ben geçmişte segment analizi yapmak için,
seviyeli sistemlerde aylık net yüzdeleri görmek için,
birde net optimizasyon yapabilmek için ihtiyaç duydum.
Optimizasyon Modülü bize en çok para kazandırmış (gerçekçi) değerleri vermiyor.
Sebebi brüt puana göre sıralama yapması ve daha yüksek brüt puan alarak "önce" listeye girmiş varyasyonların en çok net puan kazandıran varyasyonların listeye girmesini "engellemesi".Optimizasyon Modülünde kayma ve komisyon girişleri olsaydı çözülürdü bu.

Optimizasyon yapmak adına bir uğraşı içerisindeyim.

[cashhflow]

Geçen gün bende maliyet ve kaymayı fiyata göre belirleyip daha gerçekçi şekilde optimize yapmak istedim ama fiyatı düşük enstrümanlarda çalışırken virgülden sonraki rakamın Sistem Performansı bölümünde yuvarlandığını gördüm örneğin kayma + komisyon = 0.007 ve alış seviyesi 5.05 ise performans bölümünde 5.06 -yada 5.05 çok dikkat etmedim- gözüküyor. Değişkene bağlayıp float yaptım yine aynı oldu.

+



Bugün eski verilerim kayboldu artık okumuyor daha önce başına gelen var mı ?

[erhanacikgoz1]

sisteme entegre edebılecegımız şekilde şunun bir şablonu varmı rica etsem ? kz de aylık olabılır birde kayma girebilirsek iyi olacak :D

[Orhan AKDOĞAN]

sisteme entegre edebılecegımız şekilde şunun bir şablonu varmı rica etsem ? kz de aylık olabılır birde kayma girebilirsek iyi olacak :D

Trend Filter

//Ayarlar 
bool SistemIsmiGoster      = true;
bool GetiriTarihcesiGoster = true;
bool DetayPerformans       = true;
string GetiriTarih         = "01.01.2000";
float  GetiriKayma         = 0.0f;
  
//Veriler
var V = Sistem.GrafikVerileri ;
var C = Sistem.GrafikFiyatOku(V, "Kapanis" ) ;
var O = Sistem.GrafikFiyatOku(V, "Açılış" ) ;


//İndikatörler
var HH = Sistem.HHV(90, "Yuksek"); 
var LL = Sistem.LLV(90, "Dusuk");  
var MAC= Sistem.MA(C, "Simple", 1440);
var MAO = Sistem.MA(O, "Simple", 1440);


//Strateji
var SonYon = "";
for (int i = 100; i < V.Count; i++)
{
         if ( SonYon != "A"  && MAO[i]< MAC[i] && C[i] > HH[i-1] )   { Sistem.Yon[i] = "A"; SonYon = Sistem.Yon[i]; }
    else if ( SonYon != "S"  && MAO[i]> MAC[i] && C[i] < LL[i-1] )   { Sistem.Yon[i] = "S"; SonYon = Sistem.Yon[i]; }
}   


//Çizgiler
Sistem.Cizgiler[6].Deger = MAC;   //Panel 1
Sistem.Cizgiler[7].Deger = MAO ;  //Panel 1




//Getiri Hesapla-----------------------------------------------------------------------------------------------------------------------------------
if (GetiriTarihcesiGoster || DetayPerformans)
{
        DateTime dateBaslangicTarih = (DateTime.ParseExact(GetiriTarih, "dd.MM.yyyy", System.Globalization.CultureInfo.CurrentCulture) > V[0].Date) ? (DateTime.ParseExact(GetiriTarih, "dd.MM.yyyy", System.Globalization.CultureInfo.CurrentCulture)) : V[0].Date;
    Sistem.GetiriHesapla(dateBaslangicTarih.ToString("dd.MM.yyyy"), GetiriKayma); Sistem.Cizgiler[1].Deger = Sistem.GetiriKZ;
    int ilksatirY = 33;
    var Sure = ((DateTime.Now - dateBaslangicTarih).TotalDays / 30.4); 
    var SureTxt = Sure.ToString("0.0");
    var kzSure = Sistem.GetiriKZGunSonu[Sistem.GetiriKZGunSonu.Count - 1].ToString("0.0");
    var kzbugun = (Sistem.GetiriKZGunSonu[Sistem.GetiriKZGunSonu.Count - 1] - Sistem.GetiriKZGun[Sistem.GetiriKZGun.Count - 1]).ToString("0.0");
    var kzbuay = Sistem.GetiriBuAy.ToString("0.0");
    var kz30 = Sistem.GetiriBirAy.ToString("0.0");
    string ToplamIslem = Sistem.GetiriToplamIslem.ToString("0");
    string OrtalamaIslem = (((double)Sistem.GetiriToplamIslem) / Sure).ToString("0");
    var KarliIslemOran = Sistem.GetiriKarIslemOran.ToString("0.00");
    var MutluGun = Sistem.GetiriMutluGun.ToString();
    var MutsuzGun = Sistem.GetiriMutsuzGun.ToString();
    Sistem.GetiriMaxDDHesapla(GetiriTarih ,DateTime.Now.ToString("dd.MM.yyyy"));
    var MaxDD = Sistem.GetiriMaxDD.ToString("0.0");
    var MaxDDTarihi = Sistem.GetiriMaxDDTarih.ToString("dd.MM.yyyy");
    var KazandiranIslem = Sistem.GetiriKarIslem.ToString("0");
    var KaybettirenIslem = Sistem.GetiriZararIslem.ToString("0");
    var GetiriKarMiktar = Sistem.GetiriKarMiktar.ToString("0.0");
    var GetiriZararMiktar = Sistem.GetiriZararMiktar.ToString("0.0");
    var ProfitFactor = Sistem.ProfitFactor.ToString("0.00");


        //Getiri Çizgileri
    Sistem.Cizgiler[0].Deger = Sistem.GetiriKZGun; Sistem.Cizgiler[0].Aciklama = "Gün KZ"; Sistem.Cizgiler[0].ActiveBool = true;
    Sistem.Cizgiler[1].Deger = Sistem.GetiriKZGunSonu;Sistem.Cizgiler[1].Aciklama = "Gün Sonu KZ"; Sistem.Cizgiler[1].ActiveBool = true;
    Sistem.DolguEkle(0, 1, Color.Red, Color.Lime);
    Sistem.Cizgiler[2].Deger = Sistem.GetiriKZAy; Sistem.Cizgiler[2].Aciklama =  "Aylık Getiri"; Sistem.Cizgiler[2].ActiveBool = true;
    Sistem.Cizgiler[3].Deger = Sistem.GetiriKZAyNet; Sistem.Cizgiler[3].Aciklama =  "Aylık Getiri Net"; Sistem.Cizgiler[3].Panel = 3;
    Sistem.Cizgiler[4].Deger = Sistem.Liste(0); Sistem.Cizgiler[4].Aciklama =  "0"; Sistem.Cizgiler[4].Panel = 3;
    Sistem.DolguEkle(4, 3, Color.Red, Color.Lime);


if (GetiriTarihcesiGoster)
{


    var Date2Ay = DateTime.Now.AddDays(-60);
    var Date2AyBarNo = 0;
    for (int i = V.Count - 1; i > 0; i--)
    {
        if (V[i].Date <= Date2Ay)
        {
            Date2AyBarNo = i;
            break;
        }
    }
    var kz60 = (Sistem.GetiriKZ[Sistem.GetiriKZ.Count - 1] - Sistem.GetiriKZ[Date2AyBarNo]).ToString("0.0"); ;


    var Date3Ay = DateTime.Now.AddDays(-90);
    var Date3AyBarNo = 0;
    for (int i = V.Count - 1; i > 0; i--)
    {
        if (V[i].Date <= Date3Ay)
        {
            Date3AyBarNo = i;
            break;
        }
    }
    var kz90 = (Sistem.GetiriKZ[Sistem.GetiriKZ.Count - 1] - Sistem.GetiriKZ[Date3AyBarNo]).ToString("0.0"); ;


    var Date6Ay = DateTime.Now.AddDays(-180);
    var Date6AyBarNo = 0;
    for (int i = V.Count - 1; i > 0; i--)
    {
        if (V[i].Date <= Date6Ay)
        {
            Date6AyBarNo = i;
            break;
        }
    }
    var kz180 = (Sistem.GetiriKZ[Sistem.GetiriKZ.Count - 1] - Sistem.GetiriKZ[Date6AyBarNo]).ToString("0.0"); ;




    string Labels = SureTxt + " Ay" + Environment.NewLine +
                     "Bugün" + Environment.NewLine +
                     "Bu Ay" + Environment.NewLine +
                     "30 Gün" + Environment.NewLine +
                     "60 Gün" + Environment.NewLine +
                     "90 Gün" + Environment.NewLine +
                     "180 Gün";




    string Results = kzSure + Environment.NewLine +
                     kzbugun + Environment.NewLine +
                     kzbuay + Environment.NewLine +
                     kz30 + Environment.NewLine +
                     kz60 + Environment.NewLine +
                     kz90 + Environment.NewLine +
                     kz180;




    Sistem.Dortgen(2, 10, ilksatirY - 8, 130, 130, Color.Black, Color.Black, Color.White);
    Sistem.GradientYaziEkle(Labels, 2, 20, ilksatirY, Color.White, Color.White, "Tahoma", 10);
    Sistem.GradientYaziEkle(Results, 2, 90, ilksatirY, Color.Yellow, Color.DarkOrange, "Tahoma", 10);
}


//Performans Detayı-------------------------------------------------------------------------------------------------------------------------------------------------------
if(DetayPerformans) 
{ 


    string Labels2 =
                     "İslem / Ortalama" + Environment.NewLine +
                     "Karlı İşlem Oranı" + Environment.NewLine +
                     "Profit Factor" + Environment.NewLine +
                     "Mutlu Gün" + Environment.NewLine +
                     "Mutsuz Gün" + Environment.NewLine +
                     "MaxDD" + Environment.NewLine +
                     "MaxDD Tarihi";


    string Results2 = ToplamIslem + " / " + OrtalamaIslem + Environment.NewLine +
                     "%" + KarliIslemOran + Environment.NewLine +
                     ProfitFactor + Environment.NewLine +
                     MutluGun + Environment.NewLine +
                     MutsuzGun + Environment.NewLine +
                     MaxDD + Environment.NewLine +
                     MaxDDTarihi;


    Sistem.Dortgen(2, 150, ilksatirY - 8, 220, 130, Color.Black, Color.Black, Color.White);
    Sistem.GradientYaziEkle(Labels2, 2, 160, ilksatirY, Color.White, Color.White, "Tahoma", 10);
    Sistem.GradientYaziEkle(Results2, 2, 285, ilksatirY, Color.Yellow, Color.DarkOrange, "Tahoma", 10);
}


}
//Sistem Adı-------------------------------------------------------------------------------------------------------------------------------------------------------
if (SistemIsmiGoster)
{
    Sistem.Dortgen(1, 160, 42, 145, 98, Color.Yellow, Color.Orange, Color.Orange);
    //Sistem.ResimEkle(@"logo1.png", 1, 161, 48);
    Sistem.ZeminYazisiEkle(
                            "     A1"
                            , 1, 160, 75, Sistem.Renk(250, 49, 49, 49), "Tahoma", 24
                          );
}
//----------------------------------------------------------------------------------------------------------------------------------------------------------- 

[Orhan AKDOĞAN]

Geçen gün bende maliyet ve kaymayı fiyata göre belirleyip daha gerçekçi şekilde optimize yapmak istedim ama fiyatı düşük enstrümanlarda çalışırken virgülden sonraki rakamın Sistem Performansı bölümünde yuvarlandığını gördüm örneğin kayma + komisyon = 0.007 ve alış seviyesi 5.05 ise performans bölümünde 5.06 -yada 5.05 çok dikkat etmedim- gözüküyor. Değişkene bağlayıp float yaptım yine aynı oldu.

float a = 9.69f + 0.03f;
decimal b = (decimal)9.69 + (decimal)0.03;
Sistem.Mesaj(a.ToString() +" "+b.ToString() );

[erhanacikgoz1]

eywallah orhan hocam.