Aranıza yeni katıldım.
İndikatör değerlerinde 1-0 kullanıyorum, benim gibi bu tarz kullananlar için faydalı olabilir diye düşündüm.
Acemice bir çalışmadır, hata varsa düzeltilirse sevinirim.
Selamlar / Sevgiler.
Kod:
//SISTEMLERINDE 1 VE 0'LI GRAFIKLERLE ÇALIŞANLAR İÇİN KALIP KOD'DUR
// DEĞİŞTİRİP KULLANILABILIR DIYE DÜŞÜNDÜM.
var Sembol = Sistem.Sembol;
var Periyot = Sistem.Periyot;
var V = Sistem.GrafikVerileri;
var Veriler = Sistem.GrafikVerileriniOku(Sembol , Periyot);
var K = Sistem.GrafikFiyatOku(Veriler, "OrtaNokta");
var C = Sistem.GrafikFiyatSec("Kapanis");
var H = Sistem.GrafikFiyatSec("Yuksek");
var L = Sistem.GrafikFiyatSec("Dusuk");
int a1 = 1; // BURAYA ISTEDIGINIZ PARAMETREYI GIREBILIRISINIZ
int a2 = 2; // YADA EKSILTIP ÇOĞALTABILIRSINIZ
int a3 = 2; // ARDIŞIK YAZMADIM, SIZ YAZABILIRSINIZ / DEĞIŞTIREBILIRINIZ
int a4 = 2;
int a5 = 2;
int a6 = 2;
int a7 = 2;
int a8 = 2;
int a9 = 2;
int a10 = 2;
var MOV=Sistem.MA(K, "Simple", a1 ); // BURADA SADECE MOV KULLANDIM, SIZ ISTEDIGINIZ
var M1=Sistem.MA(MOV,"Simple", a2); // INDIKATOR PARAMETRESINI YAZABILIRSINIZ
var M2=Sistem.MA(M1,"Simple", a3 );
var M3=Sistem.MA(M2,"Simple", a4 );
var M4=Sistem.MA(M3,"Simple", a5 );
var M5=Sistem.MA(M4,"Simple", a6 );
var M6=Sistem.MA(M5,"Simple", a7 );
var M7=Sistem.MA(M6,"Simple", a8 );
var M8=Sistem.MA(M7,"Simple", a9 );
var M9=Sistem.MA(M8,"Simple", a10 );
var p1 = Sistem.Liste(0); // KULLANILACAK LISTELER
var p2 = Sistem.Liste(0);
var p3 = Sistem.Liste(0);
var p4 = Sistem.Liste(0);
var p5 = Sistem.Liste(0);
var p6 = Sistem.Liste(0);
var p7 = Sistem.Liste(0);
var p8 = Sistem.Liste(0);
var r2 = Sistem.Liste(0);
var r3 = Sistem.Liste(0);
var r4 = Sistem.Liste(0);
var r5 = Sistem.Liste(0);
var r6 = Sistem.Liste(0);
var r7 = Sistem.Liste(0);
var r8 = Sistem.Liste(0);
var s3 = Sistem.Liste(0);
var s4 = Sistem.Liste(0);
var s5 = Sistem.Liste(0);
var s6 = Sistem.Liste(0);
var s7 = Sistem.Liste(0);
var s8 = Sistem.Liste(0);
var t4 = Sistem.Liste(0);
var t5 = Sistem.Liste(0);
var t6 = Sistem.Liste(0);
var t7 = Sistem.Liste(0);
var t8 = Sistem.Liste(0);
var u5 = Sistem.Liste(0);
var u6 = Sistem.Liste(0);
var u7 = Sistem.Liste(0);
var u8 = Sistem.Liste(0);
var x6 = Sistem.Liste(0);
var x7 = Sistem.Liste(0);
var x8 = Sistem.Liste(0);
var y7 = Sistem.Liste(0);
var y8 = Sistem.Liste(0);
// HESAPLAMALAR
for (int i = 1; i < Sistem.BarSayisi; i++)
{
p1[i] = M1[i-1] > M2[i-1] ? 1f : 0f; // YAZDIĞINIZ KODA GÖRE 1 YADA SIFIR DEĞER GETİREN SATIR
p2[i] = M1[i-1] > M3[i-1] ? 1f : 0f;
p3[i] = M1[i-1] > M4[i-1] ? 1f : 0f;
p4[i] = M1[i-1] > M5[i-1] ? 1f : 0f;
p5[i] = M1[i-1] > M6[i-1] ? 1f : 0f;
p6[i] = M1[i-1] > M7[i-1] ? 1f : 0f;
p7[i] = M1[i-1] > M8[i-1] ? 1f : 0f;
p8[i] = M1[i-1] > M9[i-1] ? 1f : 0f;
r2[i] = M2[i-1] > M3[i-1] ? 1f : 0f;
r3[i] = M2[i-1] > M4[i-1] ? 1f : 0f;
r4[i] = M2[i-1] > M5[i-1] ? 1f : 0f;
r5[i] = M2[i-1] > M6[i-1] ? 1f : 0f;
r6[i] = M2[i-1] > M7[i-1] ? 1f : 0f;
r7[i] = M2[i-1] > M8[i-1] ? 1f : 0f;
r8[i] = M2[i-1] > M9[i-1] ? 1f : 0f;
s3[i] = M3[i-1] > M4[i-1] ? 1f : 0f;
s4[i] = M3[i-1] > M5[i-1] ? 1f : 0f;
s5[i] = M3[i-1] > M6[i-1] ? 1f : 0f;
s6[i] = M3[i-1] > M7[i-1] ? 1f : 0f;
s7[i] = M3[i-1] > M8[i-1] ? 1f : 0f;
s8[i] = M3[i-1] > M9[i-1] ? 1f : 0f;
t4[i] = M4[i-1] > M5[i-1] ? 1f : 0f;
t5[i] = M4[i-1] > M6[i-1] ? 1f : 0f;
t6[i] = M4[i-1] > M7[i-1] ? 1f : 0f;
t7[i] = M4[i-1] > M8[i-1] ? 1f : 0f;
t8[i] = M4[i-1] > M9[i-1] ? 1f : 0f;
u5[i] = M5[i-1] > M6[i-1] ? 1f : 0f;
u6[i] = M5[i-1] > M7[i-1] ? 1f : 0f;
u7[i] = M5[i-1] > M8[i-1] ? 1f : 0f;
u8[i] = M5[i-1] > M9[i-1] ? 1f : 0f;
x6[i] = M6[i-1] > M7[i-1] ? 1f : 0f;
x7[i] = M6[i-1] > M8[i-1] ? 1f : 0f;
x8[i] = M6[i-1] > M9[i-1] ? 1f : 0f;
y7[i] = M7[i-1] > M8[i-1] ? 1f : 0f;
y8[i] = M7[i-1] > M9[i-1] ? 1f : 0f;
}
var SonYon = "";
var Fiyat = 0.0f;
float StopMarj = 0.100f; //BURAYA STOP SEVIYE PUANINIZI YAZIN
for (int i = 1; i < Sistem.BarSayisi; i++)
{
// PETYOT 5 DAKIKALIK OLDUGU ICIN 18:10, PERYODA GÖRE DEĞİŞTİREBİLİRSİNİZ
if (V[i].Date.Hour == 18 && V[i].Date.Minute == 10 && SonYon != "F") //SEANS KAPANINCA FLAT OL KODU,
{
SonYon = "F";
Sistem.Yon[i] = "F";
Sistem.SayiListesi[i] = 1;
}
else if (L[i] < Fiyat - StopMarj && SonYon == "A") // long iken stop
{
SonYon = "F";
Sistem.Yon[i] = "F";
Sistem.Seviye[i] = Fiyat - StopMarj;
}
else if (H[i] > Fiyat + StopMarj && SonYon == "S") // short iken stop al
{
SonYon = "F";
Sistem.Yon[i] = "F";
Sistem.Seviye[i] = Fiyat + StopMarj;
}
//STRATEJILER
else if (
p1[i] == 1f && // KOŞUL 1 İSE
p2[i] == 1f && // DEVAM EDEN SATIRLAR
p3[i] == 1f &&
p4[i] == 1f &&
p5[i] == 1f &&
p6[i] == 1f &&
p7[i] == 1f &&
p8[i] == 1f &&
r2[i] == 1f &&
r3[i] == 1f &&
r4[i] == 1f &&
r5[i] == 1f &&
r6[i] == 1f &&
r7[i] == 1f &&
r8[i] == 1f &&
s3[i] == 1f &&
s4[i] == 1f &&
s5[i] == 1f &&
s6[i] == 1f &&
s7[i] == 1f &&
s8[i] == 1f &&
t4[i] == 1f &&
t5[i] == 1f &&
t6[i] == 1f &&
t7[i] == 1f &&
t8[i] == 1f &&
u5[i] == 1f &&
u6[i] == 1f &&
u7[i] == 1f &&
u8[i] == 1f &&
x6[i] == 1f &&
x7[i] == 1f &&
x8[i] == 1f &&
y7[i] == 1f &&
y8[i] == 1f &&
SonYon != "A")
{
SonYon = "A";
Sistem.Yon[i] = "A";
Fiyat = C[i];
Sistem.Seviye[i] = C[i];
}
else if (
p1[i] == 0f && // KOŞUL 0 İSE
p2[i] == 0f && // DEVAM EDEN SATIRLAR
p3[i] == 0f &&
p4[i] == 0f &&
p5[i] == 0f &&
p6[i] == 0f &&
p7[i] == 0f &&
p8[i] == 0f &&
r2[i] == 0f &&
r3[i] == 0f &&
r4[i] == 0f &&
r5[i] == 0f &&
r6[i] == 0f &&
r7[i] == 0f &&
r8[i] == 0f &&
s3[i] == 0f &&
s4[i] == 0f &&
s5[i] == 0f &&
s6[i] == 0f &&
s7[i] == 0f &&
s8[i] == 0f &&
t4[i] == 0f &&
t5[i] == 0f &&
t6[i] == 0f &&
t7[i] == 0f &&
t8[i] == 0f &&
u5[i] == 0f &&
u6[i] == 0f &&
u7[i] == 0f &&
u8[i] == 0f &&
x6[i] == 0f &&
x7[i] == 0f &&
x8[i] == 0f &&
y7[i] == 0f &&
y8[i] == 0f &&
SonYon != "S")
{
SonYon = "S";
Sistem.Yon[i] = "S";
Fiyat = C[i];
Sistem.Seviye[i] = C[i];
}
}
Sistem.Cizgiler[0].Deger = M1;
Sistem.Cizgiler[1].Deger = M2;
Sistem.Cizgiler[2].Deger = M3;
Sistem.Cizgiler[3].Deger = M4;
Sistem.Cizgiler[4].Deger = M5;
Sistem.Cizgiler[5].Deger = M6;
Sistem.Cizgiler[6].Deger = M7;
Sistem.Cizgiler[7].Deger = M8;
Sistem.Cizgiler[8].Deger = M9;
//Sistem.Cizgiler[9].Deger = p1; // BURALARI ALT ALTA GETİRİNCE EKRAN KUCULUYORDU, HAKÎ YAPTIM
//Sistem.Cizgiler[10].Deger = p2;
//Sistem.Cizgiler[11].Deger = p3;
//Sistem.Cizgiler[12].Deger = p4;
//Sistem.Cizgiler[13].Deger = p5;
//Sistem.Cizgiler[14].Deger = p6;
//Sistem.Cizgiler[15].Deger = p7;
//Sistem.GetiriHesapla("01/01/2017", 0.020);
//Sistem.Cizgiler[16].Deger = Sistem.GetiriKZ;
// ACEMICE BIR ÇALIŞMADIR, HATA YAPMIŞ OLABILIRIM, DÜZELTİLİRSE SEVINIRIM.
// SELAMLAR SEVGILER
Yer İmleri