Kod:
n:=14; H2:=ref(h,-1); L2:=ref(l,-1); PDM:=If(H-H2>0 and H-H2> L2-L, H-H2,0);
MDM:=If(L2-L>0 and L2-L=>H-H2,L2-L,0);
a:=(100 * Mov( If(H > Ref(H,-1),Stdev(H,10),0),n,ww) /
(Mov( If(H > Ref(H,-1), Stdev(H,10),0),n,ww)+Mov(If(H < Ref(H,-1), Stdev(H,10),0),n,ww))+
100 * Mov( If(L > Ref(L,-1), Stdev(L,10),0),n,ww) /
(Mov( If(L > Ref(L,-1), Stdev(L,10), 0),n,ww)+Mov(If(L < Ref(L,-1), Stdev(L,10),0),n,ww)) )/2;
a1:=100*mov(PDM,14,ww)/mov(atr(1),14,ww); a2:=100*mov(MDM,14,ww)/mov(atr(1),14,ww);
Cross(a,a2) or Cross(a2,a)
Yer İmleri