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

[mehmetoruc]

teşekkür ederim sn Sonli

Sanırım ideal SORGU modülünde CROSS fonksiyonu yok

emeğine sağlık

[engin.kilic.73]

Bu işi bilenlerin sorguya çekemezsin dediği konudur.
Varmıdır bir babayiğit bunu sorguda çekebilen.

Aracı kurum dağılımında en çok hacim yapan ilk 5 kurumun toplam rakamlarını ve maliyetini çekmek istiyorum.
1 krurum xxxx lot xx maliyet
2. kurum aynı şekilde gibi.

Matriks yada ideal farketmez.

[Noyan]

YGT:=0.6/100;
KYN:=Mov( (H+L+C)/3,3,E);
AD:=If((KYN*(1-YGT))>PREV,KYN*(1-YGT),If((KYN*(1+YGT))<PREV,KYN*(1+YGT),PREV));
BU:=0.05/100;
SU:=Mov( (H+L+C)/3,3,E) ;
DD:=If((SU*(1-BU))>PREV,SU*(1-BU),If((SU*(1+BU))<PREV,SU*(1+BU),PREV));
Int(AD/0.025+0.50)*0.025;Int(DD/0.025+0.50)*0.025

İDEAL FORMÜLDEKİ HATA NEREDE....
//HATALI ...
var V = Sistem.GrafikVerileri;
var C = Sistem.GrafikFiyatSec("Kapanis");
var L = Sistem.GrafikFiyatSec("Dusuk");
var H = Sistem.GrafikFiyatSec("Yuksek");
var O = Sistem.GrafikFiyatSec("Acilis");


double ygt = 0.6/100; // orjinal = 0.8
double bu = 0.05/100; // orjinal = 0.2

var hlc = Sistem.Liste(0);
var ad = Sistem.Liste(0);
var dd = Sistem.Liste(0);


for (int i = 1; i < Sistem.BarSayisi; i++)
{
hlc[i] = (H[i] + L[i] + C[i]) / 3;
}

var kyn = Sistem.MA(hlc, "Exp", 3);
var su = Sistem.MA(hlc, "Exp", 3);

for (int i = 2; i < Sistem.BarSayisi; i++)
{
if (kyn[i] * (1-ygt) > ad[i-1] ) ad[i] = (float)Math.Round(kyn[i] * (1 - ygt), 2);

else if ( kyn[i] * (1+ygt) < ad[i-1] ) ad[i] = (float)Math.Round(kyn[i] * (1 - ygt), 2);

else ad[i] = ad[i-1];

if ( su[i] * (1-bu) > dd[i-1] ) dd[i] = (float)Math.Round(su[i] * (1 - bu), 2);

else if ( su[i] * (1 + bu) < dd[i-1] ) dd[i] = (float)Math.Round(su[i] * (1 + bu), 2);

else dd[i] = dd[i-1] ;
}

Sistem.Cizgiler[0].Deger = ad;
Sistem.Cizgiler[1].Deger = dd;

[INVENTOR]

Bu hafta hacim; 29.01.2024 09:23 itibariyle; sıfır.
Bir hafta hacim sıfır olmamalı.

 #region QUERY VOLUME
 if (Sistem.BaglantiVar == true)
 {
     
     var SonFiyat = Sistem.SonFiyat(Sistem.Sembol);

     if (SonFiyat > 0)
     {

         try
         {
             var GünlükVeriler = Sistem.GrafikVerileriniOku(Sistem.Sembol, "G");

             var HacimBirHafta = Sistem.HacimBirHafta(Sistem.Sembol);
             var HacimBuHafta = Sistem.HacimBuHafta(Sistem.Sembol);

             var HacimBirAy = Sistem.HacimBirAy(Sistem.Sembol);
             var HacimBuAy = Sistem.HacimBuAy(Sistem.Sembol);
                        
             var HacimÜçAy = Sistem.HacimUcAy(Sistem.Sembol);
             var HacimAltıAy = Sistem.HacimAltiAy(Sistem.Sembol);

             var HacimBirYıl = Sistem.HacimBirYil(Sistem.Sembol);
             var HacimBuYıl = Sistem.HacimBuYil(Sistem.Sembol);

... 

[RcP]

Arkadaşlar kolay gelsin aşağıda TOMA ile ilgili iDeal_SistemGenel.pdf içerisinde de örnek olarak bulunan basit al,sat stratejinin sorgusunu nasıl yapabilirim?Toma da bulan üssel HO ve izsüren stobun kesişme anlarını bulmak istiyorum.Ya da bir bar üst ve alt mı olur bilemiyorum tam kesişme anı. Bir de acaba bu stratejiye içeriği şifreli bir indikatörü de ekleme şansımız varmı (ARS) Teşekkür Ederim


var TomaPeriyot = 3; //EMA TOMA PERİYODU
var Yuzde = 2; //TOMA YÜZDESİ
var E = Sistem.GrafikFiyatSec("Kapanis");
var TOMA = Sistem.TOMA(E,TomaPeriyot, Yuzde);
var EMA = Sistem.MA(E, "Exp",TomaPeriyot);
//var ARS = Sistem.ARS;
var SonYon = "";
for (int i= 1; i < Sistem.BarSayisi; i++)
{
if (EMA[i] > TOMA[i] && SonYon != "A")
{
SonYon = "A";
Sistem.Yon[i] = "A";
}
if (EMA[i] < TOMA[i] && SonYon != "F")
{
SonYon = "F";
Sistem.Yon[i] = "F";
}
}
Sistem.Cizgiler[0].Deger = EMA;
Sistem.Cizgiler[1].Deger = TOMA;

[Noyan]

//ideal kod yazmada yeniyim yardımcı olurmusunuz ....tşk
//TIBERYUS HOCAMIN FORMÜLÜNDE ALIŞ VE BELİRLİYECEĞİMİZ SATIŞ(ÖRNEĞİN ;ALDIĞI FİYATTAN 10 KADEME SONRASINDA SAT) KOŞULLARINA GÖRE EMİR GÖNDERME KISMI NASIL YAZILMAKTADIR TŞK.
var milisaniye = 1000;
var Kademesayisi = 3;



var Tablo = new Dictionary<string, int>();
Tablo["IMKBH'ISFIN"] = 1;
Tablo["IMKBH'FONET"] = 1;
Tablo["IMKBH'ISCTR"] = 1;
Tablo["IMKBH'TSKB"] = 1;
Tablo["IMKBH'GSDHO"] = 1;
Tablo["IMKBH'KOZAL"] = 1;
Tablo["IMKBH'ULKER"] = 1;
Tablo["IMKBH'THYAO"] = 1;

foreach (var item in Tablo)
{
var Sembol = item.Key;
var Lot = item.Value;

var AnahtarFiyat = Sistem.Name + ";" + Sembol + "FIYAT";
var AnahtarSure = Sistem.Name + ";" + Sembol + "SURE";
var AlisFiyat = Sistem.SayiTablosunuOku(AnahtarFiyat);
var Sure = Sistem.SayiTablosunuOku(AnahtarSure);

var Yuzeysel = Sistem.YuzeyselVeriOku(Sembol);
var FiyatAdım = (decimal)Yuzeysel.PriceStep;
var YeniFiyat = (decimal)Yuzeysel.BidPriceDec;

if (Environment.TickCount > Sure + milisaniye)
{
if (AlisFiyat != 0 && YeniFiyat != 0)
{
if (YeniFiyat >= AlisFiyat + Kademesayisi * FiyatAdım)
{
//EMİR GÖNDER

}


}
}
AlisFiyat = (decimal)Yuzeysel.BidPriceDec;
Sure = Environment.TickCount;
Sistem.SayiTablosunuGuncelle(AnahtarFiyat, AlisFiyat);
Sistem.SayiTablosunuGuncelle(AnahtarSure, Sure);

Sistem.Mesaj(YeniFiyat.ToString() + " " + FiyatAdım.ToString() + " " + Sure.ToString());

}

[Noyan]

//ideal kod yazmada yeniyim yardımcı olurmusunuz ....tşk
//TIBERYUS HOCAMIN FORMÜLÜNDE ALIŞ VE BELİRLİYECEĞİMİZ SATIŞ(ÖRNEĞİN ;ALDIĞI FİYATTAN 10 KADEME SONRASINDA SAT) KOŞULLARINA GÖRE EMİR GÖNDERME KISMI NASIL YAZILMAKTADIR TŞK.
var milisaniye = 1000;
var Kademesayisi = 3;



var Tablo = new Dictionary<string, int>();
Tablo["IMKBH'ISFIN"] = 1;
Tablo["IMKBH'FONET"] = 1;
Tablo["IMKBH'ISCTR"] = 1;
Tablo["IMKBH'TSKB"] = 1;
Tablo["IMKBH'GSDHO"] = 1;
Tablo["IMKBH'KOZAL"] = 1;
Tablo["IMKBH'ULKER"] = 1;
Tablo["IMKBH'THYAO"] = 1;

foreach (var item in Tablo)
{
var Sembol = item.Key;
var Lot = item.Value;

var AnahtarFiyat = Sistem.Name + ";" + Sembol + "FIYAT";
var AnahtarSure = Sistem.Name + ";" + Sembol + "SURE";
var AlisFiyat = Sistem.SayiTablosunuOku(AnahtarFiyat);
var Sure = Sistem.SayiTablosunuOku(AnahtarSure);

var Yuzeysel = Sistem.YuzeyselVeriOku(Sembol);
var FiyatAdım = (decimal)Yuzeysel.PriceStep;
var YeniFiyat = (decimal)Yuzeysel.BidPriceDec;

if (Environment.TickCount > Sure + milisaniye)
{
if (AlisFiyat != 0 && YeniFiyat != 0)
{
if (YeniFiyat >= AlisFiyat + Kademesayisi * FiyatAdım)
{
//EMİR GÖNDER

}


}
}
AlisFiyat = (decimal)Yuzeysel.BidPriceDec;
Sure = Environment.TickCount;
Sistem.SayiTablosunuGuncelle(AnahtarFiyat, AlisFiyat);
Sistem.SayiTablosunuGuncelle(AnahtarSure, Sure);

Sistem.Mesaj(YeniFiyat.ToString() + " " + FiyatAdım.ToString() + " " + Sure.ToString());

}

emir gönderme koşulunun mantığını anlıyamadım malesef....gerek yüzeysel veri üzerinden ve grafik üzerinden nasıl yapabiliyoruz ...tşk

[Noyan]

//YAPMAYA ÇALIŞTIM HATAM VARMI KONTROL EDEBİLİRMİSİNİZ......TŞK

var milisaniye = 1000;
var Kademesayisi = 3;



var Tablo = new Dictionary<string, int>();
Tablo["IMKBH'ISFIN"] = 1;
Tablo["IMKBH'FONET"] = 1;
Tablo["IMKBH'ISCTR"] = 1;
Tablo["IMKBH'TSKB"] = 1;
Tablo["IMKBH'GSDHO"] = 1;
Tablo["IMKBH'KOZAL"] = 1;
Tablo["IMKBH'ULKER"] = 1;
Tablo["IMKBH'THYAO"] = 1;

foreach (var item in Tablo)
{
var Sembol = item.Key;
var Lot = item.Value;

var AnahtarFiyat = Sistem.Name + ";" + Sembol + "FIYAT";
var AnahtarSure = Sistem.Name + ";" + Sembol + "SURE";
var AlisFiyat = Sistem.SayiTablosunuOku(AnahtarFiyat);
var Sure = Sistem.SayiTablosunuOku(AnahtarSure);

var Yuzeysel = Sistem.YuzeyselVeriOku(Sembol);
var FiyatAdim = (decimal)Yuzeysel.PriceStep;
var YeniFiyat = (decimal)Yuzeysel.BidPriceDec;

if (Environment.TickCount > Sure + milisaniye)
{

var Pozisyon = Sistem.PozisyonKontrolOku(Sembol);
if (YeniFiyat >= AlisFiyat + Kademesayisi * FiyatAdim)
{
var Miktar = 1;
Sistem.PozisyonKontrolGuncelle(Sembol, Miktar);
Sistem.EmirSembol = Sembol;
Sistem.EmirIslem = "Alış";
Sistem.EmirMiktari = Miktar;
Sistem.EmirFiyati = "Aktif";
Sistem.EmirSuresi = "SEANS"; // SEANS, GUN
Sistem.EmirTipi = "NORMAL"; // NORMAL, KIE, KPY, AFE/KAFE
Sistem.EmirGonder();
}
if (Pozisyon > 0 )
{
var Miktar = Pozisyon;
Sistem.PozisyonKontrolGuncelle(Sembol, 0);
Sistem.EmirSembol = Sembol;
Sistem.EmirIslem = "Satış";
Sistem.EmirMiktari = Miktar;
Sistem.EmirFiyati = "Aktif";
Sistem.EmirSuresi = "SEANS"; // SEANS, GUN
Sistem.EmirTipi = "NORMAL"; // NORMAL, KIE, KPY, AFE/KAFE
Sistem.EmirSatisTipi = "NORMAL"; // imkb (NORMAL, ACIGA, VIRMANDAN)
Sistem.EmirGonder();
}
}
AlisFiyat = (decimal)Yuzeysel.BidPriceDec;
Sure = Environment.TickCount;
Sistem.SayiTablosunuGuncelle(AnahtarFiyat, AlisFiyat);
Sistem.SayiTablosunuGuncelle(AnahtarSure, Sure);

Sistem.Mesaj(YeniFiyat.ToString() + " " + FiyatAdim.ToString() + " " + Sure.ToString());

}