anlatmak istediğimin görseli belki daha açıklayıcı olur anlatmayı pek beceremiyorum sanırım
anlatmak istediğimin görseli belki daha açıklayıcı olur anlatmayı pek beceremiyorum sanırım
AL:
YF:=H-Ref(H,-1);
DF:=Ref(L,-1)-L;
F:=If(DF>HF,L,H);
per:=1;
yuzde:=1;
a1:=Mov(F,per,E);
a2:=a1-(a1*yuzde/100);
a3:=a1+(a1*yuzde/100);
b1:=If(a1<PREV,a2,if(a2>PREV,a2,PREV));
b2:=If(a1>PREV,a3,if(a3<PREV,a3,PREV));
k1:=Cross(a1,Ref(b2,-1));
k2:=Cross(Ref(b1,-1),a1);
s1:=BarsSince(k1) < BarsSince(k2);
s2:=If(s1=-1,b1,b2);
AL:=cross(a1,S2);
SAT:=cross(s2,a1);
AL
SAT:
YF:=H-Ref(H,-1);
DF:=Ref(L,-1)-L;
F:=If(DF>HF,L,H);
per:=1;
yuzde:=1;
a1:=Mov(F,per,E);
a2:=a1-(a1*yuzde/100);
a3:=a1+(a1*yuzde/100);
b1:=If(a1<PREV,a2,if(a2>PREV,a2,PREV));
b2:=If(a1>PREV,a3,if(a3<PREV,a3,PREV));
k1:=Cross(a1,Ref(b2,-1));
k2:=Cross(Ref(b1,-1),a1);
s1:=BarsSince(k1) < BarsSince(k2);
s2:=If(s1=-1,b1,b2);
AL:=cross(a1,S2);
SAT:=cross(s2,a1);
SAT
ACIGA SAT ve ACIK POZ. KAPAT bolumlerine yukardaki kodlari kopyalarsaniz asagidaki gibi bir simulasyon sonucu goreceksiniz. :
Uufuk ustadin bizlere kazandirdigi custom MOST formulundeki "C", yani bar kapanisi, yerine dususlerde barin en dusugunu yukselislerde de barin en yuksegini kullanarak sizin ihtiyac duydugunuz kodu olusturabildik. Bu kodun diger bir ozelligi de gecici sinyaller 1dk bar icerisinde %1 lik bir savrulma yasanmasi istisnasi haric geri alinmayacak olmasi. Gecici sinyallerle islem yapilmasi sorun yaratmayacaktir (1dk grafik uzerinde en dusuk ile en yuksek fiyat degerleri arasinda 1% lik savrulma durumu haric). Siz yine de 1 kontrat ile denemeler yapip emin olmadikca portfoyu robota teslim etmeyiniz.
Sistemde kullanilan custom MOST indikator olarak tanimlanmak istenirse:
yuzde:=Input("% stop",0,10,1);
per:=Input("period",1,100,1);
YF:=H-Ref(H,-1);
DF:=Ref(L,-1)-L;
F:=If(DF>HF,L,H);
a1:=Mov(F,per,E);
a2:=a1-(a1*yuzde/100);
a3:=a1+(a1*yuzde/100);
b1:=If(a1<PREV,a2,if(a2>PREV,a2,PREV));
b2:=If(a1>PREV,a3,if(a3<PREV,a3,PREV));
k1:=Cross(a1,Ref(b2,-1));
k2:=Cross(Ref(b1,-1),a1);
s1:=BarsSince(k1) < BarsSince(k2);
s2:=If(s1=-1,b1,b2);
s2
Son düzenleme : 3c1a; 28-05-2019 saat: 18:04.
Buradaki F:=If(DF>HF,L,H); satırındaki HF, yerine YF olacak sanırım değil mi?
KAANCAN arkadisimiz guzel yakalamis. Lutfen onceki kodu dikkate almayiniz, asagidaki duzeltilmis halidir:
AL / ACIK POZ. KAPAT:
YF:=H-Ref(H,-1);
DF:=Ref(L,-1)-L;
F:=If(DF>YF,L,H);
per:=1;
yuzde:=1;
a1:=Mov(F,per,E);
a2:=a1-(a1*yuzde/100);
a3:=a1+(a1*yuzde/100);
b1:=If(a1<PREV,a2,if(a2>PREV,a2,PREV));
b2:=If(a1>PREV,a3,if(a3<PREV,a3,PREV));
k1:=Cross(a1,Ref(b2,-1));
k2:=Cross(Ref(b1,-1),a1);
s1:=BarsSince(k1) < BarsSince(k2);
s2:=If(s1=-1,b1,b2);
AL:=cross(a1,S2);
SAT:=cross(s2,a1);
AL
SAT / ACIGA SAT:
YF:=H-Ref(H,-1);
DF:=Ref(L,-1)-L;
F:=If(DF>YF,L,H);
per:=1;
yuzde:=1;
a1:=Mov(F,per,E);
a2:=a1-(a1*yuzde/100);
a3:=a1+(a1*yuzde/100);
b1:=If(a1<PREV,a2,if(a2>PREV,a2,PREV));
b2:=If(a1>PREV,a3,if(a3<PREV,a3,PREV));
k1:=Cross(a1,Ref(b2,-1));
k2:=Cross(Ref(b1,-1),a1);
s1:=BarsSince(k1) < BarsSince(k2);
s2:=If(s1=-1,b1,b2);
AL:=cross(a1,S2);
SAT:=cross(s2,a1);
SAT
Özelden sorulan,hiçde özel olmayan soru ,sizlerin de dagarcıgına katkı için açık cevaplandı...
-------------------------
Haftanın veya ayın ilk gününün 11:00 barını tespit etmek için formul...Originally Posted by XXX
Ay
Nmon:=MONTH()<>ref(MONTH(),-1);
Nmstart:=highestsince(1,Nmon,Hour()*100+Minute())= 1100;
Hafta
Nweek:=(ROC(DAYOFWEEK(),1,$)<0 AND Ref(DayOfWeek(),-1)<>5) OR ROC(DAYOFWEEK(),1,$)<0 ;
Nwstart:=highestsince(1,Nweek,Hour()*100+Minute()) =1100;
Örnek uygulama AYHAFTAGÜN bir arada ilk saat onbarına kadar oluşan en yüksek en düşükler cizimi..
Kod:Nmon:=MONTH()<>ref(MONTH(),-1); Nmstart:=highestsince(1,Nmon,Hour()*100+Minute())=1000; Nweek:=(ROC(DAYOFWEEK(),1,$)<0 AND Ref(DayOfWeek(),-1)<>5) OR ROC(DAYOFWEEK(),1,$)<0 ; Nwstart:=highestsince(1,Nweek,Hour()*100+Minute())=1000; Nday:=DAYOFMONTH()<>ref(DAYOFMONTH(),-1) ; ValueWhen(1,Nmstart ,ref(highestsince(1,Nmon,H),-1) ); ValueWhen(1,Nmstart,ref(lowestsince(1,Nmon,L),-1) ); ValueWhen(1,Nwstart ,ref(highestsince(1,Nweek,H),-1) ); ValueWhen(1,Nwstart,ref(lowestsince(1,Nweek,L),-1) ) ; ValueWhen(1,(Hour()*100+Minute()=1000) ,ref(highestsince(1,Nday,H),-1) ); ValueWhen(1,(Hour()*100+Minute()=1000) ,ref(lowestsince(1,Nday,L),-1) )
Dürüstlük pahalı bir mülktür, ucuz insanlarda bulunmaz. Honore Balssa
Yer İmleri