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

[Tiberius]

Saatlik
Şu iş görebilir, test etmek lazım

var V = Sistem.GrafikVerileri;
var C = Sistem.GrafikFiyatSec("Kapanis");
var TOMA = Sistem.TOMA(30, 0.5);
var EMA = Sistem.MA(C, "Exp", 30);

var SaatBaslangicList = Sistem.Liste(0);
for (int i = 1; i < Sistem.BarSayisi; i++)
    SaatBaslangicList[i] = (V[i].Date.Hour != V[i - 1].Date.Hour) ? V[i].Open : SaatBaslangicList[i - 1];


var SonYon = "";
for (int i = 1; i < Sistem.BarSayisi; i++)
{
    if (C[i] > SaatBaslangicList[i] && EMA[i] > TOMA[i] && SonYon != "A")
    {
        SonYon = "A";
        Sistem.Yon[i] = "A";
    }
    if (C[i] < SaatBaslangicList[i] && EMA[i] < TOMA[i] && SonYon != "S")
    {
        SonYon = "S";
        Sistem.Yon[i] = "S";
    }
}

Sistem.Cizgiler[0].Deger = TOMA;
Sistem.Cizgiler[1].Deger = EMA;
Sistem.Cizgiler[2].Deger = SaatBaslangicList;

Gün Açılış (test edin)

var V = Sistem.GrafikVerileri;
var C = Sistem.GrafikFiyatSec("Kapanis");
var TOMA = Sistem.TOMA(30, 0.5);
var EMA = Sistem.MA(C, "Exp", 30);

var GunBaslangicList = Sistem.Liste(0);
for (int i = 1; i < Sistem.BarSayisi; i++)
    GunBaslangicList[i] = (V[i].Date.Day != V[i - 1].Date.Day) ? V[i].Open : GunBaslangicList[i - 1];


var SonYon = "";
for (int i = 1; i < Sistem.BarSayisi; i++)
{
    if (C[i] > GunBaslangicList[i] && EMA[i] > TOMA[i] && SonYon != "A")
    {
        SonYon = "A";
        Sistem.Yon[i] = "A";
    }
    if (C[i] < GunBaslangicList[i] && EMA[i] < TOMA[i] && SonYon != "S")
    {
        SonYon = "S";
        Sistem.Yon[i] = "S";
    }
}

Sistem.Cizgiler[0].Deger = TOMA;
Sistem.Cizgiler[1].Deger = EMA;
Sistem.Cizgiler[2].Deger = GunBaslangicList;