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

[karanj]

Selamlar Arkadaşlar
aşağıdaki şartlara göre sorgu yapmak istiyorum ? sıfıra yakın bilgim var
- Macd Al verecek
- RSİ 50 üzerinde, Momentum 100 ve üzerinde olanlar
- 8 Günlük Ortalaması , 21 günlük Ortalamasını yukarı kesen
- 50 günlük ortalaması- 200 günlük ortalamasını yukarı kesen
- Most yani TOMA değeri 1 olan
hisselerin sorgusu yapan kod , rica ediyorum.

Yardımlarınız için şimdiden teşekkürler

[ozmen]

Selamlar Arkadaşlar
aşağıdaki şartlara göre sorgu yapmak istiyorum ? sıfıra yakın bilgim var
- Macd Al verecek
- RSİ 50 üzerinde, Momentum 100 ve üzerinde olanlar
- 8 Günlük Ortalaması , 21 günlük Ortalamasını yukarı kesen
- 50 günlük ortalaması- 200 günlük ortalamasını yukarı kesen
- Most yani TOMA değeri 1 olan
hisselerin sorgusu yapan kod , rica ediyorum.

Yardımlarınız için şimdiden teşekkürler

Toma değerlerini düzenleyin.

Sistem.SorguAciklamaGenislik = 10;
Sistem.SorguBaslik[0] = "Kapanış"; Sistem.SorguOndalik[0] = 2;
Sistem.SorguBaslik[1] = "MACD";    Sistem.SorguOndalik[1] = 0;
Sistem.SorguBaslik[2] = "RSI";    Sistem.SorguOndalik[2] = 0;
Sistem.SorguBaslik[3] = "MOM";    Sistem.SorguOndalik[3] = 0;
Sistem.SorguBaslik[4] = "8-21";   Sistem.SorguOndalik[4] = 0;
Sistem.SorguBaslik[5] = "50-200";   Sistem.SorguOndalik[5] = 0;
Sistem.SorguBaslik[6] = "TOMA";   Sistem.SorguOndalik[6] = 0;
Sistem.SorguBaslik[7] = "SONUC";   Sistem.SorguOndalik[7] = 0;

var MAC = Sistem.MACD(12,26);       
var EMAM = Sistem.MA(MAC,"Exp",9);
var RSI = Sistem.RSI(14);
var MOM = Sistem.Momentum(14);
var MA8 = Sistem.MA(8, "Exp", "Kapanis");
var MA21 = Sistem.MA(21, "Exp", "Kapanis");
var MA50 = Sistem.MA(50, "Exp", "Kapanis");
var MA100 = Sistem.MA(100, "Exp", "Kapanis");
var TOM = Sistem.TOMA(3, 2);
var EMAT = Sistem.MA(TOM, "Exp", 3);

var Son = Sistem.BarSayisi -1;

var xMACD = Sistem.Liste(0);       
var xRSI = Sistem.Liste(0);
var xMOM = Sistem.Liste(0);
var xMA821 = Sistem.Liste(0);
var xMA50100 = Sistem.Liste(0);
var xTOM = Sistem.Liste(0);

for (int i=1; i < Sistem.BarSayisi; i++)
{  
 xMACD[i] = MAC[i] > EMAM[i] ? 1 :0;
 xRSI[i] = RSI[i]>50.0f ? 1 :0;
 xMOM[i] = MOM[i]>100.0f ? 1 :0;
 xMA821[i] = MA8[i]>MA21[i] ? 1 :0;
 xMA50100[i] = MA50[i]>MA100[i] ? 1 :0; 
 xTOM[i] = TOM[i]>EMAT[i] ? 1 :0; 
}

// Macd filtrele 
// if ( MAC[Son] > EMAM[Son] && MAC[Son-1] < EMAM[Son-1]   )

{
   Sistem.SorguDeger[0] = Sistem.GrafikVerileri[Sistem.BarSayisi-1].Close;
   Sistem.SorguDeger[1] = xMACD[Son];
   Sistem.SorguDeger[2] = xRSI[Son];   
   Sistem.SorguDeger[3] = xMOM[Son];
   Sistem.SorguDeger[4] = xMA821[Son];
   Sistem.SorguDeger[5] = xMA50100[Son]; 
   Sistem.SorguDeger[6] = xTOM[Son];
   Sistem.SorguDeger[7] = xMACD[Son]+xRSI[Son]+xMOM[Son]+xMA821[Son]+xMA50100[Son]+xTOM[Son];
}
  Sistem.SorguEkle(); 

[mehmetoruc]

Toma değerlerini düzenleyin.

Sistem.SorguAciklamaGenislik = 10;
Sistem.SorguBaslik[0] = "Kapanış"; Sistem.SorguOndalik[0] = 2;
Sistem.SorguBaslik[1] = "MACD";    Sistem.SorguOndalik[1] = 0;
Sistem.SorguBaslik[2] = "RSI";    Sistem.SorguOndalik[2] = 0;
Sistem.SorguBaslik[3] = "MOM";    Sistem.SorguOndalik[3] = 0;
Sistem.SorguBaslik[4] = "8-21";   Sistem.SorguOndalik[4] = 0;
Sistem.SorguBaslik[5] = "50-200";   Sistem.SorguOndalik[5] = 0;
Sistem.SorguBaslik[6] = "TOMA";   Sistem.SorguOndalik[6] = 0;
Sistem.SorguBaslik[7] = "SONUC";   Sistem.SorguOndalik[7] = 0;

var MAC = Sistem.MACD(12,26);       
var EMAM = Sistem.MA(MAC,"Exp",9);
var RSI = Sistem.RSI(14);
var MOM = Sistem.Momentum(14);
var MA8 = Sistem.MA(8, "Exp", "Kapanis");
var MA21 = Sistem.MA(21, "Exp", "Kapanis");
var MA50 = Sistem.MA(50, "Exp", "Kapanis");
var MA100 = Sistem.MA(100, "Exp", "Kapanis");
var TOM = Sistem.TOMA(3, 2);
var EMAT = Sistem.MA(TOM, "Exp", 3);

var Son = Sistem.BarSayisi -1;

var xMACD = Sistem.Liste(0);       
var xRSI = Sistem.Liste(0);
var xMOM = Sistem.Liste(0);
var xMA821 = Sistem.Liste(0);
var xMA50100 = Sistem.Liste(0);
var xTOM = Sistem.Liste(0);

for (int i=1; i < Sistem.BarSayisi; i++)
{  
 xMACD[i] = MAC[i] > EMAM[i] ? 1 :0;
 xRSI[i] = RSI[i]>50.0f ? 1 :0;
 xMOM[i] = MOM[i]>100.0f ? 1 :0;
 xMA821[i] = MA8[i]>MA21[i] ? 1 :0;
 xMA50100[i] = MA50[i]>MA100[i] ? 1 :0; 
 xTOM[i] = TOM[i]>EMAT[i] ? 1 :0; 
}

// Macd filtrele 
// if ( MAC[Son] > EMAM[Son] && MAC[Son-1] < EMAM[Son-1]   )

{
   Sistem.SorguDeger[0] = Sistem.GrafikVerileri[Sistem.BarSayisi-1].Close;
   Sistem.SorguDeger[1] = xMACD[Son];
   Sistem.SorguDeger[2] = xRSI[Son];   
   Sistem.SorguDeger[3] = xMOM[Son];
   Sistem.SorguDeger[4] = xMA821[Son];
   Sistem.SorguDeger[5] = xMA50100[Son]; 
   Sistem.SorguDeger[6] = xTOM[Son];
   Sistem.SorguDeger[7] = xMACD[Son]+xRSI[Son]+xMOM[Son]+xMA821[Son]+xMA50100[Son]+xTOM[Son];
}
  Sistem.SorguEkle(); 

çok teşekkür ederim en kapsamlı sorgulardan biri