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

Alıntı:

---

Originally Posted by hasan tahsin

Gözlerim açıldı. Kafam patlamıştı. Cin gibi oldum.
Evettttttttttttttttttt. Süpersin

---

bire bir aynısı olmamış olabilir ama istediğine yakın sonuc veren bir çizgi gibi görünüyor.

Burada mesele toma ile yapmış olmak değil. Tomanın ne işe yaptığını bilip başka bir araç olarak aracı olarak kullanmak.

Alıntı:

---

Originally Posted by erhanacikgoz1

Kod:

---



var V = Sistem.GrafikVerileri ;


// hesapla
var Veriler = Sistem.GrafikFiyatSec("Kapanis");
var H = Sistem.HHV(30);// 30 barlık yüksek hesaplanır
var P = Sistem.TOMA(H,1, 0.5);// 30 barlık yükseğin içine 1 lik ma atılır bu 30 barlık yükseğin %0,5 altına çizgi çekilir.



var x1 = Sistem.Liste(V.Count, 0);//x1 boş listesi oluşturulur

for (int i = 1; i < V.Count; i++) //döngü
x1[i] =

Veriler[i] > P[i] ? 1 : //fiyatlar P den yani 30 barlık yükseğin %0,5 altındakı çizgiden büyükse x1 i 1 yapar
Veriler[i] < P[i] ? -1 :// Tam tersi x1 -1 atar

 x1[i-1] ;





// sistem
var SonYon = "";
 
for (int i = 1; i<V.Count; i++)
{


  if ( x1[i] == 1 && SonYon != "A"  ) // AL
  {
      Sistem.Yon[i] = "A"; 
      SonYon = Sistem.Yon[i];
     
  }



  else if (  x1[i] == -1 && SonYon != "S"  ) // SAT
  {
      Sistem.Yon[i] = "S"; 
      SonYon = Sistem.Yon[i];
     
  }



else if (  x1[i] == 0  &&  (SonYon == "A" || SonYon == "S")  ) // FLAT
  {
      Sistem.Yon[i] = "F"; 
      SonYon = Sistem.Yon[i];
     
  }

 
}

Sistem.GetiriHesapla("31/12/2004", 0.0 );
var KarZarar = Sistem.GetiriKZ;


Sistem.Cizgiler[0].Deger = P;
Sistem.Cizgiler[1].Deger = H;
Sistem.Cizgiler[2].Deger = KarZarar;

---

---

Çok teşekkür ederim emeğinize sağlık elleriniz dert görmesin.

Erhan usta

izleyen stoplu bir sistem.
Bunun neresine misalen mov10>mov5 yazmam gerekli. yapıyorum yapıyorum olmuyor.
aşağıdaki kısmı monte edemedim.
-------------------------
else if (MA2 [i] > MA1 [i] && SonYon != "F")
{
SonYon = "F";
Sistem.Yon[i] = "F";
Fiyat = L [i];
Sistem.Seviye[i] = L[i] ;
-------------------------

if ( SonYon =="A")
{
//Kapanış stop üstü ve yeni yüksek görülmediyse
if (C[i]>=IzleyenStop[i-1]&& H[i]<=H[i-1])
{
IzleyenStop[i] = SonStop; //Stop seviyesi değişmez
continue;
}
else if (C[i] >= IzleyenStop[i - 1] && H[i] > H[i - 1]) //Yeni yüksek
{
SonStop = L[i] - StopPuan; //Stop güncellenir
IzleyenStop[i] = SonStop;
continue;
}


else if (C[i] < IzleyenStop[i - 1]) //Stop altında kapatırsa
{
Sistem.Yon[i] = "F"; // yön flate döner
SonYon = "F";
IzleyenStop[i] = IzleyenStop[i - 1]; //Burayı sadece sonstop seviyelerini grafikte görebilmeniz için yazdım
}
}
}
Sistem.Cizgiler[0].Deger = IzleyenStop;


Saygılar sağlıcakla

BU şablonu kullan

Kod:

---

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

//indikatorlerını tanımla
var X1 = Sistem.MA(10, "Exp", "Kapanis");
var X2 = Sistem.MA(150, "Exp", "Kapanis");
//boş liste
var IZLEYENSTOP = Sistem.Liste(0);
var KARAL = Sistem.Liste(0);


var SonYon = "";
var FlatOncesiYon = "";
for (int i = 1 ; i < Sistem.BarSayisi; i++)
{
// indikatorlerın kesişim stratejisi
  var IndikatorAlis = X1[i] > X2[i];
  var IndikatorSatis = X1[i] < X2[i];

  IZLEYENSTOP[i] = Sistem.IzleyenStopYuzde(1, i); // %1 stop
  if (IZLEYENSTOP[i] == 0) IZLEYENSTOP[i] = C[i];

  KARAL[i] = Sistem.KarAlYuzde(5.5, i);//%5,5 e kar al
  if (KARAL[i] == 0) KARAL[i] = C[i];

  if ((C[i] < IZLEYENSTOP[i] || C[i] >= KARAL[i]) && SonYon == "A")  // alıştan flate
  {
      FlatOncesiYon = SonYon;
      SonYon = "F";
      Sistem.Yon[i] = "F";
  }
  else if ((C[i] > IZLEYENSTOP[i]  || C[i] <= KARAL[i]) && SonYon == "S")  // satıştan flate
  {
      FlatOncesiYon = SonYon;
      SonYon = "F";
      Sistem.Yon[i] = "F";
  }
  else if (IndikatorAlis && SonYon != "A" && FlatOncesiYon != "A") // alış
  {
        FlatOncesiYon = "";
        SonYon = "A";
        Sistem.Yon[i] = "A";
  }   
  else if (IndikatorSatis && SonYon != "S" && FlatOncesiYon != "S") // satış
  {
      FlatOncesiYon = "";
      SonYon = "S";
      Sistem.Yon[i] = "S";
  }
}

Sistem.Cizgiler[0].Deger = X1;
Sistem.Cizgiler[1].Deger = X2;
Sistem.Cizgiler[2].Deger = IZLEYENSTOP;
Sistem.Cizgiler[4].Deger = KARAL;

---

Alıntı:

---

Originally Posted by erhanacikgoz1

bire bir aynısı olmamış olabilir ama istediğine yakın sonuc veren bir çizgi gibi görünüyor.

Burada mesele toma ile yapmış olmak değil. Tomanın ne işe yaptığını bilip başka bir araç olarak aracı olarak kullanmak.

---

Anladım teşekkürler.

Belki faydası olur.
Her zaman başka hisselerde ilave robot çalıştırmak lazım.
Yada bir robotu akşam takasa bakarak bir sonraki gün çalıştırmak robotçu arkadaşlara %10 kazandırabilir.
Daha kolay anlaşılsın diye,
Misal kuyas 29/30 takasında bakın. Odas. Asuzu. Oyuncuyu görürseniz çalıştırın.
Yalnız tahta doğru takip edilmezse (aynı gün virman olayı var). Robotunuz zarar yazar. Portföy ufaksa buyukmek çok hızlı olabilir.
En azından manuel takip edin. Faydası olur. Çünki takasda kendini gösteren sizin görmenizi sağlamak için o hareketi yapıyor))
Buda kendimce bu foruma katkım olsun.


Deli saçmalıkları ))işte kolay gelsin
Sağlıcakla

https://hizliresim.com/QP4kXV
https://hizliresim.com/3O1XDM

Hasan hocam yas kac sakincasi yok merak ettim.

Alıntı:

---

Originally Posted by erhanacikgoz1

Hasan hocam yas kac sakincasi yok merak ettim.

---

yOK Üstadım ne hocası.
Sorgulamaya yeni başladım sadece))
73 lüyüm. Artık direk yaş söylemiyorum))

https://hizliresim.com/jqLYX9

üstadım bendeki durum bu neden böyle oldu