Sistem.SorguAciklamaGenislik = 89;
Sistem.SorguBaslik[0] = "Fiyat";
Sistem.SorguSutunGenislik[0] = 44;
Sistem.SorguBaslik[1] = "Dip";
Sistem.SorguSutunGenislik[1] = 44;
Sistem.SorguBaslik[2] = "Tepe";
Sistem.SorguSutunGenislik[2] = 44;
Sistem.SorguBaslik[3] = "F382";
Sistem.SorguSutunGenislik[3] = 44;
Sistem.SorguBaslik[4] = "F50";
Sistem.SorguSutunGenislik[4] = 44;
Sistem.SorguBaslik[5] = "F618";
Sistem.SorguSutunGenislik[5] = 44;
Sistem.SorguBaslik[6] = "F786";
Sistem.SorguSutunGenislik[6] = 44;
Sistem.SorguBaslik[7] = "F886";
Sistem.SorguSutunGenislik[7] = 44;
Sistem.SorguBaslik[8] = "Ö.Kapanis";
Sistem.SorguSutunGenislik[8] = 59;
Sistem.SorguBaslik[9] = "Dusen";
Sistem.SorguSutunGenislik[9] = 55;
Sistem.SorguBaslik[10] = "Hacim";
Sistem.SorguSutunGenislik[10] = 66;
Sistem.SorguBaslik[11] = "STK";
Sistem.SorguSutunGenislik[11] = 55;
Sistem.SorguBaslik[12] = "RSI";
Sistem.SorguSutunGenislik[12] = 55;
Sistem.SorguBaslik[13] = "MOM";
Sistem.SorguSutunGenislik[13] = 55;
Sistem.SorguBaslik[14] = "CCI";
Sistem.SorguSutunGenislik[14] = 55;
Sistem.SorguBaslik[15] = "MACD";
Sistem.SorguSutunGenislik[15] = 65;
Sistem.SorguBaslik[16] = "AVR";
Sistem.SorguSutunGenislik[16] = 65;
Sistem.SorguBaslik[17] = "Fark*100";
Sistem.SorguSutunGenislik[17] = 65;
Sistem.SorguOndalik[0] = 2;
Sistem.SorguOndalik[1] = 2;
Sistem.SorguOndalik[2] = 2;
Sistem.SorguOndalik[3] = 2;
Sistem.SorguOndalik[4] = 2;
Sistem.SorguOndalik[5] = 2;
Sistem.SorguOndalik[6] = 2;
Sistem.SorguOndalik[7] = 2;
Sistem.SorguOndalik[8] = 2;
Sistem.SorguOndalik[9] = 2;
Sistem.SorguOndalik[10] = 2;
Sistem.SorguOndalik[11] = 2;
Sistem.SorguOndalik[12] = 2;
Sistem.SorguOndalik[13] = 2;
Sistem.SorguOndalik[14] = 2;
Sistem.SorguOndalik[15] = 2;
Sistem.SorguOndalik[16] = 2;
Sistem.SorguOndalik[17] = 2;
var Dip = Sistem.LLV(144);
var Tepe = Sistem.HHV(144);
var Fiyat = Sistem.GrafikFiyatSec("Kapanis");
var Fibo50 = Sistem.Liste(0);
var Fibo618 = Sistem.Liste(0);
var Fibo382 = Sistem.Liste(0);
var Fibo786 = Sistem.Liste(0);
var Fibo886 = Sistem.Liste(0);
var TrendPeriyodu = 233;
var SonXbar = 5;
var Sembol = Sistem.Sembol;
var V= Sistem.GrafikVerileriniOku(Sembol, Sistem.Periyot);
var C = Sistem.GrafikFiyatOku(V, "Kapanis");
var Yukselen = Sistem.OtoTrendYukselen(V, TrendPeriyodu, SonXbar);
var Dusen = Sistem.OtoTrendDusen(V, TrendPeriyodu, SonXbar);
Sistem.Cizgiler[0].Deger = Yukselen;
Sistem.Cizgiler[1].Deger = Dusen ;
var RSI= Sistem.RSI(14);
var STK= Sistem.StochasticOsc(5, 3);
var MOM = Sistem.Momentum(12);
var CCI = Sistem.CommodityChannelIndex(14);
var MACD = Sistem.MACD(12, 26);
var AVR = Sistem.MA(MACD, "exp", 9);
var x = Sistem.BarSayisi-1;
var SonAVR = AVR[Sistem.BarSayisi-1];
var SonMACD = MACD[Sistem.BarSayisi-1];
var SonRSI = RSI[Sistem.BarSayisi-1];
var SonSTK = STK[Sistem.BarSayisi-1];
var SonMOM = MOM[Sistem.BarSayisi-1];
var SonCCI = CCI[Sistem.BarSayisi-1];
var Fark = Math.Abs( SonMACD - SonAVR )/ SonMACD;
for (int i = 500; i < Sistem.BarSayisi; i++)
{
if ( Fark*100 <= 0.5 && MACD[x] < AVR[x] && MACD[x] > MACD[x - 1])
{}
}
for (int i = 0; i < Sistem.BarSayisi; i++)
{
Fibo886[i] = Tepe[i] - ((Tepe[i]-Dip[i])*0.886F);
Fibo786[i] = Tepe[i] - ((Tepe[i]-Dip[i])*0.786F);
Fibo50[i] = Tepe[i] - ((Tepe[i]-Dip[i])*0.5F);
Fibo618[i] = Tepe[i] - ((Tepe[i]-Dip[i])*0.618F);
Fibo382[i] = Tepe[i] - ((Tepe[i] - Dip[i]) * 0.382f);
}
if ( V[V.Count-1].Close < V[V.Count-TrendPeriyodu].Close && V[V.Count-1].High > Dusen[Dusen.Count-1] && Dusen[Dusen.Count-1] != 0)
{
if(Fiyat[Sistem.BarSayisi-1] > Fibo618[Sistem.BarSayisi-1] && Fiyat[Sistem.BarSayisi-1] > Fibo786[Sistem.BarSayisi-1] && Fiyat[Sistem.BarSayisi-1] > Fibo886[Sistem.BarSayisi-1] &&Fiyat[Sistem.BarSayisi-1] < Fibo50[Sistem.BarSayisi-1] && Fiyat[Sistem.BarSayisi-1] < Fibo382[Sistem.BarSayisi-1] )
{
Sistem.SorguDeger[0] = Fiyat[Sistem.BarSayisi-1];
Sistem.SorguDeger[1] = Dip[Sistem.BarSayisi-1];
Sistem.SorguDeger[2] = Tepe[Sistem.BarSayisi-1];
Sistem.SorguDeger[3] = Fibo382[Sistem.BarSayisi-1];
Sistem.SorguDeger[4] = Fibo50[Sistem.BarSayisi-1];
Sistem.SorguDeger[5] = Fibo618[Sistem.BarSayisi-1];
Sistem.SorguDeger[6] = Fibo786[Sistem.BarSayisi-1];
Sistem.SorguDeger[7] = Fibo886[Sistem.BarSayisi-1];
Sistem.SorguDeger[8]= C[C.Count-2];
Sistem.SorguDeger[9]= Dusen[Dusen.Count-1];
Sistem.SorguDeger[10] = Sistem.GrafikVerileri[Sistem.BarSayisi-1].Vol;
Sistem.SorguDeger[11] = SonSTK;
Sistem.SorguDeger[12] = SonRSI;
Sistem.SorguDeger[13] = SonMOM;
Sistem.SorguDeger[14] = SonCCI;
Sistem.SorguDeger[15] = MACD[x];
Sistem.SorguDeger[16] = AVR[x];
Sistem.SorguDeger[17] = Fark*100 ;
Sistem.SorguAciklama = "Yukarı Kırıldı";
if (SonRSI < 100 && SonRSI > 55 )
Sistem.SorguHucreZeminRengi[12] = Color.Green;
if (SonRSI < 55 && SonRSI > 45 )
Sistem.SorguHucreZeminRengi[12] = Color.LightGreen;
if (SonSTK < 105 && SonSTK > 55 )
Sistem.SorguHucreZeminRengi[11] = Color.Blue;
if (SonSTK < 55 && SonSTK > 45 )
Sistem.SorguHucreZeminRengi[11] = Color.LightBlue;
if (SonMOM < 180 && SonMOM > 99.9 )
Sistem.SorguHucreZeminRengi[13] = Color.Orange;
if (SonCCI < 380 && SonCCI > 55 )
Sistem.SorguHucreZeminRengi[14] = Color.Red;
Sistem.SorguEkle();
}
}
Yer İmleri