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

[sonli]

Merhaba,
Öncelikle emek veren, bilgi paylaşan herkese cok tesekkurler.
MACD ve RSI ile bir SORGU yapmak istiyorum.

Sorgumu yazmaya calıstım. Ama calısmadı.,Hatamı bulmamda yardımcı olursanız cok sevınırım. Şimdiden cok tesekkurler.

Örnek olması açısından benzerini yazdım, kendinize göre düzenleyebilirsiniz..

var i = Sistem.BarSayisi-1; //son bar
var C = Sistem.GrafikFiyatSec("Kapanis");

var RSI = Sistem.RSI(14); // rsi değeri
var aRSI = Sistem.MA(RSI, "Exp", 9); //rsi ortalaması

var MACD = Sistem.MACD(12, 26);
var aMACD = Sistem.MA(MACD, "Exp", 9);

// filtrele
//macd ve rsi ortalamalarını yukarı kesmiş ve rsi 50 den büyük hisseler 
if ( MACD[i] > aMACD[i] && RSI[i] > aRSI[i] && RSI[i]>50  )
{
//BAŞLIKLAR
Sistem.SorguAciklamaGenislik = 100;
Sistem.SorguBaslik[0] = "Kapanış";
Sistem.SorguOndalik[0] = 2;
Sistem.SorguBaslik[1] = "RSI";
Sistem.SorguOndalik[1] = 1;
Sistem.SorguBaslik[2] = "ortRSI";
Sistem.SorguOndalik[2] = 1;
Sistem.SorguBaslik[3] = "MACD";
Sistem.SorguBaslik[4] = "ortMACD";
Sistem.SorguBaslik[5] = "%(son 10 bar)";
Sistem.SorguOndalik[5] = 1;
///DEĞERLER
Sistem.SorguDeger[0] = C[i];
Sistem.SorguDeger[1] = RSI[i];
Sistem.SorguDeger[2] = aRSI[i];
Sistem.SorguDeger[3] = MACD[i];
Sistem.SorguDeger[4] = aMACD[i];
Sistem.SorguDeger[5] = (100*(C[i]-C[i-10])/C[i]);//Sistem.PriceRocPercent(10);

//Açıklama kısmındaki bilgiyi ve renkleri RSI değerine göre değiştirelim
var bilgi = ""; 

 if ( RSI[i]<65  ) {
bilgi = "ALIM";
    Sistem.SorguZeminRengi = Color.Green; 
    Sistem.SorguYaziRengi = Color.White;
 
} else if ( RSI[i]>70  ) {
bilgi = "AŞIRI ALIM";
    Sistem.SorguZeminRengi = Color.Orange; 
    Sistem.SorguYaziRengi = Color.White;
 
}

if ( RSI[i]>80  ) {
bilgi = "Çok Aşırı :)) ";
    Sistem.SorguZeminRengi = Color.Red; 
    Sistem.SorguYaziRengi = Color.White; 
}


//rsi 65 den küçükse SorguDeger[1] zemini yeşil olsun
if (RSI[i] < 65) Sistem.SorguHucreZeminRengi[1] = Color.Green;
//ama rsi 80 den büyükse SorguDeger[1] zemini yeşil olsun
else if (RSI[i] > 80) Sistem.SorguHucreZeminRengi[1] = Color.Red;

//zemin, sorgu değer 5 > 0 ise yeşil, değilse kırmızı olsun..
if (Sistem.SorguDeger[5] > 0) Sistem.SorguHucreZeminRengi[5] = Color.Green;
else Sistem.SorguHucreZeminRengi[5] = Color.Red;
//sorgu değer 5 yazı rengini değiştirelim
Sistem.SorguHucreYaziRengi[5] = Color.Silver;


Sistem.SorguAciklama = bilgi;

   Sistem.SorguEkle();
} 

[Megeser]

Örnek olması açısından benzerini yazdım, kendinize göre düzenleyebilirsiniz..

var i = Sistem.BarSayisi-1; //son bar
var C = Sistem.GrafikFiyatSec("Kapanis");

var RSI = Sistem.RSI(14); // rsi değeri
var aRSI = Sistem.MA(RSI, "Exp", 9); //rsi ortalaması

var MACD = Sistem.MACD(12, 26);
var aMACD = Sistem.MA(MACD, "Exp", 9);

// filtrele
//macd ve rsi ortalamalarını yukarı kesmiş ve rsi 50 den büyük hisseler 
if ( MACD[i] > aMACD[i] && RSI[i] > aRSI[i] && RSI[i]>50  )
{
//BAŞLIKLAR
Sistem.SorguAciklamaGenislik = 100;
Sistem.SorguBaslik[0] = "Kapanış";
Sistem.SorguOndalik[0] = 2;
Sistem.SorguBaslik[1] = "RSI";
Sistem.SorguOndalik[1] = 1;
Sistem.SorguBaslik[2] = "ortRSI";
Sistem.SorguOndalik[2] = 1;
Sistem.SorguBaslik[3] = "MACD";
Sistem.SorguBaslik[4] = "ortMACD";
Sistem.SorguBaslik[5] = "%(son 10 bar)";
Sistem.SorguOndalik[5] = 1;
///DEĞERLER
Sistem.SorguDeger[0] = C[i];
Sistem.SorguDeger[1] = RSI[i];
Sistem.SorguDeger[2] = aRSI[i];
Sistem.SorguDeger[3] = MACD[i];
Sistem.SorguDeger[4] = aMACD[i];
Sistem.SorguDeger[5] = (100*(C[i]-C[i-10])/C[i]);//Sistem.PriceRocPercent(10);

//Açıklama kısmındaki bilgiyi ve renkleri RSI değerine göre değiştirelim
var bilgi = ""; 

 if ( RSI[i]<65  ) {
bilgi = "ALIM";
    Sistem.SorguZeminRengi = Color.Green; 
    Sistem.SorguYaziRengi = Color.White;
 
} else if ( RSI[i]>70  ) {
bilgi = "AŞIRI ALIM";
    Sistem.SorguZeminRengi = Color.Orange; 
    Sistem.SorguYaziRengi = Color.White;
 
}

if ( RSI[i]>80  ) {
bilgi = "Çok Aşırı :)) ";
    Sistem.SorguZeminRengi = Color.Red; 
    Sistem.SorguYaziRengi = Color.White; 
}


//rsi 65 den küçükse SorguDeger[1] zemini yeşil olsun
if (RSI[i] < 65) Sistem.SorguHucreZeminRengi[1] = Color.Green;
//ama rsi 80 den büyükse SorguDeger[1] zemini yeşil olsun
else if (RSI[i] > 80) Sistem.SorguHucreZeminRengi[1] = Color.Red;

//zemin, sorgu değer 5 > 0 ise yeşil, değilse kırmızı olsun..
if (Sistem.SorguDeger[5] > 0) Sistem.SorguHucreZeminRengi[5] = Color.Green;
else Sistem.SorguHucreZeminRengi[5] = Color.Red;
//sorgu değer 5 yazı rengini değiştirelim
Sistem.SorguHucreYaziRengi[5] = Color.Silver;


Sistem.SorguAciklama = bilgi;

   Sistem.SorguEkle();
} 

Elinize sağlık.KAfamdakinden de güzel olmuş
Çok çok tesekkur ederim.

[mehmetoruc]

Örnek olması açısından benzerini yazdım, kendinize göre düzenleyebilirsiniz..

var i = Sistem.BarSayisi-1; //son bar
var C = Sistem.GrafikFiyatSec("Kapanis");

var RSI = Sistem.RSI(14); // rsi değeri
var aRSI = Sistem.MA(RSI, "Exp", 9); //rsi ortalaması

var MACD = Sistem.MACD(12, 26);
var aMACD = Sistem.MA(MACD, "Exp", 9);

// filtrele
//macd ve rsi ortalamalarını yukarı kesmiş ve rsi 50 den büyük hisseler 
if ( MACD[i] > aMACD[i] && RSI[i] > aRSI[i] && RSI[i]>50  )
{
//BAŞLIKLAR
Sistem.SorguAciklamaGenislik = 100;
Sistem.SorguBaslik[0] = "Kapanış";
Sistem.SorguOndalik[0] = 2;
Sistem.SorguBaslik[1] = "RSI";
Sistem.SorguOndalik[1] = 1;
Sistem.SorguBaslik[2] = "ortRSI";
Sistem.SorguOndalik[2] = 1;
Sistem.SorguBaslik[3] = "MACD";
Sistem.SorguBaslik[4] = "ortMACD";
Sistem.SorguBaslik[5] = "%(son 10 bar)";
Sistem.SorguOndalik[5] = 1;
///DEĞERLER
Sistem.SorguDeger[0] = C[i];
Sistem.SorguDeger[1] = RSI[i];
Sistem.SorguDeger[2] = aRSI[i];
Sistem.SorguDeger[3] = MACD[i];
Sistem.SorguDeger[4] = aMACD[i];
Sistem.SorguDeger[5] = (100*(C[i]-C[i-10])/C[i]);//Sistem.PriceRocPercent(10);

//Açıklama kısmındaki bilgiyi ve renkleri RSI değerine göre değiştirelim
var bilgi = ""; 

 if ( RSI[i]<65  ) {
bilgi = "ALIM";
    Sistem.SorguZeminRengi = Color.Green; 
    Sistem.SorguYaziRengi = Color.White;
 
} else if ( RSI[i]>70  ) {
bilgi = "AŞIRI ALIM";
    Sistem.SorguZeminRengi = Color.Orange; 
    Sistem.SorguYaziRengi = Color.White;
 
}

if ( RSI[i]>80  ) {
bilgi = "Çok Aşırı :)) ";
    Sistem.SorguZeminRengi = Color.Red; 
    Sistem.SorguYaziRengi = Color.White; 
}


//rsi 65 den küçükse SorguDeger[1] zemini yeşil olsun
if (RSI[i] < 65) Sistem.SorguHucreZeminRengi[1] = Color.Green;
//ama rsi 80 den büyükse SorguDeger[1] zemini yeşil olsun
else if (RSI[i] > 80) Sistem.SorguHucreZeminRengi[1] = Color.Red;

//zemin, sorgu değer 5 > 0 ise yeşil, değilse kırmızı olsun..
if (Sistem.SorguDeger[5] > 0) Sistem.SorguHucreZeminRengi[5] = Color.Green;
else Sistem.SorguHucreZeminRengi[5] = Color.Red;
//sorgu değer 5 yazı rengini değiştirelim
Sistem.SorguHucreYaziRengi[5] = Color.Silver;


Sistem.SorguAciklama = bilgi;

   Sistem.SorguEkle();
} 

teşekkür ederim. Bu ay idealdata aldım baktım ki sorgu yapmak için kod lazım. Kodlama da bilmiyoruz. Arkadaş sağ olsun idealdata versiyonunu açmış algo açsa belki kodlama işine bukadar merak sarmıyacaktım. Teşekkür mü etsem etmesem mi bilemedim.