Yeni İndikatörler

[Orhan AKDOĞAN]

eyw sağol.

peki bu yapıyı kullanan arkadaşlar var ise. acaba sonuçların arasındaki farkları paylaşabilir mi ?

mesela xu030 da 40 k aldı ama vadelide 30 aldı veya 50 aldı gibi.

gerçeğe yansımaları ne şekilde oluyor acaba. aralarında az fark varmı oluyor yoksa yüksekmi.

Başkasından alınan geri dönüşler bence anlamsız.
Her sistemin yapısı farklı ve bu farklı yapıya göre olumlu yada olumsuz etkileyebilir.
Doğru cevabı iyi işleyen bir sistemden almak daha doğru olabilir.
Zigzagla Potansiyel Testi gibi.
Aşağıdaki örneklerde eylülden itibaren vip30 da %179 alan sistem spotun kendisinde %165 alıyormuş. Fakat spota bakıp vip30 da işlem yapar hali ise %163 almış. yani her ikisinden de kötü.Bu testin sonucuna göre spota bakarak işlem yapmak kötü.


Sistem

var C = Sistem.GrafikFiyatSec("Kapanis");
var Z = Sistem.ZigZagPercent(C, 1);
var x = Sistem.Liste(0);


for (int i=2; i < Sistem.BarSayisi; i++)
{
   if ((Z[i] > Z[i-1] && Z[i-1] < Z[i-2] ) || ( Z[i] < Z[i-1] && Z[i-1] > Z[i-2]))
      x[i] = Z[i-1];
   else
      x[i] = x[i-1];
}


var SonYon = "";
for (int i=2; i < Sistem.BarSayisi; i++)
{
   if (SonYon != "A" && C[i] > x[i])
   {
      Sistem.Yon[i] = "A";
      SonYon = "A";
   }
   else if (SonYon != "S" && C[i] < x[i])
   {
      Sistem.Yon[i] = "S";
      SonYon = "S";
   }
} 

https://prnt.sc/lmt6a5


Aynısının Spota Göre işlem yapanı

// ilk sembole göre siyalleri oluştur
var Sistem1 = Sistem.SistemGetir("SampleZigZag", "IMKBX'XU030", Sistem.Periyot);
var V1 = Sistem1.GrafikVerileri;
var YON1 = Sistem1.Yon;
var V2 = Sistem.GrafikVerileri;
// sinyalleri asıl sembole aktar, tarihleri örtüştür
var SonYonNo = 0;
for (int i = 0; i < V1.Count; i++)
{
if (YON1[i] != "")
{
for (int j = SonYonNo; j < V2.Count; j++)
{
if (V2[j].Date >= V1[i].Date)
{
Sistem.Yon[j] = YON1[i];
SonYonNo = j;
break;
}
}
}
} 

https://prnt.sc/lmt6i7


Buda X030 da al-sat olsaydı kapasite:

https://prnt.sc/lmt62o

[EMLAK]

üstat bende denemeler yaptım ma ile özelikle. benim denemelerimde 1 dakikalık grafiklerde fark çok daha fazla artıyor. periyot yükseldikçe değerlerde birbine yaklaşıyor. 15 dklıklarda özelikle yapı sağlıklı olabiliyor.

diğer bu yapıyı deneyen arkadaşlardan geri dönüş alma nedenimde bu. yani sadece bende mi oluyor gibisinden.

paylaşımlar çok çok teşekkürler. xu30 da gürültü veya yataydaki saçma sinyaller çok daha az bunedenle kullanmak saha sağlıklı olabilir düşüncesindeyim.

[B_E]

lib.cs ye ekledim şimdi, fakat hiç kullanılmamış ve test edilmemiş bir metod, sanalda denemeden kullanmayın.

//Format
Lib.RobotViopAktifSeviye(Sistem, SistemAdi, BazSembol, EmirSembol, Periyot, Miktar);


//Örnek Kullanım
Lib.RobotViopAktifSeviye(Sistem,"A1", "VIP'VIP-X030" ,Sistem.AktifViopKontrat,"1",1);

orhan hocam emeğinize sağlık,
çok teşekkür ederim...

sanalda test edeceğim...

[Orhan AKDOĞAN]

Originally Posted by serseri26
Orhan Hocam hayırlı olsun.

Trendler ile ilgili örneklerde olursa çok daha iyi olacağını düşünüyorum.Emeğinize sağlık.
neredeyse tüm indikatörler trende çalışıyor, nedir tam olarak istediğiniz?


orhan bey otomatik trendline çizim konusunda mesela 10 adet düşen trend , 10 adet yükselen trendline çizebilen daha anlamlı trendline çizebilen , çizdiği outo trendline anlamsız olunca o trendline silebilen gibi

twitter de söyle bir video paylaşılmış

https://twitter.com/TrStockMK/status...21121941987328

ideal de trend çizen kod var zaten. 10 tanede çizilebilir.
idealde yeniden oynatma yok, silme var. video da ve ideal de barlar ilerledikçe kendisi yeniden çiziyor zaten.
Bu video neden trend çizgileri ile işlem yapıl-ma-ma-lı nın cevabı olarak yüklenmiş sanırım.Fakat nedense seyredenler iyi bir şey olduğuna dair yorumlar yapmışlar.illede karar değiştiren yapılarla uğraşmak gerekirse zigzag trendline'ı pataklar
özetle hem faydasız bir konu olduğunu düşünüyorum hemde "yeni indikatör" konusu değil bu

[alekss]

ideal de trend çizen kod var zaten. 10 tanede çizilebilir.
idealde yeniden oynatma yok, silme var. video da ve ideal de barlar ilerledikçe kendisi yeniden çiziyor zaten.
Bu video neden trend çizgileri ile işlem yapıl-ma-ma-lı nın cevabı olarak yüklenmiş sanırım.Fakat nedense seyredenler iyi bir şey olduğuna dair yorumlar yapmışlar.illede karar değiştiren yapılarla uğraşmak gerekirse zigzag trendline'ı pataklar
özetle hem faydasız bir konu olduğunu düşünüyorum hemde "yeni indikatör" konusu değil bu

peki orhan bey
aşağıda düşen ve yükselen trend çizgilerini çizdiğim fonksiyonlar

sada anlamlı trend çizgileri çizdirebilmek adına tecrübelerinize dayanarak soruyorum
parametreler i nasıl yazayım parametre tavsiyeniz olurmu acaba

var d= Sistem.OtoTrendDusen(55, 1);
var d1= Sistem.OtoTrendDusen(89, 1);
var d2= Sistem.OtoTrendDusen(144, 1);
var d3= Sistem.OtoTrendDusen(255, 1);
var d4= Sistem.OtoTrendDusen(400, 1);

var y =Sistem.OtoTrendYukselen(55, 1);
var y1 =Sistem.OtoTrendYukselen(89, 1);
var y2 =Sistem.OtoTrendYukselen(144, 1);
var y3 =Sistem.OtoTrendYukselen(255, 1);
var y4 =Sistem.OtoTrendYukselen(400, 1);

[Orhan AKDOĞAN]

peki orhan bey
aşağıda düşen ve yükselen trend çizgilerini çizdiğim fonksiyonlar

sada anlamlı trend çizgileri çizdirebilmek adına tecrübelerinize dayanarak soruyorum
parametreler i nasıl yazayım parametre tavsiyeniz olur mu acaba

bu konuda önerim yok.

[Orhan AKDOĞAN]

Gaussian Filter

//Ayarlar
int Poles= 4;    //1-2-3-4
int Period= 20;

//Veriler
var V = Sistem.GrafikVerileri; 
var C = Sistem.GrafikFiyatSec("Kapanis");
var H = Sistem.GrafikFiyatSec("YUksek");
var L = Sistem.GrafikFiyatSec("Dusuk");
var O = Sistem.GrafikFiyatSec("Açılış");

double _w;
double _aa, _a2, _a3, _a4, _c1, _c2, _c3, _c4;
double _b;
double r=0, y=0;

const double Pi = 22 / 7;
double Sqrt2 = Math.Sqrt(2.0);

_w = 2 * Pi / Period;
_b = (1 - Math.Cos(_w)) / (Math.Pow(Sqrt2, 2.0 / Poles) - 1);
if (Period == 1) _aa = 1.0;
else _aa = -_b + Math.Sqrt(_b * (_b + 2));
_c1 = 1.0 - _aa;
_c2 = _c1 * _c1;
_c3 = _c2 * _c1;
_c4 = _c3 * _c1;
_a2 = _aa * _aa;
_a3 = _a2 * _aa;
_a4 = _a3 * _aa; 

var GaussianFilter = Sistem.Liste(0);
for (int i = Poles; i < C.Count; i++)
{ 
    switch (Poles)
    {
        case 1:
            r = _c1 * GaussianFilter[i-1];
            break;
        case 2:
            r = 2 *_c1*GaussianFilter[i-1] - _c2*GaussianFilter[i-2];
            break;
        case 3:
            r = 3*_c1*GaussianFilter[i-1] - 3*_c2*GaussianFilter[i-2] + _c3*GaussianFilter[i-3];
            break;
        case 4:
            r = 4*_c1*GaussianFilter[i-1] - 6*_c2*GaussianFilter[i-2] + 4*_c3*GaussianFilter[i-3] - _c4*GaussianFilter[i-4];
            break;
        default:
            break;
    }
                
   switch (Poles)
    {
        case 1:
            y = _aa * C[i];
            break;
        case 2:
            y = _a2 * C[i];
            break;
        case 3:
            y = _a3 * C[i];
            break;
        case 4:
            y = _a4 * C[i];
            break;
        default:
            break;
    }
    GaussianFilter[i] = (float)(y + r);                
}


Sistem.Cizgiler[0].Deger  = GaussianFilter; 

https://prnt.sc/lmz0b3

[Orhan AKDOĞAN]

MyRSI, John Ehlers.

//Ayarlar
int SmoothLength = 1;
int RSILength = 10;

//Veriler
var V = Sistem.GrafikVerileri; 
var C = Sistem.GrafikFiyatSec("Kapanis");
var H = Sistem.GrafikFiyatSec("YUksek");
var L = Sistem.GrafikFiyatSec("Dusuk");
var O = Sistem.GrafikFiyatSec("Açılış");

var MyRSI = Sistem.Liste(0); 

double a1, b1, c1, c2, c3, CU, CD;
var Filt= Sistem.Liste(0); 

a1 = Math.Exp(-1.414*3.14159 / (double)(SmoothLength));
b1 = 2*a1*Math.Cos((1.414*180 / (double)(SmoothLength))*3.14159/180);
c2 = b1;
c3 = -a1*a1;
c1 = 1 - c2 - c3;

for (int i = RSILength; i < C.Count; i++) 
{ 
   Filt[i] = (float) (c1*( C[i] + C[i-1]  ) / 2 + c2*Filt[i-1] + c3*Filt[i-2]); 
   CU = 0;
   CD = 0;
            
   for (int j = 1; j < RSILength; j++)
   {
      if(Filt[i-j] - Filt[i-j - 1] > 0) CU = CU + Filt[i-j] - Filt[i-j - 1];
      if(Filt[i-j] - Filt[i-j - 1] < 0) CD = CD + Filt[i-j - 1] - Filt[i-j];
   }
            
  for (int j = RSILength; j > 0; j--) Filt[j] = Filt[j-1];
  if(CU + CD != 0) MyRSI[i] = (float) ((CU - CD) / (CU + CD));    
}

Sistem.Cizgiler[0].Deger  = MyRSI; 

https://prnt.sc/lmz3w7