Ý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