PHP Code:
///renkler
var sarı = Sistem.Renk(255, 255, 255, 1);
var yesil = Sistem.Renk(240, 120, 255, 1);
var kırmızı = Sistem.Renk(255, 255, 0, 0);
var mavi = Sistem.Renk(255, 50, 100, 200);
var amavi = Sistem.Renk(240, 100, 255, 255);
var mkırmızı = Sistem.Renk(255, 200, 1, 1);
var myesil = Sistem.Renk(255, 1, 140, 1);
var gri = Sistem.Renk(100, 100, 100, 100);
// sembol tanımlama
var Sembol = Sistem.Sembol;
//// kullanılacak değişkenler
var sor = Sistem.Parametreler[0]; /// G
var sor2 = Sistem.Parametreler[1]; /// 1250
// Programcı Logo + Sistem İsmi
Sistem.ZeminYazisiEkle("Bear -", 1, 260, 1, mkırmızı , "Tahoma", 15);
Sistem.ZeminYazisiEkle("- Bull", 1, 310, 1, myesil , "Tahoma", 15);
Sistem.ZeminYazisiEkle("- DİP TEPE BUL - ", 1, 400, 1, amavi , "Tahoma", 15);
// Senet ismini Grafik üzerine yaz
Sistem.ZeminYazisiEkle(Sembol , 1, 150, 35, amavi , "Tahoma", 12);
//var YilBar = Sistem.GrafikVerileriniOku(Sistem.Sembol, "Y")
var dataYuksek = Sistem.GrafikFiyatOku(Sistem.Sembol, sor, "Yuksek");
var dataDusuk = Sistem.GrafikFiyatOku(Sistem.Sembol, sor, "Dusuk");
var tepe = Sistem.HHV(sor2 ,dataYuksek );
var dip = Sistem.LLV(sor2 ,dataDusuk );
var verikulllan = Sistem.GrafikVerileriniOku(Sembol, sor); /////gün/hafta/ay/yıl ___G-H-A-Y
// Sistem fonksiyonu kullanmadan yapılan hesaplamalarda liste yaratıp, döngü kullanmamız gerekiyor
var BarSayisi = verikulllan.Count; // kolaylık olsun diye grafikteki bar sayısını değişkene aktar
var Orta = Sistem.Liste(BarSayisi , 0); // boş liste oluştur
var x1 = Sistem.Liste(BarSayisi , 0);
var x2 = Sistem.Liste(BarSayisi , 0);
//var dip = Sistem.Liste(BarSayisi , 0);
//// Kullanıcı Kontrolü
for (int i = 1; i < verikulllan.Count; i++)
{
x1[i] = tepe[i]; // verikulllan[i].High; // yüksek
x2[i] = dip[i]; //verikulllan[i].Low; // düşük
Orta[i] = (tepe[i] + dip[i]) / 2;
////////////explorer
//var Periyot = Sistem.Periyot;
var veri2 = Sistem.GrafikVerileri[Sistem.BarSayisi-1].Close;
var Explorer = Sistem.Parametreler[9];
if (Explorer == "E")
{
Sistem.SorguBaslik[0] = "Bugün";
Sistem.SorguBaslik[1] = " Dip Fiyatı ";
Sistem.SorguBaslik[2] = "Orta seviye ";
Sistem.SorguBaslik[3] = "Üst seviye ";
//Sistem.SorguBaslik[7] = "Satış Hedef ";
/////////////////////////////
if (veri2 > Orta[i])
{
Sistem.SorguAciklama = sor2 + " " + sor + " " + "Orta fiyatın üstünde";
}
else
{
Sistem.SorguAciklama = sor2 + " " + sor + " " + "Orta fiyatın altında";
}
Sistem.SorguOndalik[0] = 2;
Sistem.SorguOndalik[1] = 2;
Sistem.SorguOndalik[2] = 2;
Sistem.SorguOndalik[3] = 2;
Sistem.SorguDeger[0] = veri2;
Sistem.SorguDeger[1] = x2[i];
Sistem.SorguDeger[2] = Orta[i];
Sistem.SorguDeger[3] = x1[i];
Sistem.SorguEkle();
/////////////////////
}
}
////////hesaplanan verileri çizgilere aktar ve açıklama ekle
Sistem.Cizgiler[0].Deger = Sistem.DonemCevir(Sistem.GrafikVerileri, verikulllan, x1);
Sistem.Cizgiler[0].ActiveBool = true;
Sistem.Cizgiler[1].Deger = Sistem.DonemCevir(Sistem.GrafikVerileri, verikulllan, Orta);
Sistem.Cizgiler[1].ActiveBool = true;
Sistem.Cizgiler[2].Deger = Sistem.DonemCevir(Sistem.GrafikVerileri, verikulllan, x2);
Sistem.Cizgiler[2].ActiveBool = true;
Sistem.Cizgiler[0].Aciklama = "Üst seviye ";
Sistem.Cizgiler[1].Aciklama = "Orta seviye ";
Sistem.Cizgiler[2].Aciklama = " Dip Fiyatı ";
//// Bitti
Yer İmleri