yuzde:=2;
per1:=3;
ort:=mov(c,per1,E);
ortp:=ort-(ort*yuzde/100);
ortm:=ort+(ort*yuzde/100);
line1:=if(ort<prev,ortp,if(ortp>prev,ortp,prev));
line2:=if(ort>prev,ortm,if(ortm<prev,ortm,prev));
k1:=cross(ort,ref(line2,-1));
k2:=cross(ref(line1,-1),ort);
s1:=barssince(k1)<barssince(k2);
s2:=if(s1=-1,line1,line2);
ort;s2
Yer İmleri