Merhaba arkadaşkar ideal'in sitesinden indirdiğim kodda küçük bir değişiklik yaparak, sorgu ile hisselere ait para giriş çıkışını listeletiyorum.
Fakat bir sorunum var, imkb 50 hisselerini seçiyorum ve bana az sayıda hisse gösteriyor. Sorun nerededir acaba. Kaç hisse seçmişsem o kadar hisseye ait listeleme yapması lazım.
PHP Code:
var Seviye = 5; //kaç kurum seviyesi için PGÇ
var Sembol = Sistem.Sembol;
var Sembol1 = Sembol.Substring(6);
Sistem.SorguBaslik[0] = "Son";
Sistem.SorguBaslik[1] = "PGÇ";
Sistem.SorguBaslik[2] = "Frk %";
var KurumlarNet = new Dictionary<string, double>();
var Islemler = Sistem.HisseIslemleriniOku();
foreach (var Islem in Islemler)
{
if (Islem.Symbol == Sembol1 )
{
if (KurumlarNet.ContainsKey(Islem.BuyerCode) == false)
KurumlarNet[Islem.BuyerCode] = 0;
if (KurumlarNet.ContainsKey(Islem.SellerCode) == false)
KurumlarNet[Islem.SellerCode] = 0;
Double TL = Islem.Price * Islem.Size;
KurumlarNet[Islem.BuyerCode] += TL;
KurumlarNet[Islem.SellerCode] -= TL;
}
}
KurumlarNet = KurumlarNet.OrderBy(x => x.Value).ToDictionary(x => x.Key, y => y.Value);
double AlanNet = 0;
double SatanNet = 0;
if (KurumlarNet.Count > 2 * Seviye)
{
for (int i = 0; i < Seviye; i++)
SatanNet += KurumlarNet.ElementAt(i).Value;
for (int i = KurumlarNet.Count - Seviye; i < KurumlarNet.Count; i++)
AlanNet += KurumlarNet.ElementAt(i).Value;
}
// PGC
double PGC = AlanNet + SatanNet;
Sistem.SorguDeger[0] = Sistem.SonFiyat(Sembol);
Sistem.SorguDeger[1] = Convert.ToInt64(PGC);
Sistem.SorguDeger[2] = Sistem.YuzdeGun(Sembol);
Sistem.SorguEkle();
Yer İmleri