Robot Örnekleri

Robotlar_MA

Robotlar_RSI_TRIX

Robotlar_Saat

Robotlar_TOMA_Mail

Fiyat, 20’lik Üssel ortalamayı yukarı kırdığında ALIM, Aşağı kırdığında SATIM yapan ROBOT örneği. (VIOP için düşünülmüştür, hiç pozisyon yokken SAT sinyali gelirse SATIŞ yapar. Ters yönde sinyal gelirse, pozisyonun 2 katı kadar ters işlem yapar ve ters yönde pozisyon açar
Robot Kodu

var Sembol = "VIP'VIP-X030";
var Periyot = "5"; 

var V = Sistem.GrafikVerileriniOku(Sembol, Periyot);
var C = Sistem.GrafikFiyatOku(V, "Kapanis");
var MA = Sistem.MA(C, "Exp", 20); 

var SartAl = false;
var SartSat = false;
var SonYon = ""; 
var LotSize = 2.0;
 

for (int i = 1 ; i < V.Count - 1; i++)
{
   if (( (C[i] > MA[i] ) ) && SonYon != "A" ) // alış
   {
      SonYon = "A";
      if (i == V.Count - 2) SartAl = true;
   } 
   if (((C[i] < MA[i] )) && SonYon != "S") // satış
   {
      SonYon = "S";
      if (i == V.Count - 2) SartSat = true;
   }
}
 

// emir gönder
var Islem = "";
var Miktar = 0.0;
var SonFiyat = Sistem.SonFiyat(Sembol);
var Pozisyon = Sistem.PozisyonKontrolOku(Sistem.Name + " , " + Sembol); 

   if (SartAl && Pozisyon <= 0) // alış
   {
      Islem = "ALIS";
      if (Pozisyon == 0) // pozisyonum yoksa 1 lot al
         Miktar = LotSize;
      else if (Pozisyon < 0) // short isem stop and reverse , 2 lot al
         Miktar = LotSize + Math.Abs(Pozisyon);
   }
   else if (SartSat && Pozisyon >= 0) // satış
   {
      Islem = "SATIS";
      if (Pozisyon == 0) // pozisyonum yoksa 1 lot sat
         Miktar = LotSize;
      else if (Pozisyon > 0) // long isem stop and reverse , 2 lot sat
         Miktar = LotSize + Math.Abs(Pozisyon);
   } 

// Emir Gönder !!!
if (Islem != "")
{
   if (Islem == "ALIS")
      Sistem.PozisyonKontrolGuncelle(Sistem.Name + " , " + Sembol, LotSize);
   else if (Islem == "SATIS")
      Sistem.PozisyonKontrolGuncelle(Sistem.Name + " , " + Sembol, -LotSize);
   Sistem.EmirSembol = Sembol;
   Sistem.EmirIslem = Islem; 
   Sistem.EmirMiktari = Miktar;
   Sistem.EmirSuresi = "GUN"; // GUN, SNS, IKG
   Sistem.EmirTipi = "KPY"; // KPY, KIE, GIE, SAR
   Sistem.EmirFiyatTipi = "PYS"; // PYS, LMT, EIF, KAP
   Sistem.EmirGonder();
}

İndirmek için Tıklayınız

RSI ve TRIX indikatörlerini kullanan, VIOP 5 Dk grafiği üzerinden, RSI’ın 60’ı VE TRIX’in Ortalamayı yukarı kırması durumunda AL yapan; RSI’ın 40’ı ve TRIX’in Ortalamayı aşağı kırması durumunda SAT yapan ROBOT örneği.
Robot Kodu

var Sembol = "VIP'VIP-X030";
var Veriler = Sistem.GrafikVerileriniOku(Sembol , "5");
var RSI = Sistem.RSI(Veriler, 85);
var TRIX = Sistem.TRIX(Veriler,120);
var AVR = Sistem.MA(TRIX, "Simple", 9); 

var Pozisyon = Sistem.PozisyonKontrolOku(Sembol); 

// alış
if (Sistem.YukariKestiyse(RSI, 60) || Sistem.YukariKestiyse(TRIX, AVR) )
{
   if (Pozisyon == 0)
   {
      var Miktar = 1;
      Sistem.PozisyonKontrolGuncelle(Sembol, Pozisyon+Miktar);
      Sistem.EmirSembol = Sembol;
      Sistem.EmirIslem = "Alış";     
      Sistem.EmirMiktari = Miktar;
      Sistem.EmirSuresi = "GUN";      // GUN, SNS, IKG
      Sistem.EmirTipi = "KPY";        // KPY, KIE, GIE, SAR
      Sistem.EmirFiyatTipi = "PYS";   // PYS, LMT, EIF, KAP
      Sistem.EmirGonder();
   }
   else if (Pozisyon < 0)
   {
      var Miktar = -2*Pozisyon;
      Sistem.PozisyonKontrolGuncelle(Sembol, Pozisyon+Miktar);
      Sistem.EmirSembol = Sembol;
      Sistem.EmirIslem = "Alış";     
      Sistem.EmirMiktari = Miktar;
      Sistem.EmirSuresi = "GUN";      // GUN, SNS, IKG
      Sistem.EmirTipi = "KPY";        // KPY, KIE, GIE, SAR
      Sistem.EmirFiyatTipi = "PYS";   // PYS, LMT, EIF, KAP
      Sistem.EmirGonder();
   }
}
// satış
if (Sistem.AsagiKestiyse(RSI, 40) || Sistem.AsagiKestiyse(TRIX, AVR))
{
   if (Pozisyon == 0)
   {
      var Miktar = 1;
      Sistem.PozisyonKontrolGuncelle(Sembol, Pozisyon-Miktar);
      Sistem.EmirSembol = Sembol;
      Sistem.EmirIslem = "Satış";
      Sistem.EmirMiktari = Miktar;
      Sistem.EmirSuresi = "GUN";      // GUN, SNS, IKG
      Sistem.EmirTipi = "KPY";        // KPY, KIE, GIE, SAR
      Sistem.EmirFiyatTipi = "PYS";   // PYS, LMT, EIF, KAP
      Sistem.EmirGonder();
   }
   else if (Pozisyon > 0)
   {
      var Miktar = 2*Pozisyon;
      Sistem.PozisyonKontrolGuncelle(Sembol, Pozisyon-Miktar);
      Sistem.EmirSembol = Sembol;
      Sistem.EmirIslem = "Satış"; 
      Sistem.EmirMiktari = Miktar;
      Sistem.EmirSuresi = "GUN";      // GUN, SNS, IKG
      Sistem.EmirTipi = "KPY";        // KPY, KIE, GIE, SAR
      Sistem.EmirFiyatTipi = "PYS";   // PYS, LMT, EIF, KAP
      Sistem.EmirGonder();
   }
}

İndirmek için Tıklayınız

Saat 15:30:00 olduğu anda 100 adet GARAN Alış emri yollayan Robot örneği.
Robot Kodu

var Sembol = "IMKBH'GARAN";
var Pozisyon = Sistem.PozisyonKontrolOku(Sembol); 

if (Sistem.Saat.CompareTo("15:30:00")>=0)   
{
 if (Pozisyon == 0)
   {
      var Miktar = 100;
      Sistem.PozisyonKontrolGuncelle(Sembol, Miktar);
      Sistem.EmirSembol = Sembol;
      Sistem.EmirIslem = "Alış";
      Sistem.EmirMiktari = Miktar;
      Sistem.EmirFiyati = "Aktif";   // aktif fiyat
      Sistem.EmirSuresi = "SEANS";   // SEANS, GUN
      Sistem.EmirTipi = "NORMAL";    // NORMAL, KIE, KPY, AFE/KAFE
      Sistem.EmirGonder();
   }
}

İndirmek için Tıklayınız

TOMA indikatörü stratejisine göre işlem yapıp, emir gönderdiği zaman da Mail atan Robot örneği.
Robot Kodu

var Sembol = "VIP'VIP-X030";
var Veriler = Sistem.GrafikVerileriniOku(Sembol , "1");
var C = Sistem.GrafikFiyatOku(Veriler, "Kapanis");

// TOMA hesapla
var TOMA = Sistem.TOMA(C, 3, 2.48);
var EMA = Sistem.MA(C, "Exp", 3); 

var i=Veriler.Count-1;
var SartAl=false;
var SartSat=false;
var Miktar =0;
var Pozisyon = Sistem.PozisyonKontrolOku(Sembol);
var Islem=""; 

SartAl = EMA[i-2]<=TOMA[i-2] && EMA[i-1]>TOMA[i-1] ;
SartSat= EMA[i-2]>=TOMA[i-2] && EMA[i-1]if(SartAl && Pozisyon<=0)
   Islem="ALIS"; 
if(SartSat&& Pozisyon>=0)
   Islem="SATIS"; 

if (Islem != "")
{
   if (Islem == "ALIS")
      Sistem.PozisyonKontrolGuncelle(Sembol, Pozisyon+Miktar);
   else if (Islem == "SATIS")
      Sistem.PozisyonKontrolGuncelle(Sembol, Pozisyon-Miktar);

var MailServer = "smtp.gmail.com";
Sistem.MailServerAdres = MailServer;
Sistem.MailServerPort = 587;
Sistem.MailKonu = "TOMA ISLEM YAPTI";
Sistem.MailMetin = "TOMA ROBOTU ISLEM YAPTI";
Sistem.MailGonderenAdres = "[email protected]";
Sistem.MailGonderenSifre = "yyyyy";
Sistem.MailAliciEkle("[email protected]");
Sistem.MailGonder();
}

İndirmek için Tıklayınız

Daha Fazla Bilgiye mi İhtiyacınız Var?

Ürünlerimiz veya hizmetlerimizle ilgili yardıma ihtiyacınız varsa, lütfen bizimle temasa geçin.

İletişim

Robot Örnekleri

Kütüphane

Yardıma mı İhtiyacınız Var?

Daha Fazla Bilgiye mi İhtiyacınız Var?