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

[Bear_Bull]

; olunca bekleme olayý komple iptal oldu

if den sonra ; olmamasý lazým þart saðlanýyorsa
{
içindekileri iþler
}
else þart saðlamýyorsa
{
içindekileri iþler veya yazýlý birþey yoksa pas geçer.

}

Sistem.Getir fonsýyonu performans düþüþüne sebep oluyormu acaba býlgýsý olan var mý ?

sistem getir deyip getirilen sistemin son yonune bakarak robota iþlem açtýrsak mesela performans kaybý yaþarmýyýz.

olmamasý gerekir Erhan

sonuçta Anlýk gönderilen sisteme gidip grafikten sistem yönüne bakýp geri geliyor.

sistemin ilk baþý ile sonunun ne kadar sürede tarandýðýný gösteren bir minik kod parçasý vardý
onu bulup Debug ta yazdýrýp denemek lazým.


bu arada grafikle hiç iþi olmayan sistem 1500 deðiþik kontrat datalarýný saniyede 950 kez okuyup dönebiliyor.

ayný benzer sistemlerden 10-12 tane baðladýðýmda
saniyede 100 kez dönüþ yapabiliyor
iþlem yaptýrma sýrasýnda
emir borsaya gitsin iþlem teyidi geri dönsün diye
System.Threading.Thread.Sleep(2000);
sistemi 2 saniyeliðine ben durduruyorum.

[Bear_Bull]

if (H[i-1]>a[i-1] ) { //yeni yüksek var mý H büyükse a dan

a[i] =H[i-1]; a ya H yi ata
b[i] =b[i-1]+( H[i-1]-a[i-1]) //yeni stop = Eski stop + (yeni yüksek- bir önceki yüksek) b ye b+(h-a) ata

} else { //yeni yüksek yok
......

þu kod paçasýný tane tane açýklamalý yazacak olan varsa çok makbule geçer ...saolun ...

if (H[i-1]>a[i-1] )
{ //yeni yüksek var mý H büyükse a dan

a[i] =H[i-1]; a ya H yi ata

b[i] =b[i-1]+( H[i-1]-a[i-1]) b ye b+(h-a) ata

} else { //yeni yüksek yok

[sonli]

if (H[i-1]>a[i-1] ) { //yeni yüksek var mý

a[i] =H[i-1];
b[i] =b[i-1]+( H[i-1]-a[i-1]) //yeni stop = Eski stop + (yeni yüksek- bir önceki yüksek)

} else { //yeni yüksek yok
......

þu kod paçasýný tane tane açýklamalý yazacak olan varsa çok makbule geçer ...saolun ...

Bear_Bull Hocam anlatmýþ sað olsun, ama kodun tamamýný açýklamalý þekilde incelerseniz daha iyi anlaþýlýr. Daha önce þurada https://www.hisse.net/topluluk/showt...66#post3516466 paylaþtýðým kodu tamamen açýklamaya çalýþtým. Kitabýn açýklamasýna göre yazmýþtým hatalý olmadýysa.. Yalnýz burada sadece satýþ þartý var, alým þartý olmadýðýndan eski yüksek geçilene kadar takip etmez, dolayýsýyla sabit gider.. Sistem deðil de son x bar için iz süren stop indikatörü bu haliyle.. Bahsettiðiniz kod parçasý ise sadece alttaki kodda stop þartýný deðiþtirmek amacý taþýyor. Alttaki haliyle;
stop=Son yüksek barýn düþüðü - puan
iken, üstteki kod parçacýðýný ilgili bölüm ile deðiþtirirseniz þu hale döner:
stop = Eski stop + (yeni yüksek- bir önceki yüksek)
Bu arada deðiþtirecek olursanýz, yukarýdaki kodda b[i] =b[i-1]+( H[i-1]-a[i-1]); sondaki ; eksik kalmýþ..

//Fiyat bölgesi indikatörü olarak son x bar için iz süren stop 
//(stop= son x bardaki her yeni en yüksek barýn düþüðü -belirlenen puan)..
var bars = 100;//son kaç barý takip edecek
var puan = 0.10f;//stop=düþük-puan..10 kuruþ düþürerek takip edecek bu haliyle

var C = Sistem.GrafikFiyatSec("Kapanis");
var H = Sistem.GrafikFiyatSec("Yuksek");
var L = Sistem.GrafikFiyatSec("Dusuk");

var a = Sistem.Liste(0);//yüksek listesi
var b = Sistem.Liste(0);//stop

var SonYon = "";
for (int i = Sistem.BarSayisi-bars; i < Sistem.BarSayisi; i++)

{ 
//Sondan bir önceki barýn(i-1) yükseði, son yükseðimizden büyük mü? yani yeni yüksek var mý?
if (H[i-1]>a[i-1] ) { //yeni yüksek var mý
//varsa
a[i] =H[i-1];//sonraki barlarda kýyaslamak için a ya yeni yükseði atýyoruz
//son stop seviyemiz b, yeni yüksek barýmýzýn (düþüðü-puan) dan düþük mü? düþükse stobu yukarý taþýyacaðýz, deðilse eski stop devam..
 if (b[i-1]<(L[i-1]-puan)) b[i] =L[i-1]-puan; //eski stop düþük kaldý, yeni stop b=son yükseðin düþüðü-puan
 else b[i] =b[i-1] ; //eski stop daha yukarýda, o zaman eskimemiþ, ayný stopla devam

} else { //yeni yüksek yok, o zaman yüksek ve stop listemiz eskilerle devam ediyor 
a[i] =a[i-1] ; 
b[i] =b[i-1] ;
}

if (C[i]<b[i] && SonYon !="S") // Fiyat stop altý, SAT
{
SonYon = Sistem.Yon[i] = "S";  
}

} 

Sistem.Cizgiler[0].Deger = a;
Sistem.Cizgiler[1].Deger = b; 

[erhanacikgoz1]

if den sonra ; olmamasý lazým þart saðlanýyorsa
{
içindekileri iþler
}
else þart saðlamýyorsa
{
içindekileri iþler veya yazýlý birþey yoksa pas geçer.

}




olmamasý gerekir Erhan

sonuçta Anlýk gönderilen sisteme gidip grafikten sistem yönüne bakýp geri geliyor.

sistemin ilk baþý ile sonunun ne kadar sürede tarandýðýný gösteren bir minik kod parçasý vardý
onu bulup Debug ta yazdýrýp denemek lazým.


bu arada grafikle hiç iþi olmayan sistem 1500 deðiþik kontrat datalarýný saniyede 950 kez okuyup dönebiliyor.

ayný benzer sistemlerden 10-12 tane baðladýðýmda
saniyede 100 kez dönüþ yapabiliyor
iþlem yaptýrma sýrasýnda
emir borsaya gitsin iþlem teyidi geri dönsün diye
System.Threading.Thread.Sleep(2000);
sistemi 2 saniyeliðine ben durduruyorum.

Þu yönden sordum abi.

Acaba sistemi direk user.dll içinemi yazmalý yoksa sistem tanýmlarýndan yazýp user.dll sistem getir ile çeksem performans ne derece deðiþecek.

Bir arayüz yapýyorum býlýyorsun deneme amaclý tuþa basýnca býr sýstemýn yonunu cektýrdým.

2 saniye sonra yon býlgýsýný getýrdý

https://twitter.com/erhanacikgoz1/st...806934016?s=20

þu videoyu býlýyorsun video sonunda alttaki rsi tuþuna basýyorum sað altta label4 yazýyor o kýsmý A yazýyor.

rsi tusuna bastýktan 2 sanýye sonra A harfini koyuyor buda bana acaba performansta sorun cýkarmý sorusunu sordurttu ?

acaba dedim bir kere getýrýnce býrdahaký sefere dahamý hýzlý okur dedim. tusa výdeodan sonra 2. kez bastým yýne ayný gecýkme oldugunu farkettým.

þimdi yapacagým modulde sýstem ýsmýný gýrdýkten sonra sürekli olarak yön bilgisini okutmama gerekecek.

haliyle cok hýzlý sekýlde okuyabýlmelý ký sistemden gelen yonu cesýtlý hesaplamalar sonrasýnda al veya sat olarak ýdeale gerý gondermelý.

Bendeký data 12 yýllýk acaba ondanmý gecýktý býlmýyorum tabý.

[OGRENCI]

Sayin Sonic ve bear bull abi cok saolun Teþekkürler ....

if (H[i-1]>a[i-1] )
{ //yeni yüksek var mý H büyükse a dan

a[i] =H[i-1]; a ya H yi ata

b[i] =b[i-1]+( H[i-1]-a[i-1]) b ye b+(h-a) ata

} else { //yeni yüksek yok

Bear_Bull Hocam anlatmýþ sað olsun, ama kodun tamamýný açýklamalý þekilde incelerseniz daha iyi anlaþýlýr. Daha önce þurada https://www.hisse.net/topluluk/showt...66#post3516466 paylaþtýðým kodu tamamen açýklamaya çalýþtým. Kitabýn açýklamasýna göre yazmýþtým hatalý olmadýysa.. Yalnýz burada sadece satýþ þartý var, alým þartý olmadýðýndan eski yüksek geçilene kadar takip etmez, dolayýsýyla sabit gider.. Sistem deðil de son x bar için iz süren stop indikatörü bu haliyle.. Bahsettiðiniz kod parçasý ise sadece alttaki kodda stop þartýný deðiþtirmek amacý taþýyor. Alttaki haliyle;
stop=Son yüksek barýn düþüðü - puan
iken, üstteki kod parçacýðýný ilgili bölüm ile deðiþtirirseniz þu hale döner:
stop = Eski stop + (yeni yüksek- bir önceki yüksek)
Bu arada deðiþtirecek olursanýz, yukarýdaki kodda b[i] =b[i-1]+( H[i-1]-a[i-1]); sondaki ; eksik kalmýþ..

//Fiyat bölgesi indikatörü olarak son x bar için iz süren stop 
//(stop= son x bardaki her yeni en yüksek barýn düþüðü -belirlenen puan)..
var bars = 100;//son kaç barý takip edecek
var puan = 0.10f;//stop=düþük-puan..10 kuruþ düþürerek takip edecek bu haliyle

var C = Sistem.GrafikFiyatSec("Kapanis");
var H = Sistem.GrafikFiyatSec("Yuksek");
var L = Sistem.GrafikFiyatSec("Dusuk");

var a = Sistem.Liste(0);//yüksek listesi
var b = Sistem.Liste(0);//stop

var SonYon = "";
for (int i = Sistem.BarSayisi-bars; i < Sistem.BarSayisi; i++)

{ 
//Sondan bir önceki barýn(i-1) yükseði, son yükseðimizden büyük mü? yani yeni yüksek var mý?
if (H[i-1]>a[i-1] ) { //yeni yüksek var mý
//varsa
a[i] =H[i-1];//sonraki barlarda kýyaslamak için a ya yeni yükseði atýyoruz
//son stop seviyemiz b, yeni yüksek barýmýzýn (düþüðü-puan) dan düþük mü? düþükse stobu yukarý taþýyacaðýz, deðilse eski stop devam..
 if (b[i-1]<(L[i-1]-puan)) b[i] =L[i-1]-puan; //eski stop düþük kaldý, yeni stop b=son yükseðin düþüðü-puan
 else b[i] =b[i-1] ; //eski stop daha yukarýda, o zaman eskimemiþ, ayný stopla devam

} else { //yeni yüksek yok, o zaman yüksek ve stop listemiz eskilerle devam ediyor 
a[i] =a[i-1] ; 
b[i] =b[i-1] ;
}

if (C[i]<b[i] && SonYon !="S") // Fiyat stop altý, SAT
{
SonYon = Sistem.Yon[i] = "S";  
}

} 

Sistem.Cizgiler[0].Deger = a;
Sistem.Cizgiler[1].Deger = b; 

SM-N9000Q cihazýmdan hisse.net mobile app kullanarak gönderildi.

[kenten]

hýz konusu çoðu zaman düþündüðümüzden önemli, ben her sistemin hangi adýmýnda ne kadar zaman harcadýðýna mutlaka bakýyorum . bazen yanlýþ mantýkla yapýlan iþler falan zaman kaybýna neden oluyor

kodun herhangi biyerindeki ms detayýndaki zamaný stringe atabilirsin

DateTime.Now.ToString("HH:mm:ss.fff")

formul testle falan kullanmak için kodun çeþitli yerlerine þu kod atýlabilir

Sistem.Debug(" xx "+DateTime.Now.ToString("HH:mm:ss.fff"));

sistem.debug ýn kendiside görüntülemeden dolayý 1-2 ms zaman alýyo , dolayýsýyla onu da engellemek için örneðin þöyle bir kod kullanýlabilir.

string zzaman= "start "+DateTime.Now.ToString("HH:mm:ss.fff");// ilk baþa 
zzaman=zzaman+ "x adým "+ DateTime.Now.ToString("HH:mm:ss.fff");// ölçmek istediðin adýmlar için tekrarla

Sistem.Debug(zzaman);// sistemin en sonuna

kullanan herkesin ilk farkettiðidir muhtemelen okunacak bar sayýsý doðrudan hesaplamalara etkisi var . hesaplamalarý falan son 200-300 bara kýsýtlayabilirsin ama rsi falan hesaplattýðýnda onu ta baþtan hesaplayacak müdahale þansýn yok.

arayüz meselesini çok anlamýyorum . denemedim ama arayüze ekrana bilgi yazdýrmak muhtemelen uzun zaman alýyodur . Filmlerde falan yapýyolar dramatik etki için mesela þifre kýrýyo bilgisayar , ekranda yüzlerce þifre tekrar tekrar görünüyo , yüz karþýlaþtýrma yapýyo teker teker yüzlerce yüz parmakizi falan . gerçekte bunlar arkada iþlemcide sessiz sedasýz görüntüsüz olan iþler . en fazla yüklenince fanlar üflemeye baþlýyodur.
biz insanlarýn zaman ölçüsü ile bilgisayarýn zaman ölçüsü arasýnda daðlar var
beyin çalýþmasýnda bile ani bir sinyal geldiðinde beyin sen düþün ne yapacaðýna karar ver demiyo kendi yapýyo , tuhaf bi ses duydun karþýdan araba üzerine doðru geliye biþey patladý , beyin hemen otomatik tepki veriyo , zýplýyosun ellerini koruma pozisyonuna alýyosun vs.
birde iþlemciyi uyutmak yerine zamankontrol kullanmak daha mantýklý gibi
System.Threading.Thread.Sleep(2000);
uyuturken uyandýrýrken geçen ayrýca zamanlar var

[OGRENCI]

Bear_Bull Hocam anlatmýþ sað olsun, ama kodun tamamýný açýklamalý þekilde incelerseniz daha iyi anlaþýlýr. Daha önce þurada https://www.hisse.net/topluluk/showt...66#post3516466 paylaþtýðým kodu tamamen açýklamaya çalýþtým. Kitabýn açýklamasýna göre yazmýþtým hatalý olmadýysa.. Yalnýz burada sadece satýþ þartý var, alým þartý olmadýðýndan eski yüksek geçilene kadar takip etmez, dolayýsýyla sabit gider.. Sistem deðil de son x bar için iz süren stop indikatörü bu haliyle.. Bahsettiðiniz kod parçasý ise sadece alttaki kodda stop þartýný deðiþtirmek amacý taþýyor. Alttaki haliyle;
stop=Son yüksek barýn düþüðü - puan
iken, üstteki kod parçacýðýný ilgili bölüm ile deðiþtirirseniz þu hale döner:
stop = Eski stop + (yeni yüksek- bir önceki yüksek)
Bu arada deðiþtirecek olursanýz, yukarýdaki kodda b[i] =b[i-1]+( H[i-1]-a[i-1]); sondaki ; eksik kalmýþ..

//Fiyat bölgesi indikatörü olarak son x bar için iz süren stop 
//(stop= son x bardaki her yeni en yüksek barýn düþüðü -belirlenen puan)..
var bars = 100;//son kaç barý takip edecek
var puan = 0.10f;//stop=düþük-puan..10 kuruþ düþürerek takip edecek bu haliyle

var C = Sistem.GrafikFiyatSec("Kapanis");
var H = Sistem.GrafikFiyatSec("Yuksek");
var L = Sistem.GrafikFiyatSec("Dusuk");

var a = Sistem.Liste(0);//yüksek listesi
var b = Sistem.Liste(0);//stop

var SonYon = "";
for (int i = Sistem.BarSayisi-bars; i < Sistem.BarSayisi; i++)

{ 
//Sondan bir önceki barýn(i-1) yükseði, son yükseðimizden büyük mü? yani yeni yüksek var mý?
if (H[i-1]>a[i-1] ) { //yeni yüksek var mý
//varsa
a[i] =H[i-1];//sonraki barlarda kýyaslamak için a ya yeni yükseði atýyoruz
//son stop seviyemiz b, yeni yüksek barýmýzýn (düþüðü-puan) dan düþük mü? düþükse stobu yukarý taþýyacaðýz, deðilse eski stop devam..
 if (b[i-1]<(L[i-1]-puan)) b[i] =L[i-1]-puan; //eski stop düþük kaldý, yeni stop b=son yükseðin düþüðü-puan
 else b[i] =b[i-1] ; //eski stop daha yukarýda, o zaman eskimemiþ, ayný stopla devam

} else { //yeni yüksek yok, o zaman yüksek ve stop listemiz eskilerle devam ediyor 
a[i] =a[i-1] ; 
b[i] =b[i-1] ;
}

if (C[i]<b[i] && SonYon !="S") // Fiyat stop altý, SAT
{
SonYon = Sistem.Yon[i] = "S";  
}

} 

Sistem.Cizgiler[0].Deger = a;
Sistem.Cizgiler[1].Deger = b; 

çok teþekkür ederim ..saolun

[OGRENCI]

Kontrol etmedim ama mantýken bu þekilde olmasý lazým

            var C = Sistem.GrafikFiyatSec("Kapanis");
            var L = Sistem.GrafikFiyatSec("Düsük");
            var H = Sistem.GrafikFiyatSec("Yüksek");
            var SonYon = "";
            float StopPuan = 0.05f;    //Puaný kendiniz belirleyebilirsiniz
            bool SartAl = .....;  //Alýþ þartýnýz
            float SonStop = 0f;
            var IzleyenStop = Sistem.Liste(0);
            for (int i = 1; i < Sistem.BarSayisi; i++)
            {
                if (SartAl && SonYon!="A")
                {
                    Sistem.Yon[i] = "A";
                    SonYon = "A";
                    SonStop = L[i] - StopPuan; //Alýþýn gerçekleþmesiyle stopu belirledik
                    IzleyenStop[i] = SonStop;
                    continue;
                }
                if ( SonYon =="A")
                {
                     //Kapanýþ stop üstü ve yeni yüksek görülmediyse
                    if (C[i]>=IzleyenStop[i-1]&& H[i]<=H[i-1]) 
                    {
                        IzleyenStop[i] = SonStop;   //Stop seviyesi deðiþmez
                        continue;
                    }
                    else if (C[i] >= IzleyenStop[i - 1] && H[i] > H[i - 1]) //Yeni yüksek 
                    {
                        SonStop = L[i] - StopPuan; //Stop güncellenir
                        IzleyenStop[i] = SonStop;
                        continue;
                    }
                    else if (C[i] < IzleyenStop[i - 1]) //Stop altýnda kapatýrsa
                    {
                        Sistem.Yon[i] = "F"; // yön flate döner
                        SonYon = "F";
                        IzleyenStop[i] = IzleyenStop[i - 1]; //Burayý sadece sonstop seviyelerini grafikte görebilmeniz için yazdým                      
                    }
                }
            }
            Sistem.Cizgiler[0].Deger = IzleyenStop; 

selam ustalar ... yukarýdaki koda örneðin 5 ma 10 ma kesmesi alýþ þartýný nasýl ekleriz ..mantýgýný anlamaya çalýsýyorum lütfen gülmeyin dostlar..