İDEAL veri terminalinde /Sistem/İndikatör/Robot

[Tiberius]

mavilim ve T3 kodlarıyla bir algo oluşturmak istiyorum,
fiyat mavilimin üstünde olsun,
fiyat t3'i yukarı kırınca al,buraya kadar tamam ama şu kısım nasıl yapılabilinir? t3'ün yönü aşağı dönünce sat .


var close = Sistem.GrafikFiyatSec("Kapanis");
var M1 = Sistem.MA(close, "Weighted", 3);
var M2 = Sistem.MA(M1, "Weighted", 5);
var M3 = Sistem.MA(M2, "Weighted", 8);
var M4 = Sistem.MA(M3, "Weighted", 13);
var M5 = Sistem.MA(M4, "Weighted", 21);
var MAVW = Sistem.MA(M5, "Weighted", 34);

Sistem.Cizgiler[34].Deger = MAVW;

var period = 5;
float a = 0.70f;

var C = Sistem.GrafikFiyatSec("Kapanis");
var H = Sistem.GrafikFiyatSec("Yuksek");
var L = Sistem.GrafikFiyatSec("Dusuk");

var x = Sistem.Liste(0);
for (int i=1; i < Sistem.BarSayisi; i++)
x[i] = (H[i]+L[i]+2*C[i])/4;

var e1 = Sistem.MA(x, "variable", period);
var e2 = Sistem.MA(e1, "variable", period);
var e3 = Sistem.MA(e2, "variable", period);
var e4 = Sistem.MA(e3, "variable", period);
var e5 = Sistem.MA(e4, "variable", period);
var e6 = Sistem.MA(e5, "variable", period);

var c1 = -a * a * a;
var c2 = 3 * a * a + 3 * a * a * a;
var c3 = -6 * a * a - 3 * a -3 * a * a * a;
var c4 = 1 + 3 * a + a * a * a + 3 * a * a;

var T3 = Sistem.Liste(Sistem.BarSayisi, 0);
for (int i = 1; i<Sistem.BarSayisi; i++)
T3[i] = c1 * e6[i] + c2 * e5[i] +c3 * e4[i] + c4 * e3[i];

Sistem.Cizgiler[0].Deger = T3;
Sistem.Cizgiler[0].Aciklama = "T3";

[Tiberius]

var V = Sistem.GrafikVerileri;
var C = Sistem.GrafikFiyatSec("Kapanis");
var Yon = Sistem.Yon;

var MAVW = Sistem.MAM(C, "Weighted", 3, 5, 8, 12, 21, 34);
var T3 = Sistem.TillsonT3(5, 0.7);

// strateji
var SonYon = "";
var Sinyal = "";

for (int i = 10; i < V.Count; i++)
{
    Sinyal = "";

    if (C[i - 1] < MAVW[i] && C[i] >= MAVW[i]) Sinyal = "A";
    else if (C[i - 1] > MAVW[i] && C[i] <= MAVW[i]) Sinyal = "S";

    else if (SonYon == "A" && T3[i] <= T3[i - 1] && T3[i - 1] > T3[i - 2]) Sinyal = "F";
    else if (SonYon == "S" && T3[i] >= T3[i - 1] && T3[i - 1] < T3[i - 2]) Sinyal = "F";

    // Yön Kalıbı
    if (Sinyal == "A" && SonYon != "A")
    {
        Yon[i] = "A";
        SonYon = Yon[i];
    }
    if (Sinyal == "S" && SonYon != "S")
    {
        Yon[i] = "S";
        SonYon = Yon[i];
    }
    if (Sinyal == "F" && SonYon != "F")
    {
        Yon[i] = "F";
        SonYon = Yon[i];
    }
}



Sistem.GetiriHesapla("01/01/2000", 0.0);

Sistem.Cizgiler[0].Deger = MAVW;
Sistem.Cizgiler[1].Deger = T3;
Sistem.Cizgiler[1].Deger = Sistem.GetiriKZ;

[karazepin]

var V = Sistem.GrafikVerileri;
var C = Sistem.GrafikFiyatSec("Kapanis");
var Yon = Sistem.Yon;

var MAVW = Sistem.MAM(C, "Weighted", 3, 5, 8, 12, 21, 34);
var T3 = Sistem.TillsonT3(5, 0.7);

// strateji
var SonYon = "";
var Sinyal = "";

for (int i = 10; i < V.Count; i++)
{
    Sinyal = "";

    if (C[i - 1] < MAVW[i] && C[i] >= MAVW[i]) Sinyal = "A";
    else if (C[i - 1] > MAVW[i] && C[i] <= MAVW[i]) Sinyal = "S";

    else if (SonYon == "A" && T3[i] <= T3[i - 1] && T3[i - 1] > T3[i - 2]) Sinyal = "F";
    else if (SonYon == "S" && T3[i] >= T3[i - 1] && T3[i - 1] < T3[i - 2]) Sinyal = "F";

    // Yön Kalıbı
    if (Sinyal == "A" && SonYon != "A")
    {
        Yon[i] = "A";
        SonYon = Yon[i];
    }
    if (Sinyal == "S" && SonYon != "S")
    {
        Yon[i] = "S";
        SonYon = Yon[i];
    }
    if (Sinyal == "F" && SonYon != "F")
    {
        Yon[i] = "F";
        SonYon = Yon[i];
    }
}



Sistem.GetiriHesapla("01/01/2000", 0.0);

Sistem.Cizgiler[0].Deger = MAVW;
Sistem.Cizgiler[1].Deger = T3;
Sistem.Cizgiler[1].Deger = Sistem.GetiriKZ;

çok teşekkür ederim sayın Tiberius,elinize sağlık.