Sayfa 470/593 İlkİlk ... 370420460468469470471472480520570 ... SonSon
Arama sonucu : 4741 madde; 3,753 - 3,760 arası.

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

  1. Sistem.SorguAciklamaGenislik = 89;

    Sistem.SorguBaslik[0] = "Fiyat";
    Sistem.SorguSutunGenislik[0] = 44;
    Sistem.SorguBaslik[1] = "Dip";
    Sistem.SorguSutunGenislik[1] = 44;
    Sistem.SorguBaslik[2] = "Tepe";
    Sistem.SorguSutunGenislik[2] = 44;
    Sistem.SorguBaslik[3] = "F382";
    Sistem.SorguSutunGenislik[3] = 44;
    Sistem.SorguBaslik[4] = "F50";
    Sistem.SorguSutunGenislik[4] = 44;
    Sistem.SorguBaslik[5] = "F618";
    Sistem.SorguSutunGenislik[5] = 44;
    Sistem.SorguBaslik[6] = "F786";
    Sistem.SorguSutunGenislik[6] = 44;
    Sistem.SorguBaslik[7] = "F886";
    Sistem.SorguSutunGenislik[7] = 44;
    Sistem.SorguBaslik[8] = "Ö.Kapanis";
    Sistem.SorguSutunGenislik[8] = 59;
    Sistem.SorguBaslik[9] = "Dusen";
    Sistem.SorguSutunGenislik[9] = 55;
    Sistem.SorguBaslik[10] = "Hacim";
    Sistem.SorguSutunGenislik[10] = 66;
    Sistem.SorguBaslik[11] = "STK";
    Sistem.SorguSutunGenislik[11] = 55;
    Sistem.SorguBaslik[12] = "RSI";
    Sistem.SorguSutunGenislik[12] = 55;
    Sistem.SorguBaslik[13] = "MOM";
    Sistem.SorguSutunGenislik[13] = 55;
    Sistem.SorguBaslik[14] = "CCI";
    Sistem.SorguSutunGenislik[14] = 55;
    Sistem.SorguBaslik[15] = "MACD";
    Sistem.SorguSutunGenislik[15] = 65;
    Sistem.SorguBaslik[16] = "AVR";
    Sistem.SorguSutunGenislik[16] = 65;
    Sistem.SorguBaslik[17] = "Fark*100";
    Sistem.SorguSutunGenislik[17] = 65;




    Sistem.SorguOndalik[0] = 2;
    Sistem.SorguOndalik[1] = 2;
    Sistem.SorguOndalik[2] = 2;
    Sistem.SorguOndalik[3] = 2;
    Sistem.SorguOndalik[4] = 2;
    Sistem.SorguOndalik[5] = 2;
    Sistem.SorguOndalik[6] = 2;
    Sistem.SorguOndalik[7] = 2;
    Sistem.SorguOndalik[8] = 2;
    Sistem.SorguOndalik[9] = 2;
    Sistem.SorguOndalik[10] = 2;
    Sistem.SorguOndalik[11] = 2;
    Sistem.SorguOndalik[12] = 2;
    Sistem.SorguOndalik[13] = 2;
    Sistem.SorguOndalik[14] = 2;
    Sistem.SorguOndalik[15] = 2;
    Sistem.SorguOndalik[16] = 2;
    Sistem.SorguOndalik[17] = 2;


    var Dip = Sistem.LLV(144);
    var Tepe = Sistem.HHV(144);
    var Fiyat = Sistem.GrafikFiyatSec("Kapanis");
    var Fibo50 = Sistem.Liste(0);
    var Fibo618 = Sistem.Liste(0);
    var Fibo382 = Sistem.Liste(0);
    var Fibo786 = Sistem.Liste(0);
    var Fibo886 = Sistem.Liste(0);


    var TrendPeriyodu = 233;
    var SonXbar = 5;
    var Sembol = Sistem.Sembol;
    var V= Sistem.GrafikVerileriniOku(Sembol, Sistem.Periyot);
    var C = Sistem.GrafikFiyatOku(V, "Kapanis");
    var Yukselen = Sistem.OtoTrendYukselen(V, TrendPeriyodu, SonXbar);
    var Dusen = Sistem.OtoTrendDusen(V, TrendPeriyodu, SonXbar);
    Sistem.Cizgiler[0].Deger = Yukselen;
    Sistem.Cizgiler[1].Deger = Dusen ;
    var RSI= Sistem.RSI(14);
    var STK= Sistem.StochasticOsc(5, 3);
    var MOM = Sistem.Momentum(12);
    var CCI = Sistem.CommodityChannelIndex(14);

    var MACD = Sistem.MACD(12, 26);
    var AVR = Sistem.MA(MACD, "exp", 9);
    var x = Sistem.BarSayisi-1;

    var SonAVR = AVR[Sistem.BarSayisi-1];
    var SonMACD = MACD[Sistem.BarSayisi-1];
    var SonRSI = RSI[Sistem.BarSayisi-1];
    var SonSTK = STK[Sistem.BarSayisi-1];
    var SonMOM = MOM[Sistem.BarSayisi-1];
    var SonCCI = CCI[Sistem.BarSayisi-1];
    var Fark = Math.Abs( SonMACD - SonAVR )/ SonMACD;
    for (int i = 500; i < Sistem.BarSayisi; i++)
    {
    if ( Fark*100 <= 0.5 && MACD[x] < AVR[x] && MACD[x] > MACD[x - 1])
    {}
    }
    for (int i = 0; i < Sistem.BarSayisi; i++)
    {
    Fibo886[i] = Tepe[i] - ((Tepe[i]-Dip[i])*0.886F);
    Fibo786[i] = Tepe[i] - ((Tepe[i]-Dip[i])*0.786F);
    Fibo50[i] = Tepe[i] - ((Tepe[i]-Dip[i])*0.5F);
    Fibo618[i] = Tepe[i] - ((Tepe[i]-Dip[i])*0.618F);
    Fibo382[i] = Tepe[i] - ((Tepe[i] - Dip[i]) * 0.382f);
    }



    if ( V[V.Count-1].Close < V[V.Count-TrendPeriyodu].Close && V[V.Count-1].High > Dusen[Dusen.Count-1] && Dusen[Dusen.Count-1] != 0)
    {
    if(Fiyat[Sistem.BarSayisi-1] > Fibo618[Sistem.BarSayisi-1] && Fiyat[Sistem.BarSayisi-1] > Fibo786[Sistem.BarSayisi-1] && Fiyat[Sistem.BarSayisi-1] > Fibo886[Sistem.BarSayisi-1] &&Fiyat[Sistem.BarSayisi-1] < Fibo50[Sistem.BarSayisi-1] && Fiyat[Sistem.BarSayisi-1] < Fibo382[Sistem.BarSayisi-1] )
    {

    Sistem.SorguDeger[0] = Fiyat[Sistem.BarSayisi-1];
    Sistem.SorguDeger[1] = Dip[Sistem.BarSayisi-1];
    Sistem.SorguDeger[2] = Tepe[Sistem.BarSayisi-1];
    Sistem.SorguDeger[3] = Fibo382[Sistem.BarSayisi-1];
    Sistem.SorguDeger[4] = Fibo50[Sistem.BarSayisi-1];
    Sistem.SorguDeger[5] = Fibo618[Sistem.BarSayisi-1];
    Sistem.SorguDeger[6] = Fibo786[Sistem.BarSayisi-1];
    Sistem.SorguDeger[7] = Fibo886[Sistem.BarSayisi-1];
    Sistem.SorguDeger[8]= C[C.Count-2];
    Sistem.SorguDeger[9]= Dusen[Dusen.Count-1];
    Sistem.SorguDeger[10] = Sistem.GrafikVerileri[Sistem.BarSayisi-1].Vol;
    Sistem.SorguDeger[11] = SonSTK;
    Sistem.SorguDeger[12] = SonRSI;
    Sistem.SorguDeger[13] = SonMOM;
    Sistem.SorguDeger[14] = SonCCI;
    Sistem.SorguDeger[15] = MACD[x];
    Sistem.SorguDeger[16] = AVR[x];
    Sistem.SorguDeger[17] = Fark*100 ;


    Sistem.SorguAciklama = "Yukarı Kırıldı";
    if (SonRSI < 100 && SonRSI > 55 )
    Sistem.SorguHucreZeminRengi[12] = Color.Green;
    if (SonRSI < 55 && SonRSI > 45 )
    Sistem.SorguHucreZeminRengi[12] = Color.LightGreen;

    if (SonSTK < 105 && SonSTK > 55 )
    Sistem.SorguHucreZeminRengi[11] = Color.Blue;
    if (SonSTK < 55 && SonSTK > 45 )
    Sistem.SorguHucreZeminRengi[11] = Color.LightBlue;

    if (SonMOM < 180 && SonMOM > 99.9 )
    Sistem.SorguHucreZeminRengi[13] = Color.Orange;

    if (SonCCI < 380 && SonCCI > 55 )
    Sistem.SorguHucreZeminRengi[14] = Color.Red;
    Sistem.SorguEkle();
    }

    }

  2. Burada bulunan formüllerden yararlanarak açılış barının yüksek,düşüğü ile günlük ortalamayı alan bir formül yazmaya çalıştım.Bazı günler açılış barının yükseğini hatalı gösteriyor nedenini anlayamadım.
    //Veriler
    var V =Sistem.GrafikVerileri ;
    var C = Sistem.GrafikFiyatSec( "Kapanis");
    //Değişkenler
    var OncekiGunKapanis = Sistem.Liste(0);
    var GunlukOrtalama = Sistem.Liste(0);
    var GunlukYuzde = Sistem.Liste(0);

    int OncekiGunKapanisBar =0;
    List<double> GunlukFiyatList = new List<double>();

    //Günlük Durum Listelerini Hesapla
    for (int i = 1; i < V.Count; i++)
    {
    if (V[i].Date.Day != V[i-1].Date.Day)
    {
    OncekiGunKapanis[i] = C[i-1];
    OncekiGunKapanisBar = i;
    GunlukFiyatList.Clear();
    GunlukOrtalama[i] = GunlukOrtalama[i-1];
    }
    else {
    OncekiGunKapanis[i] = OncekiGunKapanis[i-1];
    GunlukFiyatList.Add(C[i]);
    GunlukOrtalama[i] = (float)GunlukFiyatList.Average();
    }
    if ( C[i]>=OncekiGunKapanis[i]) {GunlukYuzde[i] = (C[i]-OncekiGunKapanis[i]);}
    if ( C[i]<OncekiGunKapanis[i]) {GunlukYuzde[i] = -(-C[i]+OncekiGunKapanis[i]);}
    }

    //Çizgiler

    var H = Sistem.GrafikFiyatOku(V, "Yuksek" ) ;
    var L = Sistem.GrafikFiyatOku(V, "Dusuk" ) ;

    //Değişkenler
    var GunYuksek = Sistem.Liste(0);
    var GunDusuk = Sistem.Liste(0);

    int GunYuksekBar =0;
    List<double> GunYuksekFiyatList = new List<double>();
    int GunDusukBar =0;
    List<double> GunDusukFiyatList = new List<double>();


    //Günlük Durum Listelerini Hesapla
    for (int i = 1; i < V.Count; i++)
    {
    if (V[i].Date.Day != V[i-1].Date.Day)
    {
    GunYuksek[i] = H[i];
    GunDusuk [i] = L[i];
    GunYuksekFiyatList.Clear();
    GunDusukFiyatList.Clear();
    GunYuksekBar = i;
    GunDusukBar = i;
    }
    else {
    GunYuksek[i] = GunYuksek[i-1];
    GunDusuk[i] = GunDusuk[i-1];
    GunYuksekFiyatList.Add(H[i]);
    GunDusukFiyatList.Add(L[i]);
    }
    }
    //Çizgiler
    Sistem.Cizgiler[0].Deger = GunYuksek; //Panel 1
    Sistem.Cizgiler[0].Aciklama = "GunYuksek";
    Sistem.Cizgiler[1].Deger = GunDusuk; //Panel 1
    Sistem.Cizgiler[1].Aciklama = "GunDusuk";
    Sistem.Cizgiler[2].Deger = OncekiGunKapanis;
    Sistem.Cizgiler[2].Aciklama = "OncekiGunKapanis";
    Sistem.Cizgiler[3].Deger = GunlukOrtalama; //Panel 1
    Sistem.Cizgiler[3].Aciklama = "GunlukOrtalama";
    Sistem.Cizgiler[4].Deger = GunlukYuzde ; //Panel 2
    Sistem.Cizgiler[4].Aciklama = "GunlukYuzde";

  3. Acemilik

    Merhabalar, ideal veri sağlayıcısını yeni edindim ve kodlama namına hiçbir şey bilmiyorum. Hazır sistemlerin değerlerini değiştirerek bir şeyler yapmaya çalışıyorum. Şimdi kurduğumuz bu sistemleri robota bağlayıp o sisteme göre al veren hisseleri aldırmak istiyorum. Piyasada mevcut olan robot kodlarında tek hisseler mevcut. sorgudan cıkan bütün hisseleri nasıl aldırıp kar al yada stop oldurabilirim.

    teşekkür ederim şimdiden.

  4. merhabalar ideal kullanmaya yeni basladım ,matrikste kullandıgım bir indikatoru burada indikator olarak yazabilmek mumkun mu ve kapanıs fiyatının son 5 barda bu indikatoru yukarı kestiği senetlerin sorgusu için yardımcı olabilirmisiniz? indikatorun formulunu asagıda paylaşıyorum

    P:=input("Period", 5, 100, 10);
    Pds:=P+1;
    Long:=2/(2+1);
    Short:=2/(30+1);
    Dir:=Abs(C-Ref(C,-P));
    Voli:=Sum(Abs(ROC(C,1,%)),P);
    DV:=Dir/Voli;
    LS:=DV*(Long-Short)+Short;
    Cnst:= POWER(LS,2);
    SRI:=If(Cum(1) = Pds,Ref(C,-1)+Cnst*(C-Ref(C,-1)),PREV+Cnst*(C-PREV));
    SRI


    şimdiden teşekkürler

  5.  Alıntı Originally Posted by Maximusix Yazıyı Oku
    Kod:
    var Factor = 3f;
    
    var Pd = 10;
    
    var ATR = Sistem.AverageTrueRange(Pd);
    
    var C = Sistem.GrafikFiyatSec("OrtaNokta");
    
    var K = Sistem.MA(C, "Exp", Pd);
    var STR = Sistem.Liste(0);
    
    var STS = Sistem.Liste(0);
    
    var FUB = Sistem.Liste(0);
    
    var FLB = Sistem.Liste(0);
    
    var PMax = Sistem.Liste(0);
    
    
    for (int i=1; i < Sistem.BarSayisi; i++)
    
    {
    
       STR[i] = K[i] + (Factor*ATR[i]);
    
       STS[i] = K[i] - (Factor*ATR[i]);
    
       FUB[i] = (STR[i] < FUB[i-1] || K[i-1] > FUB[i-1]) ? STR[i] : FUB[i-1];
    
       FLB[i] = (STS[i] > FLB[i-1] || K[i-1] < FLB[i-1]) ? STS[i] : FLB[i-1];
    
       PMax[i] = (PMax[i-1] == FUB[i-1] && K[i] < FUB[i]) ? FUB[i] : (PMax[i-1] == FUB[i-1] && K[i] > FUB[i]) ? FLB[i] : (PMax[i-1] == FLB[i-1] && K[i] > FLB[i]) ? FLB[i] : (PMax[i-1] == FLB[i-1] && C[i] < FLB[i] ? FUB[i] : FUB[i]);
    
    }
    
    Sistem.Cizgiler[0].Deger = PMax;
    Sistem.Cizgiler[1].Deger = K;
    Sistem.KesismeTara(K,PMax);
    KIVANÇ BEYİN YAZDIGI PMAX

    Formul için teşekkürler. Bu kodu "sistem tanımları" penceresini açarak boş sayfaya ekliyorum. kaydedip isim veriyorum. sonra bu sistemi grafiğe uyguluyorum. ama hiç bir şey cıkmıyor. bu indikatoru kullanmak için ne yapmam gerekli? ufak bilgi verebilirseniz cok memnun olurum

  6. #3758
    Duhul
    Feb 2017
    İkamet
    Eskişehir / Duhul 2007
    Yaş
    53
    Gönderi
    4,631
     Alıntı Originally Posted by fcsteo7 Yazıyı Oku
    Formul için teşekkürler. Bu kodu "sistem tanımları" penceresini açarak boş sayfaya ekliyorum. kaydedip isim veriyorum. sonra bu sistemi grafiğe uyguluyorum. ama hiç bir şey cıkmıyor. bu indikatoru kullanmak için ne yapmam gerekli? ufak bilgi verebilirseniz cok memnun olurum
    paneli açın

    akfif yazan yerde

    0
    1
    işaretleyip kaydedin
    Bear_Bull
    @BearBull26

  7. #3759
    Duhul
    Feb 2017
    İkamet
    https://merakneguzelsey.blogspot.com/
    Gönderi
    4,378
    selamlar arkadaşalar bu ideal nasıl misal foreksfx plus gibi zırt pırt kopuyor mu yada matrisk gibi çok özellik ekleyelim derken karama karışık mı yada çok ağır ve pc yi kasıyor mu matriks gibi ideal fiyatımı uygun yoksa gerçek anlamda analiz çıkartma kopma yaşamadan sadece borsa verilerine odaklı mı kullanmadan bilemiyoruz kullancılardan tavsiye bekliyorum yardımcı olacaklara şimdiden teşekürler
    AT yarışı Gibi borsa dan Tüyo bekleyenlere yatırım tavsiyesi içermez yazdıklarım öngörülerim arkadaş sohbeti düşünmek gereklidir almak satmak size aittir çünkü para sizindir ..

  8.  Alıntı Originally Posted by Bear_Bull Yazıyı Oku
    paneli açın

    akfif yazan yerde

    0
    1
    işaretleyip kaydedin
    Cevabınız için teşekkürler. Sistem tanımlarına girip kaydettiğim sistemi açtım. Açılan sayfada "No-Açıklama-Aktif-Panel-Renk-Kalınlık-Stil" yazan yerdeki Panel'in altına sırasıyla 0 ve 1 yazıp kaydettim. ama bir şey değişmedi. Neyi yanlıoş yapıyorum acaba?

Sayfa 470/593 İlkİlk ... 370420460468469470471472480520570 ... SonSon

Yer İmleri

Yer İmleri

Gönderi Kuralları

  • Yeni konu açamazsınız
  • Konulara cevap yazamazsınız
  • Yazılara ek gönderemezsiniz
  • Yazılarınızı değiştiremezsiniz
  •