Originally Posted by
Megeser
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..
PHP Code:
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();
}
Yer İmleri