50 üssel periyot aşağı ve yukarı kesen tarama(sorgu) örneği.. Sorguya hacim şartı eklemedim ama sonuç tablosunda son hacim, son 5 periyot hacim ort ve son hacim/son 5 periyot hacim ort oranını gösteriyor..
PHP Code:
//akşam sorgulama yaptığınızda, 120dk lık altı periyotlar 18:00 ve 18.10 kapanışlarını sorgulayacağından genelde sağlıklı çalışmaz
Sistem.SorguBaslik[0] = "Kapanış";
Sistem.SorguBaslik[1] = "EMA-50";
Sistem.SorguBaslik[2] = "Son Hacim";
Sistem.SorguBaslik[3] = "OrtHacim";
Sistem.SorguBaslik[4] = "V/OrtV";
var MA2 = Sistem.MA(50, "Exp", "Kapanis"); //50 üssel ortalama
var Vort = Sistem.MA(5, "Simple", "Hacim"); //son 5 periyot hacim ortalaması
var Veriler = Sistem.GrafikVerileri;
var C = Sistem.GrafikFiyatOku(Veriler, "Kapanis");
var V = Sistem.GrafikFiyatOku(Veriler, "Hacim");
var j=Sistem.BarSayisi-1;
var bilgi = "";
var z=0;
if ( C[j]>MA2[j] && C[j-1]<MA2[j] ) { //son kapanış>ma2 ve bir önceki kapanış<ma2
z=1;
bilgi = "Ortalamayı Yukarı Kesmiş";
Sistem.SorguZeminRengi = Color.Green;
Sistem.SorguYaziRengi = Color.White;
}
else if ( C[j]<MA2[j] && C[j-1]>MA2[j] ) {
z=1;
bilgi = "Ortalamayı Aşağı Kesmiş";
Sistem.SorguZeminRengi = Color.Red;
Sistem.SorguYaziRengi = Color.White;
}
//sonuç varsa ekrana bas
if(z>0){
Sistem.SorguDeger[0] = C[j];
Sistem.SorguDeger[1] = MA2[j];
Sistem.SorguDeger[2] = V[j];
Sistem.SorguDeger[3] = Vort[j];
Sistem.SorguDeger[4] = (V[j]/Vort[j]);
Sistem.SorguAciklama = bilgi;
Sistem.SorguEkle();
}
Yer İmleri