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

[Zülfü Aþkýn]

Ana grafik 60 dk lýk ara grafikler 30 ve 15 dk lýk...

60 dk grafik üzerinden sat sinyali geldi 3 adet sort açtým...Daha sonra 15 dk grafik üzerinde al sinyali geldi 1 adet sort kapanacak ardýndan 30 dk al verdi 1 adet sort daha kapanacak 60dk al sinyali gelirse diger 1 adet sort kapanacak ve long poza gececek 3 adet

60 dk al devam ederken 15 dk sat verdi 1 poz kapanacak derken tekrar 15 dklýk al verdi kapanan poz tekrar acýlacak 60 dk sat sinayli verene kadar..


Ana poz 60 dk lýk 15 ve 30 dk lýklar ana poza ters düþerse 1 adet kapanacak 15 ve 30 dk 60 dk lýk ile ayný yöne gelirse tekrar açýlacak...

Bunu robota uygulayacak yardýmcý olacak arkadaþ veya arkadaþlara þimdiden teþekkürler..


[IMG][/IMG]


[IMG][/IMG]


[IMG][/IMG]

[Bear_Bull]

//////_5_Sistem_Tek_islem_Robot////////

var Poz1 = Sistem.PozisyonKontrolOku("Robot1" + " , " + Sistem.AktifViopKontrat);
var Poz2 = Sistem.PozisyonKontrolOku("Robot2" + " , " + Sistem.AktifViopKontrat);
var Poz3 = Sistem.PozisyonKontrolOku("Robot3" + " , " + Sistem.AktifViopKontrat);
var Poz4 = Sistem.PozisyonKontrolOku("Robot4" + " , " + Sistem.AktifViopKontrat);
var Poz5 = Sistem.PozisyonKontrolOku("Robot5" + " , " + Sistem.AktifViopKontrat);

var PozExtra = Sistem.PozisyonKontrolOku(Sistem.Name + " , " + Sistem.AktifViopKontrat);

var Miktar = 0.0;
if (Poz1 + Poz2 + Poz3 + Poz4 + Poz5 == 5)
{
    if (PozExtra == 0)
        Miktar = 2;
}
else if (Poz1 + Poz2 + Poz3 + Poz4 + Poz5 == -5)
{
    if (PozExtra == 0)
        Miktar = -2;
}
else if (PozExtra != 0)
{
    Miktar = -PozExtra;
}

// Emir Gönder
if (Miktar != 0)
{
    Sistem.PozisyonKontrolGuncelle(Sistem.Name + " , " + Sistem.AktifViopKontrat, Miktar + PozExtra);
    Sistem.EmirSembol = Sistem.AktifViopKontrat;
    Sistem.EmirIslem = Miktar > 0 ? "ALIS" : "SATIS"; ;
    Sistem.EmirMiktari = Math.Abs(Miktar);
    Sistem.EmirSuresi = "GUN";
    Sistem.EmirTipi = "KPY";
    Sistem.EmirFiyatTipi = "PYS";
    Sistem.EmirGonder();
} 

[SSilentmaNN]

Düzeltiyorum, çalýþýyormuþ. Yanlýþ kodladým galiba.

Merhaba arkadaþlar.
Sistem.RobotStop(); komutu çalýþmýyor, artýk.
Sistem elemanlarý pencersinde de bulunmuyor. Kod ile robotu nasýl durdurabilirim.

[Revisionist]

Arkadaþlar macd nin kapanýþ fiyatýndan deðilde high+low/2 hesaplanmasýný ve exponanetial deðilde zerolag olmasýný istiyorum. Ayrýca smoothh olmasý için bir iki filtreleme yapmam gerekiyor. Þöyle bir kod yazdým ama çizdirmiyor. Nerede hata yapýyorum.

//Veriler
var V = Sistem.GrafikVerileri ;
var high = Sistem.GrafikFiyatOku(V, "Yuksek") ;
var low = Sistem.GrafikFiyatOku(V, "Dusuk") ;
//Variable
var src= (high + low)/2;
var ma1= Sistem.MA(src, "ZeroLag", 12);
var ma2= Sistem.MA(src, "ZeroLag", 26);
var ma3= Sistem.MA(src, "ZeroLag", 9);
//Calculations 
var fast = ma1 - ma2;
var slow= ma3(fast);
var avr = fast - slow;
//Lines
Sistem.Cizgiler[0].Deger = fast;  
Sistem.Cizgiler[1].Deger = slow;
Sistem.Cizgiler[2].Deger = avr; 

Birde slow 'u histogram olarak nasýl çizdirirm?

[alekss]

Arkadaþlar macd nin kapanýþ fiyatýndan deðilde high+low/2 hesaplanmasýný ve exponanetial deðilde zerolag olmasýný istiyorum. Ayrýca smoothh olmasý için bir iki filtreleme yapmam gerekiyor. Þöyle bir kod yazdým ama çizdirmiyor. Nerede hata yapýyorum.

//Veriler
var V = Sistem.GrafikVerileri ;
var high = Sistem.GrafikFiyatOku(V, "Yuksek") ;
var low = Sistem.GrafikFiyatOku(V, "Dusuk") ;
//Variable
var src= (high + low)/2;
var ma1= Sistem.MA(src, "ZeroLag", 12);
var ma2= Sistem.MA(src, "ZeroLag", 26);
var ma3= Sistem.MA(src, "ZeroLag", 9);
//Calculations 
var fast = ma1 - ma2;
var slow= ma3(fast);
var avr = fast - slow;
//Lines
Sistem.Cizgiler[0].Deger = fast;  
Sistem.Cizgiler[1].Deger = slow;
Sistem.Cizgiler[2].Deger = avr; 

Birde slow 'u histogram olarak nasýl çizdirirm?

dostum þöyle bir yazýlmýþ formül var belki iþine yarar
var fastperiod = 12;
var slowperiod = 26;
var signalperiod = 9;

var Veriler = Sistem.GrafikVerileri;

var C=Sistem.Liste(0);
var V=Sistem.Liste(0);
var CV=Sistem.Liste(0);
var fastMA=Sistem.Liste(0);
var slowMA=Sistem.Liste(0);
var VWMACD=Sistem.Liste(0);

for (int i = 1; i < Veriler.Count; i++)
{ C[i] =Veriler[i].Close;
V[i] =Veriler[i].Vol;
CV[i]=V[i] * C[i];
}

var KVWMA1= Sistem.MA(CV,"Exp",fastperiod );
var KVWMA2= Sistem.MA(V,"Exp",fastperiod );
var UVWMA1 = Sistem.MA(CV,"Exp",slowperiod );
var UVWMA2 = Sistem.MA(V,"Exp",slowperiod );

for (int i = 1; i < Veriler.Count; i++)
{
fastMA[i] = KVWMA1[i] / KVWMA2[i] ;
slowMA[i] = UVWMA1[i] / UVWMA2[i] ;
VWMACD[i] = fastMA[i] - slowMA[i] ;
}

var signal = Sistem.MA (VWMACD,"Simple",signalperiod);

var hist=Sistem.Liste(0);
for (int i = 1; i < Veriler.Count; i++)
{
hist[i] = VWMACD[i] - signal[i] ;
}

Sistem.Cizgiler[0].Deger = VWMACD; Sistem.Cizgiler[0].Panel = 2;
Sistem.Cizgiler[1].Deger = signal; Sistem.Cizgiler[1].Panel = 2;
Sistem.Cizgiler[2].Deger = hist; Sistem.Cizgiler[2].Panel = 2; Sistem.Cizgiler[2].Stil = 5;
Sistem.Cizgiler[3].Deger = Sistem.Liste(0); Sistem.Cizgiler[3].Panel = 2;

[Janbulat]

Arkadaslar belli kosullarda dusukleri seçip topladýðým bir liste var.Bu listedeki elmanlarýn MA ,TOMA vb tarafýndan kesildiði bir al sat kosulu uretmek istiyorum olmuyor bir turlu lutfen yardým edermisiniz.Cok sýkýstým.
var x1=Sistem.Liste(Veriler,0);
var MA1=Sistem.MA(2, "Simple", "Kapanis");
for(int i=0; i<enDusuklerListesi3.Count; i++)
{
Sistem.YaziEkle("L", 1, enDusuklerListesi3[i], Sistem.GrafikVerileri[enDusuklerListesi3[i]].Low, Renk2, "Tahoma", 12);
}
for (int i = 10; i < Veriler.Count-1; i++)
{
{
x1[i]=
enDusuklerListesi3[i]>MA1[i]? -1:

enDusuklerListesi3[i]<MA1[i]?1:
x[i-1];
}
if(x[i]==1&&SonYon!="A")
{
SonYon = "A";
Sistem.Yon[i]=SonYon;
}
if(x[i]==-1&&SonYon!="S")
{
SonYon = "S";
Sistem.Yon[i]=SonYon;
}
}

[ozmen]

var slow= ma3(fast); 

Slow kodu nedir?

//Veriler
var V = Sistem.GrafikVerileri ;
var SRC = Sistem.GrafikFiyatSec("OrtaNokta") ;

//Variable

var ma1= Sistem.MA(SRC, "ZeroLag", 12);
var ma2= Sistem.MA(SRC, "ZeroLag", 26);
var ma3= Sistem.MA(SRC, "ZeroLag", 9);
//Calculations 

var fast=Sistem.Liste(0);
var slow=Sistem.Liste(0);
var avr=Sistem.Liste(0);


//for (int i = 0; i < V.Count; i++)
for (int i=1; i < Sistem.BarSayisi; i++)
{
fast[i] = ma1[i] - ma2[i];
//slow[i] = ma3[i] - fast[i];
//slow[i] = fast[i] != 0 ? ma3[i] / fast[i] : slow[i-1];
avr[i] = fast[i] - slow[i];
}

//Lines
Sistem.Cizgiler[0].Deger = fast;  
Sistem.Cizgiler[1].Deger = slow;  Sistem.Cizgiler[1].Stil = 5;
Sistem.Cizgiler[2].Deger = avr; 
 
//Sistem.Cizgiler[3].Deger = SRC; 

[ozmen]

Arkadaþlar döngü içerisindeki elemanýn son deðerini düz çizgi olarak nasýl çizdirebilirim.