selam
Idealde Saatlik periyotta imkb 30 da bulunan hisselerden dusen trendi kran hisselerin listesini cikarabilir mi? (Son 100 barda 10 bar haric sekilde trend cizdirilerek). Listede cikan hisseler icin bizim belirledigimiz kistasa gore (RSI>30) hisseleri secip robota al sat islemi nasil yaptirilabilir?
sagolun...
Kod:var Semboller = new Dictionary<string, double>(); Semboller["IMKBH'AKBNK"] = 7; Semboller["IMKBH'GARAN"] = 9; Semboller["IMKBH'YKBNK"] = 11; Semboller["IMKBH'SISE"] = 13; Semboller["IMKBH'PGSUS"] = 15; Semboller["IMKBH'KCHOL"] = 17; Semboller["IMKBH'SAHOL"] = 19; var Mesaj = ""; foreach (var item in Semboller) { var Sembol = item.Key; var SembolLot = item.Value; var Bars = Sistem.GrafikVerileriniOku(Sembol, "60"); var DusenTrend = Sistem.OtoTrendDusen(Bars, 100, 10); var RSI = Sistem.RSI(Bars, 22); var SonFiyat = Sistem.SonFiyat(Sembol); var SonBarNo = Bars.Count - 1; Mesaj += "\r\n" + Sembol + ", RSI = " + RSI[SonBarNo].ToString("0.00") + ", Trend = " + DusenTrend[SonBarNo].ToString("0.00") + ", Son Fyt = " + SonFiyat.ToString("0.00"); if (Bars[SonBarNo].High > DusenTrend[SonBarNo] && RSI[SonBarNo] > 30) { // emir gönder var Anahtar = Sistem.Name + ", " + Sembol; double IslemFiyat = 0; DateTime IslemTarih; var Miktar = SembolLot; var Rezerv = ""; var Pozisyon = Sistem.PozisyonKontrolOku(Anahtar, out IslemFiyat, out IslemTarih); if (Pozisyon == 0 && SembolLot > 0 && Sistem.Saat.CompareTo("10:00:05") >= 0 && Sistem.Saat.CompareTo("17:59:55") <= 0) { var Islem = ""; Islem = "ALIS"; Rezerv = "ALIŞ YAPILDI"; Sistem.PozisyonKontrolGuncelle(Anahtar, Miktar, SonFiyat, Rezerv); Sistem.EmirSembol = Sembol; Sistem.EmirIslem = Islem; Sistem.EmirSuresi = "KIE"; Sistem.EmirTipi = "Piyasa"; Sistem.EmirMiktari = Math.Abs(Miktar); Sistem.EmirAciklama = "Gerçekleşti"; Sistem.EmirGonder(); } } } Sistem.Mesaj(Mesaj);
vahap beyaz, ahmet çakar ....
Sayin Tiberius, sagolun Hizir gibi yetistiniz.
var Semboller = new Dictionary<string, double>();
Semboller["IMKBH'AKBNK"] = 7;
Semboller["IMKBH'GARAN"] = 9;
Semboller["IMKBH'YKBNK"] = 11;
Semboller["IMKBH'SISE"] = 13;
Semboller["IMKBH'PGSUS"] = 15;
Semboller["IMKBH'KCHOL"] = 17;
Semboller["IMKBH'SAHOL"] = 19;
burdaki numaralar rastgelemi yaziliyor yoksa IMKB de her hissenin bu sekilde bir numarasi mi var.
Mesaj += "\r\n" + Sembol + ", RSI = " + RSI[SonBarNo].ToString("0.00") + ", Trend = " + DusenTrend[SonBarNo].ToString("0.00") + ", Son Fyt = " + SonFiyat.ToString("0.00");
buradaki kodlama sadece ekrana msj yazilmasi icin midir?
Son düzenleme : Santi78; 21-05-2019 saat: 02:40.
Herkese merhaba,
var K = Sistem.MA(C, "Simple", 22);
K = Sistem.Ref(K, -61);
Bu kod için 61 bar değilde değişken olarak saat başına öteleme yapılabilir mi ? örnek olarak 1 dakikalıkta kullanırken 09:58 değeri 10:01 e ötelenecek, saat 10:00 da değer 11:01 e, 10:30 11:01 e gibi... süre bazlı geri sayan öteleme gibi.
Evet mesaj satırı gözlem yapmak amacıyla eklendi.
Ancak kodda bir değişiklik yaptık. Trend oluşmamışsa kontrolu de ekledik.
var Semboller = new Dictionary<string, double>();
Semboller["IMKBH'AKBNK"] = 7;
Semboller["IMKBH'GARAN"] = 9;
Semboller["IMKBH'YKBNK"] = 11;
Semboller["IMKBH'SISE"] = 13;
Semboller["IMKBH'PGSUS"] = 15;
Semboller["IMKBH'KCHOL"] = 17;
Semboller["IMKBH'SAHOL"] = 19;
var Mesaj = "";
foreach (var item in Semboller)
{
var Sembol = item.Key;
var SembolLot = item.Value;
var Bars = Sistem.GrafikVerileriniOku(Sembol, "60");
var DusenTrend = Sistem.OtoTrendDusen(Bars, 100, 10);
var RSI = Sistem.RSI(Bars, 22);
var SonFiyat = Sistem.SonFiyat(Sembol);
var SonBarNo = Bars.Count - 1;
Mesaj += "\r\n" + Sembol + ", RSI = " + RSI[SonBarNo].ToString("0.00") + ", Trend = " + DusenTrend[SonBarNo].ToString("0.00") + ", Son Fyt = " + SonFiyat.ToString("0.00");
if (Bars[SonBarNo].High > DusenTrend[SonBarNo] && DusenTrend[SonBarNo] > 0 && RSI[SonBarNo] > 30)
{
// emir gönder
var Anahtar = Sistem.Name + ", " + Sembol;
double IslemFiyat = 0;
DateTime IslemTarih;
var Miktar = SembolLot;
var Rezerv = "";
var Pozisyon = Sistem.PozisyonKontrolOku(Anahtar, out IslemFiyat, out IslemTarih);
if (Pozisyon == 0 && SembolLot > 0 && Sistem.Saat.CompareTo("10:00:05") >= 0 && Sistem.Saat.CompareTo("17:59:55") <= 0)
{
var Islem = "";
Islem = "ALIS";
Rezerv = "ALIŞ YAPILDI";
Sistem.PozisyonKontrolGuncelle(Anahtar, Miktar, SonFiyat, Rezerv);
Sistem.EmirSembol = Sembol;
Sistem.EmirIslem = Islem;
Sistem.EmirSuresi = "KIE";
Sistem.EmirTipi = "Piyasa";
Sistem.EmirMiktari = Math.Abs(Miktar);
Sistem.EmirAciklama = "Gerçekleşti";
Sistem.EmirGonder();
}
}
}
Sistem.Mesaj(Mesaj);
vahap beyaz, ahmet çakar ....
Yer İmleri