Sistem Karşılaştırma 2

[erhanacikgoz1]

ben manuel işlem yapıyorum
siztemle robot işlem yapanlar bu hafta kar yazmaları gerekirdi , kar yazamadıysaslar yeni sistem yazmaya devam etmeliler
iyi kar yazanlar sistemlerine sahip çıksın

basit ce yazılmış 15-20 sisteme baktım bu haftayı nasıl geçirmişler diye 1 ve 5 dk lıklarda kar yazan yok adeta

iyidi bu haftada anlımızın akıyla bıtırdık 2018 i bitirdik ya dahada bırsey cıkmaz bu grafiklerden bu yıl.

[erhanacikgoz1]

elinde hazırda uyumsuzlukları gösteren bir algorıtması olan varmı tarama seklınde degıl.

viop için mantık uyduramadım nasıl birşey yazılabılırle ilgili hazır olan varsa onun uzerınden gıdeyım.

[oralet]

Arkadaşlar forumda daha önce paylaşılan günlük belirtilen miktardan fazla emir gönderen robotu, belli bir süre durdurun robot kod örneği paylaşılmıştı yanlış hatırlamıyorsam

Arşivine alan varsa burada tekrar paylaşabilirmi?

Bugün Şans eseri robotu 14. al-satı yaparken yakaladım

Robotu sanala alıp ne oluyor falan derken longta kalmışım sonra verdiler piyasaya

kar edeceğimiz günde zarar yazdık neyseki zarar fazla degil

[Bear_Bull]

Arkadaşlar forumda daha önce paylaşılan günlük belirtilen miktardan fazla emir gönderen robotu, belli bir süre durdurun robot kod örneği paylaşılmıştı yanlış hatırlamıyorsam

Arşivine alan varsa burada tekrar paylaşabilirmi?

Bugün Şans eseri robotu 14. al-satı yaparken yakaladım

Robotu sanala alıp ne oluyor falan derken longta kalmışım sonra verdiler piyasaya

kar edeceğimiz günde zarar yazdık neyseki zarar fazla degil

var LotSize = 1.0;
var Periyot = "5";
var KullanilanSistem = "SistemAdi";
var DefaLimiti = 3;


// VIOP - Canlı Barda Emir Gönderim Kalıbı
var MySistem = Sistem.SistemGetir(KullanilanSistem, "VIP'VIP-X030", Periyot);
if (MySistem != null)
{
    var V = MySistem.GrafikVerileri;
    var Saat = V[V.Count - 1].Date;
    if (Sistem.SaatAraligi("09:30", "18:14") && V[V.Count - 1].Date.Day == DateTime.Now.Day)
    {
        var DefaAnahtar = Sistem.Name + " , " + "Defa" + " , " + Saat.ToString("yyyyMMddHHmm");
        var DefaSayisi = Sistem.SayiTablosunuOku(DefaAnahtar);
        if (DefaSayisi < DefaLimiti)
        {
            var EmirSembol = Sistem.AktifViopKontrat;
            var Pozisyon = Sistem.PozisyonKontrolOku(Sistem.Name + " , " + EmirSembol);
            var SonYon = "";
            for (int i = 0; i < MySistem.Yon.Count; i++)
            {
                if (MySistem.Yon[i] != "")
                    SonYon = MySistem.Yon[i];
            }

            // Emir Miktarını Hesapla
            var Miktar = 0.0;
            if (SonYon == "F" && Pozisyon != 0)  // Flata Geç
                Miktar = -Pozisyon;
            else if (SonYon == "A" && Pozisyon != LotSize)  // Al
                Miktar = LotSize - Pozisyon;
            else if (SonYon == "S" && Pozisyon != -LotSize)  // Sat
                Miktar = -LotSize - Pozisyon;

            // Emir Gönder
            if (Miktar != 0)
            {
                Sistem.PozisyonKontrolGuncelle(Sistem.Name + " , " + EmirSembol, Miktar + Pozisyon);
                Sistem.EmirSembol = Sistem.AktifViopKontrat;
                Sistem.EmirIslem = Miktar > 0 ? "ALIS" : "SATIS";
                Sistem.EmirMiktari = Math.Abs(Miktar);
                Sistem.EmirSuresi = "GUN";
                Sistem.EmirTipi = "KPY";
                Sistem.EmirFiyatTipi = "PYS";
                Sistem.EmirGonder();
                DefaSayisi++;
                Sistem.SayiTablosunuGuncelle(DefaAnahtar, DefaSayisi);
            }
        }
    }
} 

[kenten]

olağandışılık yüzünden (çok fazla emir mesela ) sistemi durduracaksınız son pozisyonu açık bırakmak yerine sıfırlamak daha mantıklı.

[alekss]

sayın ideal yetkilileri

grafik verisi indir seçeneğinde
imkbh seçeneğini seçtiğimiz zaman bütün hisse senetlerinin grafik verisini indirmeye çalışıyor
piyasada öyle gereksiz senetler varki hiç bir zaman grafik verisine ihtiyacımız olmaz

acaba o bolümede u30 senetler veya u100 senetleri gibi seçenekler konulabilirmi ?

[oralet]

olağandışılık yüzünden (çok fazla emir mesela ) sistemi durduracaksınız son pozisyonu açık bırakmak yerine sıfırlamak daha mantıklı.

Bearbull abinin verdiği örnekte düzeltmesini yapabilir misiniz hocam , yada başka bir örnek paylaşabilir misiniz ?



C5-Mobile cihazımdan Tapatalk kullanılarak gönderildi

[Bear_Bull]

sayın ideal yetkilileri

grafik verisi indir seçeneğinde
imkbh seçeneğini seçtiğimiz zaman bütün hisse senetlerinin grafik verisini indirmeye çalışıyor
piyasada öyle gereksiz senetler varki hiç bir zaman grafik verisine ihtiyacımız olmaz

acaba o bolümede u30 senetler veya u100 senetleri gibi seçenekler konulabilirmi ?

sorgu bölümünden ister kendi istediğiniz (kaydettiğiniz liste varsa) hazır listeleri tamamlatabilirsiniz.

var Sembol = Sistem.Sembol;
var yuzeysel = Sistem.YuzeyselVeriOku(Sembol);     
Sistem.SorguBaslik[0] = "SON";
Sistem.SorguBaslik[1] = "5 dk";
Sistem.SorguBaslik[2] = "60 dk";
Sistem.SorguBaslik[3] = "Gün";
Sistem.SorguBaslik[4] = "1 DK";
var son = Sistem.SonFiyat(Sembol); 
if ( son > 0 ) {
Sistem.GrafikVerisiIndir(Sembol, "1" );
Sistem.GrafikVerisiIndir(Sembol, "5" );
Sistem.GrafikVerisiIndir(Sembol, "60" );
Sistem.GrafikVerisiIndir(Sembol, "G" );
Sistem.SorguAciklama = "Data Tamamlandı " + Sembol ;
Sistem.SorguDeger[0] = son;
Sistem.SorguDeger[1] = son;
Sistem.SorguDeger[2] = son;
Sistem.SorguDeger[3] = son;
Sistem.SorguDeger[4] = son; 
Sistem.SorguOndalik[0] = 5;
Sistem.SorguOndalik[1] = 5;
Sistem.SorguOndalik[2] = 5;
Sistem.SorguOndalik[3] = 5;
Sistem.SorguOndalik[4] = 5; 
}
else
{
Sistem.SorguAciklama =  "*** Data YOK ***";
Sistem.SorguDeger[0] = son;
}

Sistem.SorguEkle();