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

**3c1a** · 13-05-2020, 14:10

Originally Posted by Ali100

Teşekkür ediyorum ancak tam yazamamışım, robot bir hissede alsat yaparken aracı kurum hesabımda o hissenin önceden lotu var mı kontrol ederek o hisseleri de işin içine koyarak alsat yapacak ve alsat yaparken nakite bakacak nakit yeterli ise hisseyi alıp satacak. ayrıca kodların içine aracı kurum adı ve hesap no yazılmayacak mı?

Asagidaki ornekten yola cikarak portfoyde bulunan hisse isin icine katilabilir bostaki bakiye kontrol edilebilir. Biraz ugrastirir belki ama mumkun gorunuyor.

"ekranda bolca boş yeriniz varsa belli aralıklarla ekran görüntüsünü kendinize mail atıyorsanız
detaylarıda göstersin istiyorsanız

iDealtrade'nin yazmış olduğu örnekler {ben sadece hepsini birleştirdim}

birde LoginOL sistem yazdım

sabah ideali açıp Robota Sanal/Gerçek tıkladığımda login olmak için şifre yazmamada gerek kalmıyor.
Hesap_Tablo çalıştığında sisteme login değilsem kendisi login oluyor."

Kod:

//LoginOL


var kontrol = Sistem.SozcukTablosunuOku("FX'USDTRY" + "login"); 
if (kontrol != "BB") 
{
Sistem.PortfoyLogin("M.NO, ARACI KURUM","ŞİFRE","KULLANICIADI"); 
Sistem.SozcukTablosunuGuncelle("FX'USDTRY" + "login" , "BB"); 
}




//HESAP_TABLO


if ( Sistem.ZamanKontrolDakika("bakiyeoku") >= 1) // 1 dakikada 1 kez kontrol eder. 
{ // ZamanKontrolDakika
Sistem.ZamanKontrolGuncelle("bakiyeoku");




var ViopHesap = Sistem.ViopHesapOku();
if (ViopHesap != null)


{ // hesap Kontrol
var Renk = Color.Black;
// Pozisyonlar
var PozListP = ViopHesap.Pozisyonlar;
// Tabloya Yazdır
string Tbl_Vip_Poz = "VIOP POZISYONLAR";
var SG1 = new int[2]{170,50};
var SH1 = new int[2]{0,1};
var SB1 = new string[2]{"Sembol","Poz"};
Sistem.Tablo(Tbl_Vip_Poz, 200, 100, 260, 200, 2, 25, SG1, SH1, SB1);
Sistem.TabloTemizle(Tbl_Vip_Poz);
for (int i = 0; i < PozListP.Count; i++)
{
Renk = Color.Black;
if (PozListP[i].NetAmount > 0)
Renk = Color.Blue;
else if (PozListP[i].NetAmount < 0)
Renk = Color.Red;
Sistem.TabloYazdir(Tbl_Vip_Poz, 0, i, PozListP[i].Symbol, Color.White, Renk);
Sistem.TabloYazdir(Tbl_Vip_Poz, 1, i, PozListP[i].NetAmount.ToString("0"), Color.White, Renk);
}
///////////////////////


// Teminat
string Tbl_Vip_Tmnt = "VIOP TEMINAT";
var SG2= new int[2]{150,80};
var SH2 = new int[2]{0,2};
var SB2 = new string[2]{"Açıklama","Değer"};
Sistem.Tablo(Tbl_Vip_Tmnt, 450, 100, 250, 200, 2, 7, SG2, SH2, SB2);
Sistem.TabloTemizle(Tbl_Vip_Tmnt);
Sistem.TabloYazdir(Tbl_Vip_Tmnt, 0, 0, "Teminat Toplamı", Color.White, Color.Black);
Sistem.TabloYazdir(Tbl_Vip_Tmnt, 1, 0, ViopHesap.TeminatToplam.ToString("0.00"), Color.White, Color.Black);
Sistem.TabloYazdir(Tbl_Vip_Tmnt, 0, 1, "Başlangıç Teminatı", Color.White, Color.Black);
Sistem.TabloYazdir(Tbl_Vip_Tmnt, 1, 1, ViopHesap.TeminatBaslangic.ToString("0.00"), Color.White, Color.Black);
Sistem.TabloYazdir(Tbl_Vip_Tmnt, 0, 2, "Sürdürme Teminatı", Color.White, Color.Black);
Sistem.TabloYazdir(Tbl_Vip_Tmnt, 1, 2, ViopHesap.TeminatSurdurme.ToString("0.00"), Color.White, Color.Black);
Sistem.TabloYazdir(Tbl_Vip_Tmnt, 0, 3, "Kullanılabilir Teminat", Color.White, Color.Black);
Sistem.TabloYazdir(Tbl_Vip_Tmnt, 1, 3, ViopHesap.TeminatKullanilabilir.ToString("0.00"), Color.White, Color.Black);
Sistem.TabloYazdir(Tbl_Vip_Tmnt, 0, 4, "Çekilebilir Teminat", Color.White, Color.Black);
Sistem.TabloYazdir(Tbl_Vip_Tmnt, 1, 4, ViopHesap.TeminatCekilebilir.ToString("0.00"), Color.White, Color.Black);
////////////////////////////////




// Bekleyen Emirler
var BekleyenList = ViopHesap.BekleyenEmirler;
// Tabloya Yazdır
string Tbl_Vip_B_Emir = "VIOP BEKLEYEN";
var SG3 = new int[7]{170,45,45,45,70,45,45};
var SH3 = new int[7]{0,1,1,1,1,1,1};
var SB3 = new string[7]{"Sembol", "İşlem", "Fiyat", "Miktar", "Emir No", "Emir Tip","Fiyat Tip"};
Sistem.Tablo(Tbl_Vip_B_Emir, 200, 300, 500, 200, 7, 50, SG3, SH3, SB3);
Sistem.TabloTemizle(Tbl_Vip_B_Emir);
for (int i = 0; i < BekleyenList.Count; i++)
{
Renk = Color.Black;
if (BekleyenList[i].BuySell.Substring(0,1) == "A")
Renk = Color.Blue;
else if (BekleyenList[i].BuySell.Substring(0,1) == "S")
Renk = Color.Red;
Sistem.TabloYazdir(Tbl_Vip_B_Emir, 0, i, BekleyenList[i].Symbol, Color.White, Renk);
Sistem.TabloYazdir(Tbl_Vip_B_Emir, 1, i, BekleyenList[i].BuySell, Color.White, Renk);
Sistem.TabloYazdir(Tbl_Vip_B_Emir, 2, i, BekleyenList[i].Price.ToString("0.000"), Color.White, Renk);
Sistem.TabloYazdir(Tbl_Vip_B_Emir, 3, i, BekleyenList[i].Balance.ToString("0"), Color.White, Renk);
Sistem.TabloYazdir(Tbl_Vip_B_Emir, 4, i, BekleyenList[i].OrderNo, Color.White, Renk);
Sistem.TabloYazdir(Tbl_Vip_B_Emir, 5, i, BekleyenList[i].OrderType, Color.White, Renk);
Sistem.TabloYazdir(Tbl_Vip_B_Emir, 6, i, BekleyenList[i].PriceType, Color.White, Renk);


}






///////////////////// 
// Gerçekleşen Emirler
var GerceklesenList = ViopHesap.GerceklesenEmirler;
// Tabloya Yazdır
string Tbl_Vip_G_Emir = "VIOP GERCEKLESEN";
var SG4 = new int[5]{170,50,50,50,70};
var SH4 = new int[5]{0,1,1,1,2};
var SB4 = new string[5]{"Sembol", "İşlem", "Fiyat", "Miktar", "Emir No"};
Sistem.Tablo(Tbl_Vip_G_Emir, 200, 500, 450, 200, 5, 100, SG4, SH4, SB4);
Sistem.TabloTemizle(Tbl_Vip_G_Emir);
for (int i = 0; i < GerceklesenList.Count; i++)
{


if (GerceklesenList[i].BuySell.Substring(0,1) == "A")
Renk = Color.Blue;
else if (GerceklesenList[i].BuySell.Substring(0,1) == "S")
Renk = Color.Red;
Sistem.TabloYazdir(Tbl_Vip_G_Emir, 0, i, GerceklesenList[i].Symbol, Color.White, Renk);
Sistem.TabloYazdir(Tbl_Vip_G_Emir, 1, i, GerceklesenList[i].BuySell, Color.White, Renk);
Sistem.TabloYazdir(Tbl_Vip_G_Emir, 2, i, GerceklesenList[i].Price.ToString("0.000"), Color.White, Renk);
Sistem.TabloYazdir(Tbl_Vip_G_Emir, 3, i, GerceklesenList[i].Amount.ToString("0"), Color.White, Renk);
Sistem.TabloYazdir(Tbl_Vip_G_Emir, 4, i, GerceklesenList[i].OrderNo, Color.White, Renk);
}
}
else
{ if (ViopHesap == null) Sistem.SistemGetir("LoginOL", "FX'USDTRY", "1") ; } 


////////////
} // ZamanKontrol

**Ali100** · 13-05-2020, 15:00

Originally Posted by 3c1a

Asagidaki ornekten yola cikarak portfoyde bulunan hisse isin icine katilabilir bostaki bakiye kontrol edilebilir. Biraz ugrastirir belki ama mumkun gorunuyor.

"ekranda bolca boş yeriniz varsa belli aralıklarla ekran görüntüsünü kendinize mail atıyorsanız
detaylarıda göstersin istiyorsanız

iDealtrade'nin yazmış olduğu örnekler {ben sadece hepsini birleştirdim}

birde LoginOL sistem yazdım

sabah ideali açıp Robota Sanal/Gerçek tıkladığımda login olmak için şifre yazmamada gerek kalmıyor.
Hesap_Tablo çalıştığında sisteme login değilsem kendisi login oluyor."

Kod:

//LoginOL


var kontrol = Sistem.SozcukTablosunuOku("FX'USDTRY" + "login"); 
if (kontrol != "BB") 
{
Sistem.PortfoyLogin("M.NO, ARACI KURUM","ŞİFRE","KULLANICIADI"); 
Sistem.SozcukTablosunuGuncelle("FX'USDTRY" + "login" , "BB"); 
}




//HESAP_TABLO


if ( Sistem.ZamanKontrolDakika("bakiyeoku") >= 1) // 1 dakikada 1 kez kontrol eder. 
{ // ZamanKontrolDakika
Sistem.ZamanKontrolGuncelle("bakiyeoku");




var ViopHesap = Sistem.ViopHesapOku();
if (ViopHesap != null)


{ // hesap Kontrol
var Renk = Color.Black;
// Pozisyonlar
var PozListP = ViopHesap.Pozisyonlar;
// Tabloya Yazdır
string Tbl_Vip_Poz = "VIOP POZISYONLAR";
var SG1 = new int[2]{170,50};
var SH1 = new int[2]{0,1};
var SB1 = new string[2]{"Sembol","Poz"};
Sistem.Tablo(Tbl_Vip_Poz, 200, 100, 260, 200, 2, 25, SG1, SH1, SB1);
Sistem.TabloTemizle(Tbl_Vip_Poz);
for (int i = 0; i < PozListP.Count; i++)
{
Renk = Color.Black;
if (PozListP[i].NetAmount > 0)
Renk = Color.Blue;
else if (PozListP[i].NetAmount < 0)
Renk = Color.Red;
Sistem.TabloYazdir(Tbl_Vip_Poz, 0, i, PozListP[i].Symbol, Color.White, Renk);
Sistem.TabloYazdir(Tbl_Vip_Poz, 1, i, PozListP[i].NetAmount.ToString("0"), Color.White, Renk);
}
///////////////////////


// Teminat
string Tbl_Vip_Tmnt = "VIOP TEMINAT";
var SG2= new int[2]{150,80};
var SH2 = new int[2]{0,2};
var SB2 = new string[2]{"Açıklama","Değer"};
Sistem.Tablo(Tbl_Vip_Tmnt, 450, 100, 250, 200, 2, 7, SG2, SH2, SB2);
Sistem.TabloTemizle(Tbl_Vip_Tmnt);
Sistem.TabloYazdir(Tbl_Vip_Tmnt, 0, 0, "Teminat Toplamı", Color.White, Color.Black);
Sistem.TabloYazdir(Tbl_Vip_Tmnt, 1, 0, ViopHesap.TeminatToplam.ToString("0.00"), Color.White, Color.Black);
Sistem.TabloYazdir(Tbl_Vip_Tmnt, 0, 1, "Başlangıç Teminatı", Color.White, Color.Black);
Sistem.TabloYazdir(Tbl_Vip_Tmnt, 1, 1, ViopHesap.TeminatBaslangic.ToString("0.00"), Color.White, Color.Black);
Sistem.TabloYazdir(Tbl_Vip_Tmnt, 0, 2, "Sürdürme Teminatı", Color.White, Color.Black);
Sistem.TabloYazdir(Tbl_Vip_Tmnt, 1, 2, ViopHesap.TeminatSurdurme.ToString("0.00"), Color.White, Color.Black);
Sistem.TabloYazdir(Tbl_Vip_Tmnt, 0, 3, "Kullanılabilir Teminat", Color.White, Color.Black);
Sistem.TabloYazdir(Tbl_Vip_Tmnt, 1, 3, ViopHesap.TeminatKullanilabilir.ToString("0.00"), Color.White, Color.Black);
Sistem.TabloYazdir(Tbl_Vip_Tmnt, 0, 4, "Çekilebilir Teminat", Color.White, Color.Black);
Sistem.TabloYazdir(Tbl_Vip_Tmnt, 1, 4, ViopHesap.TeminatCekilebilir.ToString("0.00"), Color.White, Color.Black);
////////////////////////////////




// Bekleyen Emirler
var BekleyenList = ViopHesap.BekleyenEmirler;
// Tabloya Yazdır
string Tbl_Vip_B_Emir = "VIOP BEKLEYEN";
var SG3 = new int[7]{170,45,45,45,70,45,45};
var SH3 = new int[7]{0,1,1,1,1,1,1};
var SB3 = new string[7]{"Sembol", "İşlem", "Fiyat", "Miktar", "Emir No", "Emir Tip","Fiyat Tip"};
Sistem.Tablo(Tbl_Vip_B_Emir, 200, 300, 500, 200, 7, 50, SG3, SH3, SB3);
Sistem.TabloTemizle(Tbl_Vip_B_Emir);
for (int i = 0; i < BekleyenList.Count; i++)
{
Renk = Color.Black;
if (BekleyenList[i].BuySell.Substring(0,1) == "A")
Renk = Color.Blue;
else if (BekleyenList[i].BuySell.Substring(0,1) == "S")
Renk = Color.Red;
Sistem.TabloYazdir(Tbl_Vip_B_Emir, 0, i, BekleyenList[i].Symbol, Color.White, Renk);
Sistem.TabloYazdir(Tbl_Vip_B_Emir, 1, i, BekleyenList[i].BuySell, Color.White, Renk);
Sistem.TabloYazdir(Tbl_Vip_B_Emir, 2, i, BekleyenList[i].Price.ToString("0.000"), Color.White, Renk);
Sistem.TabloYazdir(Tbl_Vip_B_Emir, 3, i, BekleyenList[i].Balance.ToString("0"), Color.White, Renk);
Sistem.TabloYazdir(Tbl_Vip_B_Emir, 4, i, BekleyenList[i].OrderNo, Color.White, Renk);
Sistem.TabloYazdir(Tbl_Vip_B_Emir, 5, i, BekleyenList[i].OrderType, Color.White, Renk);
Sistem.TabloYazdir(Tbl_Vip_B_Emir, 6, i, BekleyenList[i].PriceType, Color.White, Renk);


}






///////////////////// 
// Gerçekleşen Emirler
var GerceklesenList = ViopHesap.GerceklesenEmirler;
// Tabloya Yazdır
string Tbl_Vip_G_Emir = "VIOP GERCEKLESEN";
var SG4 = new int[5]{170,50,50,50,70};
var SH4 = new int[5]{0,1,1,1,2};
var SB4 = new string[5]{"Sembol", "İşlem", "Fiyat", "Miktar", "Emir No"};
Sistem.Tablo(Tbl_Vip_G_Emir, 200, 500, 450, 200, 5, 100, SG4, SH4, SB4);
Sistem.TabloTemizle(Tbl_Vip_G_Emir);
for (int i = 0; i < GerceklesenList.Count; i++)
{


if (GerceklesenList[i].BuySell.Substring(0,1) == "A")
Renk = Color.Blue;
else if (GerceklesenList[i].BuySell.Substring(0,1) == "S")
Renk = Color.Red;
Sistem.TabloYazdir(Tbl_Vip_G_Emir, 0, i, GerceklesenList[i].Symbol, Color.White, Renk);
Sistem.TabloYazdir(Tbl_Vip_G_Emir, 1, i, GerceklesenList[i].BuySell, Color.White, Renk);
Sistem.TabloYazdir(Tbl_Vip_G_Emir, 2, i, GerceklesenList[i].Price.ToString("0.000"), Color.White, Renk);
Sistem.TabloYazdir(Tbl_Vip_G_Emir, 3, i, GerceklesenList[i].Amount.ToString("0"), Color.White, Renk);
Sistem.TabloYazdir(Tbl_Vip_G_Emir, 4, i, GerceklesenList[i].OrderNo, Color.White, Renk);
}
}
else
{ if (ViopHesap == null) Sistem.SistemGetir("LoginOL", "FX'USDTRY", "1") ; } 


////////////
} // ZamanKontrol

Üstat çok teşekkür ediyorum