Yeni İndikatörler

[Orhan AKDOĞAN]

Super BandPass Filter - John Ehlers, Temmuz 2016 Tarihinde yayınlandı.

//Super BandPass Filter - John Ehlers, Temmuz 2016 Tarihinde yayınlandı.


//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ış");


int count = 30;
int fastbarcount = 20;
int slowbarcount = 30;


double a1 = 5 / Convert.ToDouble(fastbarcount ); 
double a2 = 5 / Convert.ToDouble(slowbarcount );
var SuperPassBandFilter= Sistem.Liste(0); 
var RMSpos= Sistem.Liste(0); 
var RMSneg= Sistem.Liste(0); 
double RMS;
double[] x = new double[C.Count];


for (int i = 2 ; i < C.Count; i++) 
{     
   x[i] = (a1 - a2) * C[i] + (a2*(1 - a1) - a1*(1-a2)) * C[i-1] + ((1 - a1) + (1 - a2)) * x[i-1] - (1 - a1) * (1 - a2) * x[i-2];


   SuperPassBandFilter[i] = (float)x[i];
   RMS = 0;


   if(i > count )
   for (int j = count-1; j >= 0; j--)
   {
     RMS += x[i-j] * x[i-j];
   }
   
   RMSpos[i] = (float) Math.Sqrt(RMS/50);
   RMSneg[i] = (float)-RMSpos[i];
}


Sistem.Cizgiler[0].Deger  = SuperPassBandFilter;
Sistem.Cizgiler[1].Deger  = RMSpos;
Sistem.Cizgiler[2].Deger  = RMSneg; 

https://prnt.sc/lnj137