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

[atakanözbaki]

var V = Sistem.GrafikVerileri ;
var period = 100 ;
var atrfact = 5f ;

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

var HLF = Sistem.Liste(V.Count, 0) ; 

for (int i = 1; i < V.Count; i++) 
{
  HLF[i] = H[i] - L[i] ;
}

var MA1 = Sistem.MA(HLF, "Simple", period ) ;

var a = Sistem.Liste(V.Count, 0) ; 
var HiLo = Sistem.Liste(V.Count, 0) ; 
var Href = Sistem.Liste(V.Count, 0) ; 
var Lref = Sistem.Liste(V.Count, 0) ; 
var diff1 = Sistem.Liste(V.Count, 0) ; 
var diff2 = Sistem.Liste(V.Count, 0) ; 
var atrmod = Sistem.Liste(V.Count, 0) ; 

for (int i = 1; i < V.Count; i++) 
{
  a[i] = 1.5f * MA1[i] ;

  if ( HLF[i] < a[i] )
       HiLo[i] = HLF[i] ;
  else 
       HiLo[i] = a[i] ;

 
  if ( L[i] <= H[i-1] )
      Href[i] = H[i] - C[i-1] ;
  else 
       Href[i] = ( H[i]-C[i-1] )-( L[i]-H[i-1] )/2 ;


  if ( H[i] <= L[i-1] )
       Lref[i] = C[i-1] - L[i] ;
  else 
       Lref[i] = ( C[i-1] - L[i] )-( L[i-1]-H[i] )/2 ;


if ( H[i] <= L[i-1] )
       Lref[i] = C[i-1] - L[i] ;
  else 
       Lref[i] = ( C[i-1] - L[i] )-( L[i-1]-H[i] )/2 ;

if ( HiLo[i] > Href[i] )
       diff1[i] = HiLo[i] ;
  else 
       diff1[i] = Href[i] ;


if ( diff1[i] > Lref[i] )
       diff2[i] = diff1[i] ;
  else 
       diff1[i] = Lref[i] ;

}

atrmod = Sistem.MA(diff2, "Wilder", period ) ;

var loss= Sistem.Liste(V.Count, 0) ; 
var trail= Sistem.Liste(V.Count, 0) ; 


for (int i = 1; i < V.Count; i++) 
{
  loss[i] = atrfact * atrmod[i];

if ( C[i] > trail[i-1] && C[i-1] > trail[i-1]  )
   {
   if ( trail[i-1] > (C[i] - loss[i])  )
       trail[i] = trail[i-1] ;
  else 
       trail[i] = (C[i] - loss[i])  ;

   }

 if ( C[i] < trail[i-1] && C[i-1] < trail[i-1]  )
   {
   if ( trail[i-1] < (C[i] + loss[i])  )
       trail[i] = trail[i-1] ;
  else  
       trail[i] = (C[i] + loss[i])  ;

   }

{
 if ( C[i] > trail[i-1]  )
       trail[i] = C[i] - loss[i] ;
 
else 
       trail[i] = (C[i] + loss[i])  ;
}
  
}

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

                                          
   {
      Sistem.Yon[i] = "S";                                      
      SonYon = Sistem.Yon[i] ;
   }     

}

Sistem.Cizgiler[0].Deger = trail ; 

Þimdi böyle bir sistem var. Eskiden matrikste
var period = 100 ;
var atrfact = 5f ;

yazan yere OPT1 , OPT2 yazýp optimizasyonu yaptýrýrdýk.

Ýdeale dýþardan indikatör ekleyince hem sistemini yazmak, hemde optimizasyon kodunu yazmak gerekiyor. Sisteme çevirmek kolay kalýp sayesinde yapýlabiliyor. Bu sistemin optimizasyon formülü için kolay kalýp niteliginde optmiziasyon kalýbý varmýdýr.

[serseri26]

Kodu tuþa baðlamadan önce isterseniz dll içine sadece bu kodu atýp emir gönderimi olup olmadýðýný kontrol edin. Çünkü yanlýþ yönlendirme yapmamak adýna dll üstünde denedim ve çalýþýyor. Ben aktif olarak bu kodu kullanýyorum ve sorun yaþamýyorum.

O þekilde de denedim.Yok emir gitmiyor.Siz nasýl gönderiyorsunuz anlamadým valla.Benim using kýsmýnda bunlar var belki sizinki farklýdýr.

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.IO;
using System.Drawing;
using System.Runtime.Serialization.Formatters.Binary;
using System.Runtime.InteropServices;
using System.Reflection;
using System.Windows.Forms;
using System.Threading;
using System.Diagnostics;
using System.Drawing.Drawing2D;
using System.Net;
using System.Security.Cryptography.X509Certificates;
using System.Net.Security;
using System.Xml;
using System.CodeDom.Compiler;
using System.Security;
using System.Security.Cryptography;
using System.Collections.Concurrent;
using System.Data.SqlClient;
using System.IO; 

[dombayci]

O þekilde de denedim.Yok emir gitmiyor.Siz nasýl gönderiyorsunuz anlamadým valla.Benim using kýsmýnda bunlar var belki sizinki farklýdýr.

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.IO;
using System.Drawing;
using System.Runtime.Serialization.Formatters.Binary;
using System.Runtime.InteropServices;
using System.Reflection;
using System.Windows.Forms;
using System.Threading;
using System.Diagnostics;
using System.Drawing.Drawing2D;
using System.Net;
using System.Security.Cryptography.X509Certificates;
using System.Net.Security;
using System.Xml;
using System.CodeDom.Compiler;
using System.Security;
using System.Security.Cryptography;
using System.Collections.Concurrent;
using System.Data.SqlClient;
using System.IO; 

using System;
using System.IO;
using System.Collections.Generic;
using System.Data;
using System.Linq;
using System.Text;
using System.Runtime.InteropServices;
using System.Reflection;
using System.Threading;
using System.Net;
using System.Net.Security;
using System.Security;
using System.Security.Cryptography;
using System.Collections.Concurrent;


namespace ideal
{
    #region User  


    public class User
    {

        public void Deneme(dynamic Sistem) // idealde caðirmak için kullanacaðiniz isim 
        {
            try
            {
                string Sembol = "IMKBH'THYAO";

                Action<int, int> emirGonder = new Action<int, int>
                ((alSat, miktar) =>
                {

                    var SonFiyat = Sistem.SonFiyat(Sembol);

                    var Islem = (alSat == 1) ? "ALIS" : "SATIS";
                    miktar = (alSat == 1) ? miktar : -miktar;

                    Sistem.EmirSembol = Sembol;
                    Sistem.EmirIslem = Islem;
                    Sistem.EmirSuresi = "KIE"; // GUN, KIE, IKG
                    Sistem.EmirTipi = "Piyasa"; // Piyasa, Limitli, Piyasadan Limite
                    Sistem.EmirFiyati = SonFiyat;
                    Sistem.EmirMiktari = Math.Abs(miktar);
                    Sistem.EmirGonder();


                });

                emirGonder(1, 200);

            }
            catch (Exception error)
            {
                string errorline = "\r\n" + "\r\n" + DateTime.Now.ToString("dd/MM/yyyy HH:mm:ss") + "\r\n" + "\r\n" +
                      "Message : " + error.Message + "\r\n" + "\r\n" +
                      "Source: " + error.Source + "\r\n" + "\r\n" +
                      "StackTrace : " + error.StackTrace + "\r\n";
                Sistem.AlgoAciklama = errorline;
            }
        }
        #endregion
    }

} 

aaa.jpg


dll içindeki kod ve gönderilen emirlerin resmi. Bende çalýþýyor. Umarým sorununuzu çözersiniz.

[erhanacikgoz1]

Gondermemesi mantiga aykiri zaten bir hata yapiyorsunuzdur.

Bende calisiyorum da daha emir gonderme kismini tasarlamadim

[3c1a]

O þekilde de denedim.Yok emir gitmiyor.Siz nasýl gönderiyorsunuz anlamadým valla.Benim using kýsmýnda bunlar var belki sizinki farklýdýr.

User.DLL lisansinizin acik olduguna emin misiniz? Saate cift tiklayip "Lisanslarim" basligindan User.DLL kullaniminin acik olup olmadigini kontrol edebilirsiniz.

[serseri26]

using System;
using System.IO;
using System.Collections.Generic;
using System.Data;
using System.Linq;
using System.Text;
using System.Runtime.InteropServices;
using System.Reflection;
using System.Threading;
using System.Net;
using System.Net.Security;
using System.Security;
using System.Security.Cryptography;
using System.Collections.Concurrent;


namespace ideal
{
    #region User  


    public class User
    {

        public void Deneme(dynamic Sistem) // idealde caðirmak için kullanacaðiniz isim 
        {
            try
            {
                string Sembol = "IMKBH'THYAO";

                Action<int, int> emirGonder = new Action<int, int>
                ((alSat, miktar) =>
                {

                    var SonFiyat = Sistem.SonFiyat(Sembol);

                    var Islem = (alSat == 1) ? "ALIS" : "SATIS";
                    miktar = (alSat == 1) ? miktar : -miktar;

                    Sistem.EmirSembol = Sembol;
                    Sistem.EmirIslem = Islem;
                    Sistem.EmirSuresi = "KIE"; // GUN, KIE, IKG
                    Sistem.EmirTipi = "Piyasa"; // Piyasa, Limitli, Piyasadan Limite
                    Sistem.EmirFiyati = SonFiyat;
                    Sistem.EmirMiktari = Math.Abs(miktar);
                    Sistem.EmirGonder();


                });

                emirGonder(1, 200);

            }
            catch (Exception error)
            {
                string errorline = "\r\n" + "\r\n" + DateTime.Now.ToString("dd/MM/yyyy HH:mm:ss") + "\r\n" + "\r\n" +
                      "Message : " + error.Message + "\r\n" + "\r\n" +
                      "Source: " + error.Source + "\r\n" + "\r\n" +
                      "StackTrace : " + error.StackTrace + "\r\n";
                Sistem.AlgoAciklama = errorline;
            }
        }
        #endregion
    }

} 

aaa.jpg


dll içindeki kod ve gönderilen emirlerin resmi. Bende çalýþýyor. Umarým sorununuzu çözersiniz.

Hocam siz robot ile USERDLL çalýþtýrýyorsunuz.Ben ROBOT KULLANMADAN USERDLL ile emir göndermek istiyorum.Bu þekilde yaparsam zaten benim emirlerim de gidiyor.Benim yapmak istediðim kendi oluþturduðum formu açýp bu form üzerinden emir göndermek.

[serseri26]

User.DLL lisansinizin acik olduguna emin misiniz? Saate cift tiklayip "Lisanslarim" basligindan User.DLL kullaniminin acik olup olmadigini kontrol edebilirsiniz.

Lisans açýk.

[serseri26]

Hocam siz robot ile USERDLL çalýþtýrýyorsunuz.Ben ROBOT KULLANMADAN USERDLL ile emir göndermek istiyorum.Bu þekilde yaparsam zaten benim emirlerim de gidiyor.Benim yapmak istediðim kendi oluþturduðum formu açýp bu form üzerinden emir göndermek.

Linkteki form üzerinde bulunan emir Gönder butonu altýnda bu kod çalýþmýyor.

https://imgyukle.com/i/oM9Z9U