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

[cem_songa]

selamlar;

Arkadaþlar akþam flat ol sabah þu saatt tekrar iþleme gir

formülasyonu olan var mý?

[Bear_Bull]

selamlar;

Arkadaþlar akþam flat ol sabah þu saatt tekrar iþleme gir

formülasyonu olan var mý?

///yazar Sezai bey
/*
Bu robot kalýbý, tek satýr fonsiyonundan daha yararlý bazý özelliklere de sahiptir.
"Þu saatten sonra emir ilet", "þu saatte pozisyonu" kapat gibi..
Kodun içine sisteminizin adýný ve kullandýðýnýz periyodu yazýp kullanabilirsiniz.

Not: Gün sonu pozisyonu kapat kýsmýný istemiyorsanýz kýrmýzý yaptýðým bloðu silebilirsiniz.
*/

var LotSize = 1.0;

var MySistem = Sistem.SistemGetir("_BB_F16_FLATLI", "VIP'VIP-X030", "15");  //Sisteminizin adý, grafik sembolünüz, periyot
if (MySistem == null) 
{
   Sistem.Mesaj("Sistem Dosyasý Okunamadý !");
}
else
{
   var EmirSembol = Sistem.AktifViopKontrat;
   var Pozisyon = Sistem.PozisyonKontrolOku(Sistem.Name + " , " + EmirSembol);
   var SonYon = "";
   for (int i = 0; i < MySistem.Yon.Count; i++)
   {
      if (MySistem.Yon[i] != "")
         SonYon = MySistem.Yon[i];
   }

   // Emir Miktarýný Hesapla
  var Miktar = 0.0;
   if (Sistem.Saat.CompareTo("09:30:00") <= 0)  // Seans Baþlamadý iþlem yapma
   {
   }

  else if (Sistem.Saat.CompareTo("18:13:59") >= 0)  // Gün Sonu Pozisyonu Kapat
   {
      if (Pozisyon != 0)
         Miktar = -Pozisyon;
   }

   else if (SonYon == "F" && Pozisyon != 0)  // Flata Geç
      Miktar = -Pozisyon;
   else if (SonYon == "A" && Pozisyon != LotSize)  // Al
      Miktar = LotSize - Pozisyon;
   else if (SonYon == "S" && Pozisyon != -LotSize)  // Sat
      Miktar = -LotSize - Pozisyon;

   // Emir Gönder
   var Islem = "";
   if (Miktar > 0)
      Islem = "ALIS";
   if (Miktar < 0)
      Islem = "SATIS";
   if (Islem != "")
   {
         Sistem.PozisyonKontrolGuncelle(Sistem.Name + " , " + EmirSembol, Miktar + Pozisyon);
         Sistem.EmirSembol = EmirSembol;
         Sistem.EmirIslem = Islem; 
         Sistem.EmirMiktari = Math.Abs(Miktar);
         Sistem.EmirSuresi = "GUN"; // GUN, SNS, IKG
         Sistem.EmirTipi = "KPY"; // KPY, KIE, GIE, SAR
         Sistem.EmirFiyatTipi = "PYS"; // PYS, LMT, EIF, KAP
         Sistem.EmirGonder();
   }
} 

[TIFIL]

iyi günler, daha önce yazýldý mý bilmiyorum ama iki ayrý hisseyi tek yerde yani iþc ile tskb ayný anda görebilmek mümkün mü? tþk.

[Bear_Bull]

7,01 versiyon çýkmýþ



iDealAlgo
@Algoyardim
Sorgu Modülünü yeniledik. Sütunlarda ister fiyat ister metin yazdýrýn ve bu þekilde taratýn. Ýsterseniz koþula baðlý olarak sütunlarýn hem yazý hem zemin renklerini hem geniþliklerini belirleyin. (v7.01) (Örnek sorgu dosyasý buradan indirilebilir: http://directfn.com.tr/sistemler/SorguYeni.001 )
#ideal

[Revisionist]

src=input(hl2, title="Source") 
length=input(10, title="Length", minval=1, maxval=100)

nm0=0, dm0=0
nm1= 1<=length ? (nm0+(1 + 0) * src[0]) : nm0, dm1=1<=length ? dm0+src[0] : dm0

nm=nm1, dm=dm1

cg = iff(dm != 0, -nm/dm + (length + 1) / 2.0, 0)

t=cg[1]

plot(0, title="ZeroLine", color=gray) 
cmil=plot(cg, title="EhlersCGO", color=red)
tl=plot(t, title="Trigger",color=green) 

Üstadlar ve Arkadaþlar böyle bir kalýbý idealde nasýl yazabiliriz?

[TerabyteForever]

Arkadaþlar, if þart bloðunun içerisinde hala daha Cross fonksiyonu gibi bir þeyi nasýl yapacaðýmý bulamadým. "==" operatörünü kullandým fakat Cross ile birebir tutmuyor.

[Bear_Bull]

Arkadaþlar, if þart bloðunun içerisinde hala daha Cross fonksiyonu gibi bir þeyi nasýl yapacaðýmý bulamadým. "==" operatörünü kullandým fakat Cross ile birebir tutmuyor.

var C = Sistem.GrafikFiyatSec("Kapanis");
var EMA5 = Sistem.MA(C, "Exp", 5);
var EMA10 = Sistem.MA(C, "Exp", 10); 

var SonYon = "";
for (int i=100 ; i < Sistem.BarSayisi; i++)
{
   if (EMA5[i] > EMA10[i] && SonYon != "A")
   {
      SonYon = "A";
      Sistem.Yon[i] = "A";
   }
   else if (EMA5[i] < EMA10[i] && SonYon != "S")
   {
      SonYon = "S";
      Sistem.Yon[i] = "S";
   }
} 
Sistem.Cizgiler[0].Deger = EMA5;
Sistem.Cizgiler[1].Deger = EMA10; 

[sonli]

Arkadaþlar, if þart bloðunun içerisinde hala daha Cross fonksiyonu gibi bir þeyi nasýl yapacaðýmý bulamadým. "==" operatörünü kullandým fakat Cross ile birebir tutmuyor.

Linkteki örnekte fiyatýn ortalamayý kesmesi var; mantýk: i-1 barýnda küçük i barýnda büyük olacak ya da tersi...
https://www.hisse.net/topluluk/showthread.php?p=3590586

Geldik, gidiyoruz..