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

[3c1a]

merhaba,

aşağıdaki sistem hata veriyor ve çalışmıyor, sizce nerde hata yapıyorum ? Yapmaya çalıştığım saatlik periyortta , örnek veriyorum 60 bar öncesine göre C > ref ( C,-60 ) ise Long aksi durumda Flat.
// BULUT // verileri oku

var Sembol = "IMKBH'THYAO";
var Sembol1 = "VIP'F_THYAO0820";
var Periyot = "60";
var Bar = Sistem.GrafikVerileriniOku(Sembol, Periyot);
var SonFiyat = Sistem.SonFiyat(Sembol);
var C = Sistem.GrafikFiyatSec("Kapanis");
var son = Sistem.BarSayisi-1 ;
var SonBarNo = Bar.Count - 1; // pozisyon tablosundan pozisyon miktarını al
var Pozisyon = Sistem.PozisyonKontrolOku(Sistem.Name + " , " +Sembol); // yön bul
var Islem = "";
var Miktar = 0;

if ( (Pozisyon == 0) && (Bar[SonBarNo].Close) > Bar[SonBarNo-60].Close ))
{ Islem = "ALIS"; Miktar = 2; }

else if ( (Pozisyon > 0) && (Bar[SonBarNo].Close) < Bar[SonBarNo-60].Close ))

{ Islem = "SATIS"; Miktar = 2; }

// emri gönder
if (Islem != "")
{ if (Islem == "ALIS")
Sistem.PozisyonKontrolGuncelle(Sistem.Name + " , " +Sembol, Pozisyon+Miktar);
else if (Islem == "SATIS")
Sistem.PozisyonKontrolGuncelle(Sistem.Name + " , " +Sembol, Pozisyon-Miktar);


Sistem.EmirStop = Sistem.SonFiyat("IMKBH'THYAO");

if (Islem != "")

Sistem.EmirSembol = Sembol1;
Sistem.EmirIslem = Islem;
Sistem.EmirMiktari = Miktar;
Sistem.EmirSuresi = "GUN"; // GUN, SNS, IKG
Sistem.EmirTipi = "KPY"; // KPY, KIE, GIE, SAR
Sistem.EmirFiyatTipi = "PYS"; // PYS, LMT, EIF, KAP
Sistem.EmirGonder();
}

"Bar[SonBarNo].Close)"

if ve else if 'in herikisinde gecen yukardaki fazlalilik parantez kapanisi nedeniyle hata aliyor olmalisiniz.

Paylastiginiz robot olarak calistirilabilecek bir kod. Sistem olarak grafige yuklerseniz birsey gorulmez. Gecmis verilerle test edebilmek ve stratejinin guclu/zayif noktalarini gorebilmek adina sistem versiyonunu olusturmanizi oneririm.

[siradanhisseler]

İdeal için olan eski yazılara ulaşmak istedim ama eski forum verilerine ulaşılamıyor.

[alkanfatih]

Merhaba Arkadaşlar ;
Yapmak isteyip yapamadığım bir robot var. Bana bu konuda yardımcı olacak biri olursa çok sevinirim. Yapmak istediğim robot şu şekilde.

Arçelik grafiğinde 5 dk periyotta stochastikslow(5,3) , (ma)ortalaması 3 olan indikatöre bak
Ortalaması , stochastikslow(5,3) dan küçükse flat
Ortalaması , stochastikslow(5,3) dan büyükse 1 dk lık grafiğe git
1 dk lık grafikte (ma=3) > stochastikslow(5,3) ve most(2; 0,6) büyükse AL
Küçükse sat….

YANİ
5 DK grafikte stochastik negatifse flat
5 DK grafikte stochastik pozitifse 1 dk grafiğe geç
Aynı işlemleri most ile beraber yap
Most ve stochastik pozitifse al
Negatifse flat

[atakanözbaki]

Aşağıdaki sistem sayın Tiberius tarafından twittırda paylaşılmıştı. Bu sistemin içindeki yön kalıbını bir arkadaş açıklamasını yazabilirmi. Farklı bir yön kalıbı var.

 var V = Sistem.GrafikVerileri;
            var C = Sistem.GrafikFiyatOku(V, "Kapanis");

            var RSI = Sistem.RSI(200);
            var HHV = Sistem.HHV(12);
            var LLV = Sistem.HHV(12);
            var MOM = Sistem.Momentum(200);

            // strateji
            var SonYon = "";
            var Sinyal = "";
            var TradeCount = 0;
            double SonFiyat = 0.0;
            int BarNo = 0;

            for (int i = 1; i < V.Count; i++)
            {



                Sinyal = "";


                // strateji
            
                if (HHV[i] > HHV[i - 1] && MOM [i] > 100) Sinyal = "A";
                if (LLV[i] > LLV[i - 1] && MOM [i] < 100) Sinyal = "S";



                // Yön Kalıbı
                if (Sinyal == "A" && SonYon != "A")
                {
                    if (SonYon == "F") TradeCount = TradeCount + 1;
                    if (SonYon == "S") TradeCount = TradeCount + 2;
                    BarNo = i;
                    Sistem.Yon[i] = "A";
                    SonYon = Sistem.Yon[i];
                    SonFiyat = V[i].Close;
                }
                if (Sinyal == "S" && SonYon != "S")
                {
                    if (SonYon == "F") TradeCount = TradeCount + 1;
                    if (SonYon == "A") TradeCount = TradeCount + 2;
                    BarNo = i;
                    Sistem.Yon[i] = "S";
                    SonYon = Sistem.Yon[i];
                    SonFiyat = V[i].Close;
                }
                if (Sinyal == "F" && SonYon != "F")
                {
                    if (SonYon == "S") TradeCount = TradeCount + 1;
                    if (SonYon == "A") TradeCount = TradeCount + 1;
                    BarNo = i;
                    Sistem.Yon[i] = "F";
                    SonYon = Sistem.Yon[i];
                    SonFiyat = V[i].Close;
                }
            }


            Sistem.GetiriHesapla("01/01/2000", 0.0);
            //Sistem.Cizgiler[0].Deger = MA;
            //Sistem.Cizgiler[1].Deger = TOMA;
            Sistem.Cizgiler[2].Deger = Sistem.GetiriKZ;

[sonli]

Aşağıdaki sistem sayın Tiberius tarafından twittırda paylaşılmıştı. Bu sistemin içindeki yön kalıbını bir arkadaş açıklamasını yazabilirmi. Farklı bir yön kalıbı var.

 var V = Sistem.GrafikVerileri;
            var C = Sistem.GrafikFiyatOku(V, "Kapanis");

            var RSI = Sistem.RSI(200);
            var HHV = Sistem.HHV(12);
            var LLV = Sistem.HHV(12);
            var MOM = Sistem.Momentum(200);

            // strateji
            var SonYon = "";
            var Sinyal = "";
            var TradeCount = 0;
            double SonFiyat = 0.0;
            int BarNo = 0;

            for (int i = 1; i < V.Count; i++)
            {



                Sinyal = "";


                // strateji
            
                if (HHV[i] > HHV[i - 1] && MOM [i] > 100) Sinyal = "A";
                if (LLV[i] > LLV[i - 1] && MOM [i] < 100) Sinyal = "S";



                // Yön Kalıbı
                if (Sinyal == "A" && SonYon != "A")
                {
                    if (SonYon == "F") TradeCount = TradeCount + 1;
                    if (SonYon == "S") TradeCount = TradeCount + 2;
                    BarNo = i;
                    Sistem.Yon[i] = "A";
                    SonYon = Sistem.Yon[i];
                    SonFiyat = V[i].Close;
                }
                if (Sinyal == "S" && SonYon != "S")
                {
                    if (SonYon == "F") TradeCount = TradeCount + 1;
                    if (SonYon == "A") TradeCount = TradeCount + 2;
                    BarNo = i;
                    Sistem.Yon[i] = "S";
                    SonYon = Sistem.Yon[i];
                    SonFiyat = V[i].Close;
                }
                if (Sinyal == "F" && SonYon != "F")
                {
                    if (SonYon == "S") TradeCount = TradeCount + 1;
                    if (SonYon == "A") TradeCount = TradeCount + 1;
                    BarNo = i;
                    Sistem.Yon[i] = "F";
                    SonYon = Sistem.Yon[i];
                    SonFiyat = V[i].Close;
                }
            }


            Sistem.GetiriHesapla("01/01/2000", 0.0);
            //Sistem.Cizgiler[0].Deger = MA;
            //Sistem.Cizgiler[1].Deger = TOMA;
            Sistem.Cizgiler[2].Deger = Sistem.GetiriKZ;

Sistem kendisi hatalı duruyor, bunu bir şeye cevap için yazmıştır muhtemelen.. Alt bölümü açıklayayım gerisi aynı mantık:

alım sinyali gelmişse ve alımda değilse; sistemin sinyal öncesi yönüne göre TradeCount değişkeni artacak.. Flat ten alıma geçiyorsa 1, Sat tan geçiyorsa 2 ilave olacak..
Örneğin amacı, yön değişimi esnasında önceki yöne göre değişken ayarlama gibi duruyor..

if (Sinyal == "A" && SonYon != "A")
{
if (SonYon == "F") TradeCount = TradeCount + 1;
if (SonYon == "S") TradeCount = TradeCount + 2;
BarNo = i;
Sistem.Yon[i] = "A";
SonYon = Sistem.Yon[i];
SonFiyat = V[i].Close;
}

[berlys]

bir indikatör yazmaya çalışıyorum kodun neresinde hata yapıyorum
var V = Sistem.GrafikVerileri;
var C = Sistem.GrafikFiyatOku(V, "Kapanis") ;
var H = Sistem.GrafikFiyatOku(V, "Yuksek") ;
var L = Sistem.GrafikFiyatOku(V, "Dusuk") ;
var filt = Sistem.Liste(V .Count,0);
var WW = Sistem.Liste(V.Count,0);
var mov =Sistem.MA(4, "Simple", "Kapanis");
var MAyontem=Sistem.MA(4, "Simple", "Kapanis");

var ttı =Sistem.TTI(6, 1.5, MAyontem);


for (int i = 10 ; i < V.Count; i++)
{
filt[i] =mov[i](ttı[i]((H[i] + L[i]) +2*L[i])/4,6,1.5),7,WW[i];

}
Sistem.Cizgiler[0].Deger = filt ;

[krasniy]

merhaba arkadaslar
forma baktim ancak engulf bulup ideal penceresinde gosterecek bir formule ulasamadim
bralarin engulf oldugunu tespit edip barin ustune isaret koydurabiliyormuyuz yardiminiza simdiden tesekkur edrim

birde arkadaslar lutfen market profile yada volume profile ynasil yazilir idealde biraz yardim 'le basarabiliriz sanirim isterseniz mql5 acik kod paylasabilirim

[orcngls]

arkadaslar merhaba. Bu matriks taramasını ideal sorgu sekline cevirir misiniz.


Tillson Ⴑ (Ters J) taraması:


K1:=TILL(C,3,0.5);
sum(roc(k1,1,%)<0,4)=-3 and roc(k1,1,%)>0