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

[cashhflow]

sermayeyi manuel olarak giriş yapıp kaldıracı hesaplatabilirsin
mail içine
SonFiyat, Rezerv
değerlerini koyarsan maliyet ve işlem bilgisi de göndermiş olur.

Tşk sn Bear Bull o zaman manuel sermaye girmemiz gerekecek sürekli. Sanırım zaten kodun en üstünde olması sıkıntı bir durum emir öncesi kısma viop hesap oku kısmını bir şekilde almam lazım.

[ozmen]

İyi Haftalar;
tek taramada Aylık ma x/x kesenleri ve bu hisselerin günlük ma x/x leri kesenleri nasıl tarabilirim?

http://www.hisse.net/topluluk/showth...00#post2932800

Double MA lı anladım ben Sayın Netkit.
Sayın Tiberus un kodunda değişiklilik yapılmış hali ile aşağıdadır. Teşekkürler Tiberius.

var MAX = Sistem.Parametreler[0]; // Küçük Periyot
var MAY = Sistem.Parametreler[1]; // Büyük Periyot

var VGUN = Sistem.GrafikVerileriniOku(Sistem.Sembol, "G");        // günlük veri listesi
var CGUN = Sistem.GrafikFiyatOku(VGUN, "Kapanis");                // günlük kapanış listesi
var VAY = Sistem.GrafikVerileriniOku(Sistem.Sembol, "A");        // Aylık veri listesi
var CAY = Sistem.GrafikFiyatOku(VAY, "Kapanis");                // Aylık kapanış listesi

var MAGUN = Sistem.MA(CGUN, "Exp", MAX);
var MAGUN2 = Sistem.MA(CGUN, "Exp", MAY);

var MAAY = Sistem.MA(CAY, "Exp", MAX);
var MAAY2 = Sistem.MA(CAY, "Exp", MAY);
            
string Aciklama = "";
if (MAAY2[MAAY2.Count - 1] < MAAY[MAAY.Count - 1] && MAGUN[MAGUN.Count - 1] > MAGUN2[MAGUN2.Count - 1] && MAGUN[MAGUN.Count - 2] < MAGUN2[MAGUN2.Count - 2])
{
    Aciklama = " Yukarı Dönüş";
    Sistem.SorguZeminRengi = Color.Green;
    Sistem.SorguYaziRengi = Color.White;
}
if (MAAY[MAAY.Count - 1] < MAAY2[MAAY2.Count - 1] && MAGUN2[MAGUN2.Count - 1] > MAGUN[MAGUN.Count - 1]&& MAGUN2[MAGUN2.Count - 2] < MAGUN[MAGUN.Count - 2])
{
    Aciklama = " Aşağı Dönüş";
    Sistem.SorguZeminRengi = Color.Red;
    Sistem.SorguYaziRengi = Color.White;
}


Sistem.SorguBaslik[0] = "SON FIYAT";
Sistem.SorguBaslik[1] = "MA GUN";
Sistem.SorguBaslik[2] = "MA AY";
if (Aciklama != "")
{
    Sistem.SorguAciklama = Aciklama;
    Sistem.SorguDeger[0] = CGUN[CGUN.Count - 1];
    Sistem.SorguDeger[1] = MAGUN[MAGUN.Count - 1];
    Sistem.SorguDeger[2] = MAAY[MAAY.Count - 1];
    Sistem.SorguEkle();
} 

[/QUOTE]

[Bear_Bull]

Tşk sn Bear Bull o zaman manuel sermaye girmemiz gerekecek sürekli. Sanırım zaten kodun en üstünde olması sıkıntı bir durum emir öncesi kısma viop hesap oku kısmını bir şekilde almam lazım.

aracı kuruma bağlı değilseniz otomatik login olabilmesi için bir "LoginOL" dosyası yaparsanız sanırım iş görür.

float KulTeminat =  Convert.ToSingle(Sistem.Parametreler[19].Split('=')[1].Trim()  );


var ViopHes = Sistem.ViopHesapOku(); 
if (ViopHes == null) { var BBSistem = Sistem.SistemGetir("LoginOL", "FX'USDTRY", "1") ; 
}//                       
if (BBSistem == null)  Sistem.Mesaj("LoginOL_Sistem Dosyası Okunamadı ! Portföye Giriş Yapınız");}
else 
if (ViopHes != null) Sistem.Parametreler[19] = "Kullanılabilir.Teminat       = " +  ViopHes.TeminatKullanilabilir.ToString("0,000") ;
    
} 

[netkit]

http://www.hisse.net/topluluk/showth...00#post2932800

Double MA lı anladım ben Sayın Netkit.
Sayın Tiberus un kodunda değişiklilik yapılmış hali ile aşağıdadır. Teşekkürler Tiberius.

var MAX = Sistem.Parametreler[0]; // Küçük Periyot
var MAY = Sistem.Parametreler[1]; // Büyük Periyot

var VGUN = Sistem.GrafikVerileriniOku(Sistem.Sembol, "G");        // günlük veri listesi
var CGUN = Sistem.GrafikFiyatOku(VGUN, "Kapanis");                // günlük kapanış listesi
var VAY = Sistem.GrafikVerileriniOku(Sistem.Sembol, "A");        // Aylık veri listesi
var CAY = Sistem.GrafikFiyatOku(VAY, "Kapanis");                // Aylık kapanış listesi

var MAGUN = Sistem.MA(CGUN, "Exp", MAX);
var MAGUN2 = Sistem.MA(CGUN, "Exp", MAY);

var MAAY = Sistem.MA(CAY, "Exp", MAX);
var MAAY2 = Sistem.MA(CAY, "Exp", MAY);
            
string Aciklama = "";
if (MAAY2[MAAY2.Count - 1] < MAAY[MAAY.Count - 1] && MAGUN[MAGUN.Count - 1] > MAGUN2[MAGUN2.Count - 1] && MAGUN[MAGUN.Count - 2] < MAGUN2[MAGUN2.Count - 2])
{
    Aciklama = " Yukarı Dönüş";
    Sistem.SorguZeminRengi = Color.Green;
    Sistem.SorguYaziRengi = Color.White;
}
if (MAAY[MAAY.Count - 1] < MAAY2[MAAY2.Count - 1] && MAGUN2[MAGUN2.Count - 1] > MAGUN[MAGUN.Count - 1]&& MAGUN2[MAGUN2.Count - 2] < MAGUN[MAGUN.Count - 2])
{
    Aciklama = " Aşağı Dönüş";
    Sistem.SorguZeminRengi = Color.Red;
    Sistem.SorguYaziRengi = Color.White;
}


Sistem.SorguBaslik[0] = "SON FIYAT";
Sistem.SorguBaslik[1] = "MA GUN";
Sistem.SorguBaslik[2] = "MA AY";
if (Aciklama != "")
{
    Sistem.SorguAciklama = Aciklama;
    Sistem.SorguDeger[0] = CGUN[CGUN.Count - 1];
    Sistem.SorguDeger[1] = MAGUN[MAGUN.Count - 1];
    Sistem.SorguDeger[2] = MAAY[MAAY.Count - 1];
    Sistem.SorguEkle();
} 

[/QUOTE]

Çok teşekkür ederim yarın deneyecegim.

[Tiberius]

Yeni bir dönem açıyoruz, yakında dertler bitecek.
Şablon robot geliyor.
Eğitim programları da olacak.

[alekss]

Yeni bir dönem açıyoruz, yakında dertler bitecek.
Şablon robot geliyor.
Eğitim programları da olacak.

sayın Tiberius
idealdata olarak son zamanlardaki yeniliklerle adeta oyunun kurallarını yeniden yazıyorsunuz
sabırsızlıkla bekliyoruz bahsettiğiniz yeniliği
tebrikler , beyninize sağlık

[tuncahm]

Yeni bir dönem açıyoruz, yakında dertler bitecek.
Şablon robot geliyor.
Eğitim programları da olacak.

[Tiberius]

PERFORMANS