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

[memet aksu]

HAYIRLI GECELER akd ilk birincikurum aldýgý lot ve sattýgý lotlarý indikator olarak cizdirebilirmiyiz

[Zülfü Aþkýn]

SN Bear_Bull hocam Ekrandaki SORGU sayfasýný devamli acýk tutmak istiyorum sadece bir sayfada mümkün mü...Sayfa deðiþince diðer sayfada da görünüyor.. Ben sadece bir sayfada görünmesini istiyorum..


[IMG][/IMG]

[berlys]

merhabalar, sistem.dönemçevir sorgu kodu yazmak istiyorum ama sonuç vermiyor
Sistem.SorguBaslik[0] = "GÜNLÜK";
Sistem.SorguBaslik[1] = "SAATLÝK";
Sistem.SorguBaslik[2] = "5 DK";
Sistem.SorguBaslik[3] = "FÝYAT";

var v = Sistem.GrafikVerileri;
int son = v.Count - 1;
string Sembol = Sistem.Sembol;

bool devamEt = true;

// BAR KONTROLÜ
if (son < 1)
devamEt = false;

if (devamEt)
{
// ÜST PERÝYOT VERÝLERÝ
var vG = Sistem.GrafikVerileriniOku(Sembol, "G");
var vH = Sistem.GrafikVerileriniOku(Sembol, "60");
var v5 = Sistem.GrafikVerileriniOku(Sembol, "5");

if (vG == null || vH == null || v5 == null)
devamEt = false;

if (devamEt && vG.Count > 10 && vH.Count > 10 && v5.Count > 10)
{
// ORTALAMALAR
var maG_H = Sistem.MA(Sistem.GrafikFiyatSec(vG, "Kapanis"), "Exp", 50);
var maH_H = Sistem.MA(Sistem.GrafikFiyatSec(vH, "Kapanis"), "Exp", 50);
var ma5_H = Sistem.MA(Sistem.GrafikFiyatSec(v5, "Kapanis"), "Exp", 50);

// ANA PERÝYODA HÝZALAMA
var maG = Sistem.DonemCevir(v, vG, maG_H);
var maH = Sistem.DonemCevir(v, vH, maH_H);
var ma5 = Sistem.DonemCevir(v, v5, ma5_H);

float fiyat = v[son].Close;

// GÜVENLÝ DEÐER ALMA
float gVal = maG[son] != 0 ? maG[son] : maG[son - 1];
float hVal = maH[son] != 0 ? maH[son] : maH[son - 1];
float dVal = ma5[son] != 0 ? ma5[son] : ma5[son - 1];

if (gVal > 0 && hVal > 0 && dVal > 0)
{
bool gYukari = fiyat > gVal;
bool hYukari = fiyat > hVal;
bool dYukari = fiyat > dVal;

// ?? ÖNCE SATIR RENGÝNÝ SIFIRLA
Sistem.SorguZeminRengi = Color.Empty;

// SÜTUN DEÐERLERÝ
Sistem.SorguDeger[0] = gYukari ? "YUKARI" : "AÞAÐI";
Sistem.SorguDeger[1] = hYukari ? "YUKARI" : "AÞAÐI";
Sistem.SorguDeger[2] = dYukari ? "YUKARI" : "AÞAÐI";
Sistem.SorguDeger[3] = fiyat.ToString("N2");

// ? SADECE 3 PERÝYOT DA YUKARIYSA BOYA
if (gYukari && hYukari && dYukari)
{
Sistem.SorguZeminRengi = Color.FromArgb(220, 255, 220);
}

Sistem.SorguEkle();
}
}
}

[cashhflow]

endeks 1000 tl iken oluþan eðimler endeks 10 bin iken çok daha yüksek oluyor. test eden varsa anlayacaktýr.. çok saçma deðil mi ?

[cashhflow]

merhabalar, sistem.dönemçevir sorgu kodu yazmak istiyorum ama sonuç vermiyor
Sistem.SorguBaslik[0] = "GÜNLÜK";
Sistem.SorguBaslik[1] = "SAATLÝK";
Sistem.SorguBaslik[2] = "5 DK";
Sistem.SorguBaslik[3] = "FÝYAT";

var v = Sistem.GrafikVerileri;
int son = v.Count - 1;
string Sembol = Sistem.Sembol;

bool devamEt = true;

// BAR KONTROLÜ
if (son < 1)
devamEt = false;

if (devamEt)
{
// ÜST PERÝYOT VERÝLERÝ
var vG = Sistem.GrafikVerileriniOku(Sembol, "G");
var vH = Sistem.GrafikVerileriniOku(Sembol, "60");
var v5 = Sistem.GrafikVerileriniOku(Sembol, "5");

if (vG == null || vH == null || v5 == null)
devamEt = false;

if (devamEt && vG.Count > 10 && vH.Count > 10 && v5.Count > 10)
{
// ORTALAMALAR
var maG_H = Sistem.MA(Sistem.GrafikFiyatSec(vG, "Kapanis"), "Exp", 50);
var maH_H = Sistem.MA(Sistem.GrafikFiyatSec(vH, "Kapanis"), "Exp", 50);
var ma5_H = Sistem.MA(Sistem.GrafikFiyatSec(v5, "Kapanis"), "Exp", 50);

// ANA PERÝYODA HÝZALAMA
var maG = Sistem.DonemCevir(v, vG, maG_H);
var maH = Sistem.DonemCevir(v, vH, maH_H);
var ma5 = Sistem.DonemCevir(v, v5, ma5_H);

float fiyat = v[son].Close;

// GÜVENLÝ DEÐER ALMA
float gVal = maG[son] != 0 ? maG[son] : maG[son - 1];
float hVal = maH[son] != 0 ? maH[son] : maH[son - 1];
float dVal = ma5[son] != 0 ? ma5[son] : ma5[son - 1];

if (gVal > 0 && hVal > 0 && dVal > 0)
{
bool gYukari = fiyat > gVal;
bool hYukari = fiyat > hVal;
bool dYukari = fiyat > dVal;

// ?? ÖNCE SATIR RENGÝNÝ SIFIRLA
Sistem.SorguZeminRengi = Color.Empty;

// SÜTUN DEÐERLERÝ
Sistem.SorguDeger[0] = gYukari ? "YUKARI" : "AÞAÐI";
Sistem.SorguDeger[1] = hYukari ? "YUKARI" : "AÞAÐI";
Sistem.SorguDeger[2] = dYukari ? "YUKARI" : "AÞAÐI";
Sistem.SorguDeger[3] = fiyat.ToString("N2");

// ? SADECE 3 PERÝYOT DA YUKARIYSA BOYA
if (gYukari && hYukari && dYukari)
{
Sistem.SorguZeminRengi = Color.FromArgb(220, 255, 220);
}

Sistem.SorguEkle();
}
}
}

Sistem.DonemCevir(Veriler, UstDonemVerileri, UstDonemCevrilecekData) örneklerine bakýn

[KýsaVade]

endeks 1000 tl iken oluþan eðimler endeks 10 bin iken çok daha yüksek oluyor. test eden varsa anlayacaktýr.. çok saçma deðil mi ?

Sözünü ettiðiniz þeyi yanlýþ anlamadý isem,
"Lineer/Logaritmik" grafik meselesine bakýn:
https://tr.tradingview.com/chart/CHZUSDT/Ufh0uF7R/

[Caglar]

VWAP ta fiyat ve hacim carpildigi icin cok buyuk sayilar ortaya cikar. Bu sayilar icin float tipi (4 byte) yetersiz kalir ve dogru hesaplama yapamaz. Sistem.Liste kullanirsaniz size float listesi doner. Hesaplama yaparken double (8 byte) kullanmaniz gerekiyor. VWAP hesaplamasi bittikten sonra rakam tekrar kuculecegi icin float listesine gecis yapabilirsiniz.

@cashflow

[cashhflow]

https://www.mql5.com/en/articles/16779

        public List<float> OrthogonalPolynomial(
    dynamic Sistem,
    int Period,
    int Degree,
    int PolyType)   // 0=Legendre,1=Cheb1,2=Cheb2,3=Laguerre,4=Hermite
        {
            var C = Sistem.GrafikFiyatSec("Kapanis");
            var Out = Sistem.Liste(0);
 
            if (Degree < 0) Degree = 0;
            if (Degree > 9) Degree = 9;
 
            for (int i = Period; i < Sistem.BarSayisi; i++)
            {
                double mean = 0.0;
 
                for (int k = 0; k < Period; k++)
                    mean += C[i - k];
 
                mean /= Period;
 
                double num = 0.0;
                double den = 0.0;
 
                for (int k = 0; k < Period; k++)
                {
                    double x = 1.0 - 2.0 * k / (Period - 1);  // MQL5 normalize
                    double p = PolyValue(x, Degree, PolyType);
                    double v = C[i - k] - mean;
 
                    num += v * p;
                    den += p * p;
                }
 
                Out[i] = den != 0 ? (float)(num / den) : 0f;
            }
 
            return Out;
        }
 
        double PolyValue(double x, int n, int type)
        {
            if (type == 0) return Legendre(x, n);
            if (type == 1) return Chebyshev1(x, n);
            if (type == 2) return Chebyshev2(x, n);
            if (type == 3) return Laguerre(x, n);
            if (type == 4) return Hermite(x, n);
            return 0.0;
        }
 
        double Legendre(double x, int n)
        {
            if (n == 0) return 1.0;
            if (n == 1) return x;
 
            double p0 = 1.0;
            double p1 = x;
 
            for (int k = 2; k <= n; k++)
            {
                double pk = ((2 * k - 1) * x * p1 - (k - 1) * p0) / k;
                p0 = p1;
                p1 = pk;
            }
 
            return p1;
        }
 
        double Chebyshev1(double x, int n)
        {
            if (n == 0) return 1;
            if (n == 1) return x;
 
            double t0 = 1;
            double t1 = x;
 
            for (int k = 2; k <= n; k++)
            {
                double tk = 2 * x * t1 - t0;
                t0 = t1;
                t1 = tk;
            }
 
            return t1;
        }
 
        double Chebyshev2(double x, int n)
        {
            if (n == 0) return 1;
            if (n == 1) return 2 * x;
 
            double u0 = 1;
            double u1 = 2 * x;
 
            for (int k = 2; k <= n; k++)
            {
                double uk = 2 * x * u1 - u0;
                u0 = u1;
                u1 = uk;
            }
 
            return u1;
        }
        double Laguerre(double x, int n)
        {
            if (n == 0) return 1;
            if (n == 1) return 1 - x;
 
            double l0 = 1;
            double l1 = 1 - x;
 
            for (int k = 2; k <= n; k++)
            {
                double lk = ((2 * k - 1 - x) * l1 - (k - 1) * l0) / k;
                l0 = l1;
                l1 = lk;
            }
 
            return l1;
        }
        double Hermite(double x, int n)
        {
            if (n == 0) return 1;
            if (n == 1) return x;
 
            double h0 = 1;
            double h1 = x;
 
            for (int k = 2; k <= n; k++)
            {
                double hk = x * h1 - (k - 1) * h0;
                h0 = h1;
                h1 = hk;
            }
 
            return h1;
        }
 
 
       
        public List<float> OrthogonalTrend(
            dynamic Sistem,
            int Period)
        {
            var C = Sistem.GrafikFiyatSec("Kapanis");
            var Out = Sistem.Liste(0);
 
            for (int i = Period; i < Sistem.BarSayisi; i++)
            {
                double mean = 0.0;
                for (int k = 0; k < Period; k++)
                    mean += C[i - k];
                mean /= Period;
 
                double num = 0.0;
                double den = 0.0;
 
                for (int k = 0; k < Period; k++)
                {
                    // 
                    double x = 1.0 - 2.0 * k / (Period - 1); // geçmiþ → -1, þimdi → +1
                    double v = C[i - k] - mean;
 
                    num += v * x;
                    den += x * x;
                }
 
                Out[i] = den != 0 ? (float)(num / den) : 0f;
            }
 
            return Out;
        }
 
 
        public List<float> OrthogonalRSI(
    dynamic Sistem,
    int RsiPeriod,
    int PolyPeriod)
        {
            var C = Sistem.GrafikFiyatSec("Kapanis");
            var RSI = Sistem.RSI(RsiPeriod);
            var Out = Sistem.Liste(0);
 
            for (int i = PolyPeriod; i < Sistem.BarSayisi; i++)
            {
                double mean = 0.0;
 
                for (int k = 0; k < PolyPeriod; k++)
                    mean += RSI[i - k];
 
                mean /= PolyPeriod;
 
                double num = 0.0;
                double den = 0.0;
 
                for (int k = 0; k < PolyPeriod; k++)
                {
                    double x = 1.0 - 2.0 * k / (PolyPeriod - 1);
                    double v = RSI[i - k] - mean;
 
                    num += v * x;
                    den += x * x;
                }
 
                Out[i] = den != 0 ? (float)(num / den) : 0f;
            }
 
            return Out;
        }
 
        public List<float> OrthogonalCCI(
            dynamic Sistem,
            int CciPeriod,
            int PolyPeriod)
        {
            var C = Sistem.GrafikFiyatSec("Kapanis");
            var CCI = Sistem.CommodityChannelIndex(CciPeriod);
            var Out = Sistem.Liste(0);
 
            for (int i = PolyPeriod; i < Sistem.BarSayisi; i++)
            {
                double mean = 0.0;
                for (int k = 0; k < PolyPeriod; k++)
                    mean += CCI[i - k];
                mean /= PolyPeriod;
 
                double num = 0.0;
                double den = 0.0;
 
                for (int k = 0; k < PolyPeriod; k++)
                {
                    double x = 1.0 - 2.0 * k / (PolyPeriod - 1); // zaman yönü doðru
                    double v = CCI[i - k] - mean;
 
                    num += v * x;
                    den += x * x;
                }
 
                Out[i] = den != 0 ? (float)(num / den) : 0f;
            }
 
            return Out;
        }
 
        public List<float> OrthogonalMomentum(
    dynamic Sistem,
    int Period)
        {
            var C = Sistem.GrafikFiyatSec("Kapanis");
            var Out = Sistem.Liste(0);
 
            for (int i = Period; i < Sistem.BarSayisi; i++)
            {
                double mean = 0.0;
                for (int k = 0; k < Period; k++)
                    mean += C[i - k];
                mean /= Period;
 
                double num = 0.0;
                double den = 0.0;
 
                for (int k = 0; k < Period; k++)
                {
                    double x = 1.0 - 2.0 * k / (Period - 1);
                    double v = (C[i - k] - mean);
 
                    num += v * x;
                    den += x * x;
                }
 
                Out[i] = den != 0 ? (float)(num / den) : 0f;
            }
 
            return Out;
        }
 
        public List<float> OrthogonalVolatility(
    dynamic Sistem,
    int Period)
        {
            var C = Sistem.GrafikFiyatSec("Kapanis");
            var Out = Sistem.Liste(0);
 
            for (int i = Period; i < Sistem.BarSayisi; i++)
            {
                double mean = 0.0;
                for (int k = 0; k < Period; k++)
                    mean += C[i - k];
                mean /= Period;
 
                double sum = 0.0;
 
                for (int k = 0; k < Period; k++)
                {
                    double x = 1.0 - 2.0 * k / (Period - 1);
                    double v = C[i - k] - mean;
                    sum += (v * x) * (v * x);
                }
 
                Out[i] = (float)Math.Sqrt(sum / Period);
            }
 
            return Out;
        }
 
       public int AdaptivePeriod(
   dynamic Sistem,
   int MinP,
   int MaxP,
   int VolPeriod)
       {
           var Vol = OrthogonalVolatility(Sistem, VolPeriod);
 
           // Son volatilite
           float v = Vol[Sistem.BarSayisi - 1];
 
           // Basit normalize (robust ve hýzlý)
           float vMin = 0.0001f;
           float vMax = 1.0f;
 
           float t = (v - vMin) / (vMax - vMin);
           if (t < 0) t = 0;
           if (t > 1) t = 1;
 
           // Vol ↑ → Period ↓
           int P = (int)(MaxP - t * (MaxP - MinP));
 
           if (P < MinP) P = MinP;
           if (P > MaxP) P = MaxP;
 
           return P;
       }
       public List<float> AdaptiveOrthogonalTrend(
           dynamic Sistem,
           int MinP,
           int MaxP,
           int VolPeriod)
       {
           var C = Sistem.GrafikFiyatSec("Kapanis");
           var Out = Sistem.Liste(0);
           var Vol = OrthogonalVolatility(Sistem, VolPeriod);
 
           for (int i = MaxP; i < Sistem.BarSayisi; i++)
           {
               float v = Vol[i];
               float t = Math.Min(1f, Math.Max(0f, v));
 
               int P = (int)(MaxP - t * (MaxP - MinP));
               if (P < MinP) P = MinP;
               if (P > MaxP) P = MaxP;
 
               double mean = 0.0;
               for (int k = 0; k < P; k++)
                   mean += C[i - k];
               mean /= P;
 
               double num = 0.0, den = 0.0;
 
               for (int k = 0; k < P; k++)
               {
                   double x = 1.0 - 2.0 * k / (P - 1);
                   double v2 = C[i - k] - mean;
                   num += v2 * x;
                   den += x * x;
               }
 
               Out[i] = den != 0 ? (float)(num / den) : 0f;
           }
 
           return Out;
       }