Sayın emlak,
yazdığınız kodu burada paylaşın. Uufuk hocamın bir göz atması yeterli olacaktır:-)
Printable View
Emeğe saygı +++1000000 ( sistem dön dolaş dedi borcum olsun ;) )
prd:=Input("RSI periods",3,610,14);
u:=If(C>Ref(C,-1),C-Ref(C,-1),0);
rsu:=mov(u,prd,ww);
d:=If(C<Ref(C,-1),Ref(C,-1)-C,0);
rsd:=mov(d,prd,ww);
rs:=rsu/rsd;
100-(100/(1+RS))
--------------------------------------------------
Nw:=DAYOFMONTH()<>ref(DAYOFMONTH(),-1);
prd:=Input("RSI periods",3,610,14);
p1:=1/prd;
u:=If(C>Ref(C,-1),C-Ref(C,-1),0);
rsu:=If(nw,(p1*Ref(u,-1))+((1-p1)*PREV),PREV);
d:=If(C<Ref(C,-1),Ref(C,-1)-C,0);
rsd:=If(nw,(p1*Ref(d,-1))+((1-p1)*PREV),PREV);
rs:=rsu/rsd;
100-(100/(1+rs))
Uufuk üstadın sabır taşı ile imtihanı :-) yüz kalmadı bende de.
.............
Uufuk hocam, söyle bir şey olabilir mi? Tşk.
{ RSI - MTF }
prd:=Input("RSI periods",3,610,14);
term:=Input("Hour=1 Day=2",1,2,1);
p1:=1/prd;
{ Daily or Hourly Data }
Nw:=If(term=1,HOUR()<>ref(HOUR(),-1),DAYOFMONTH()<>ref(DAYOFMONTH(),-1));
{ RSI Engine }
RC1:=valuewhen(1,nw,ref(c,-1));
RC2:=valuewhen(2,nw,ref(c,-1));
u:=If(RC1>RC2,RC1-RC2,0);
rsu:=If(nw,(p1*Ref(u,-1))+((1-p1)*PREV),PREV);
d:=If(RC1<RC2,RC2-RC1,0);
rsd:=If(nw,(p1*Ref(d,-1))+((1-p1)*PREV),PREV);
rs:=rsu/rsd;
{ plot on new window }
100-(100/(1+rs))
Kafkaf hocam, bu hali ile son bar "0" ı gösteriyor geçmiş değerler doğru ancak son bar değeri sürekli sıfıra atıyor neden acaba.?
Kod:n:=14; nw:=HOUR()<>ref(HOUR(),-1); p1:=1/n;
c1:=valuewhen(1,nw,ref(c,-1)); c2:=valuewhen(2,nw,ref(c,-1));
po:=if(nw and (c1-c2)>0,c1-c2,0); neg:=if(nw and (c1-c2)<0,c2-c1,0);
x1:=If(nw,p1*po+((1-p1)*PREV),PREV); x2:=If(nw,p1*(neg)+((1-p1)*PREV),PREV);
100- 100/((x1/x2)+1):30:70
https://i.hizliresim.com/YDGz4Z.png
Uufuk hocam çok teşekkürler